diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2019-01-18 22:00:36 +1100 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2019-01-18 22:00:36 +1100 |
| commit | 26cb20d3cf5d6148f2e2baa603a0c61a87642f3a (patch) | |
| tree | 7e426bde31bb63aef6136351e7cd4a3f3dfc1c3e /test/packrat-lexer-debug.ads | |
| parent | 4e42761354c2de557c0166d46aabe9dcd9b77073 (diff) | |
Packrat.Lexer Stamp, Ignore, Scan, Scan_Only functions/procedures completed
Diffstat (limited to 'test/packrat-lexer-debug.ads')
| -rw-r--r-- | test/packrat-lexer-debug.ads | 16 |
1 files changed, 13 insertions, 3 deletions
diff --git a/test/packrat-lexer-debug.ads b/test/packrat-lexer-debug.ads index 77614aa..a1cb768 100644 --- a/test/packrat-lexer-debug.ads +++ b/test/packrat-lexer-debug.ads @@ -13,9 +13,8 @@ package Packrat.Lexer.Debug is function Create_Result - (Length : in Natural; - Status : in Result_Status; - Value : in Element_Array) + (Finish : in Natural; + Status : in Result_Status) return Combinator_Result; function Join @@ -61,6 +60,17 @@ package Packrat.Lexer.Debug is return Gen_Tokens.Token; + + + function Is_Failure + (Result : in Component_Result) + return Boolean; + + function Is_Success + (Result : in Component_Result) + return Boolean; + + private |