diff options
Diffstat (limited to 'test/packrat-lexer-debug.ads')
-rw-r--r-- | test/packrat-lexer-debug.ads | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/test/packrat-lexer-debug.ads b/test/packrat-lexer-debug.ads new file mode 100644 index 0000000..e8ddf7b --- /dev/null +++ b/test/packrat-lexer-debug.ads @@ -0,0 +1,37 @@ + + +generic +package Packrat.Lexer.Debug is + + + Empty_Fail : constant Combinator_Result; + + + function Create_Result + (Length : in Natural; + Status : in Result_Status; + Value : in Element_Array) + return Combinator_Result; + + function Join + (Left, Right : in Combinator_Result) + return Combinator_Result; + + function Status + (This : in Combinator_Result) + return Result_Status; + + function Debug_String + (This : in Combinator_Result) + return String; + + +private + + + Empty_Fail : constant Combinator_Result := Packrat.Lexer.Empty_Fail; + + +end Packrat.Lexer.Debug; + + |