From 670e21a7aa4b1eb9ed1862a4faa7e0d62d0899cf Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Thu, 10 Jan 2019 23:29:16 +1100
Subject: Test framework for Lexer Combinators

---
 test/ratnest-tests.adb | 116 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 116 insertions(+)

(limited to 'test/ratnest-tests.adb')

diff --git a/test/ratnest-tests.adb b/test/ratnest-tests.adb
index 1f0950d..72023d0 100644
--- a/test/ratnest-tests.adb
+++ b/test/ratnest-tests.adb
@@ -4,6 +4,7 @@ with
 
     Ada.Characters.Latin_1,
     Ada.Strings.Maps,
+    Packrat.Lexer.Combinators,
     Packrat.Util;
 
 
@@ -204,6 +205,121 @@ package body Ratnest.Tests is
 
 
 
+    function Lex_Sequence_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Sequence_Check;
+
+
+    function Lex_Count_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Count_Check;
+
+
+    function Lex_Many_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Many_Check;
+
+
+    function Lex_Many_Until_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Many_Until_Check;
+
+
+    function Lex_Satisfy_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Satisfy_Check;
+
+
+    function Lex_Satisfy_With_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Satisfy_With_Check;
+
+
+    function Lex_Match_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Match_Check;
+
+
+    function Lex_Match_With_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Match_With_Check;
+
+
+    function Lex_Multimatch_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Multimatch_Check;
+
+
+    function Lex_Take_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Take_Check;
+
+
+    function Lex_Take_While_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Take_While_Check;
+
+
+    function Lex_Take_Until_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Lex_Take_Until_Check;
+
+
+    function Line_Start_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Line_Start_Check;
+
+
+    function Line_End_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Line_End_Check;
+
+
+    function Input_Start_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Input_Start_Check;
+
+
+    function Input_End_Check
+        return Test_Result is
+    begin
+        return Failure;
+    end Input_End_Check;
+
+
+
+
+
     function In_Set_Check
         return Test_Result
     is
-- 
cgit