diff options
Diffstat (limited to 'src/packrat.ads')
| -rw-r--r-- | src/packrat.ads | 15 |
1 files changed, 3 insertions, 12 deletions
diff --git a/src/packrat.ads b/src/packrat.ads index b2b0144..365cce5 100644 --- a/src/packrat.ads +++ b/src/packrat.ads @@ -113,20 +113,16 @@ package Packrat is type Token_Array is array (Positive range <>) of Token; - -- will probably have to remove the Finish field to accommodate graphs properly - - function Create (Ident : in Label_Enum; Start : in Positive; - Finish : in Natural; Value : in Element_Array) return Token; - -- Note: The Start and Finish indices indicate where the token was found - -- in whatever array it was lexed from. The Value does *not* have - -- to correspond with whatever is found in the Start .. Finish range. + -- Note: The Start index indicate where the token was found + -- in whatever array it was lexed from. The Value does *not* + -- have to correspond with whatever is found there. function Debug_String @@ -142,10 +138,6 @@ package Packrat is (This : in Token) return Positive; - function Finish - (This : in Token) - return Natural; - function Value (This : in Token) return Element_Array; @@ -160,7 +152,6 @@ package Packrat is type Token is record Identifier : Label_Enum; Start_At : Positive; - Finish_At : Natural; Token_Value : Value_Holders.Holder; end record; |