Test framework for Lexer Combinators

1 files changed, 116 insertions, 0 deletions

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