diff options
author | Jed Barber <jjbarber@y7mail.com> | 2021-01-13 18:57:43 +1100 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2021-01-13 18:57:43 +1100 |
commit | ea022446ea40844831a7daa3c6e6d9f7d91c01f2 (patch) | |
tree | 2ce93933f8a8584cec295e3f9b300ebda819ef85 /src | |
parent | 3fa431a2268a11dec6fd82c8f9b59cc2d0af9a93 (diff) |
Removed superfluous Line_End/Input_End lexer combinators
Diffstat (limited to 'src')
-rw-r--r-- | src/packrat-lexers.adb | 33 | ||||
-rw-r--r-- | src/packrat-lexers.ads | 17 |
2 files changed, 0 insertions, 50 deletions
diff --git a/src/packrat-lexers.adb b/src/packrat-lexers.adb index bf5d109..cd81635 100644 --- a/src/packrat-lexers.adb +++ b/src/packrat-lexers.adb @@ -687,39 +687,6 @@ package body Packrat.Lexers is end Take_Until; - - - - function Line_End - (Input : in Traits.Element_Array; - Start : in Positive) - return Combinator_Result is - begin - if Start > Input'Last then - return Empty_Fail; - elsif Input (Start) = EOL_Item then - return (Start, Success); - else - return Empty_Fail; - end if; - end Line_End; - - - function Input_End - (Input : in Traits.Element_Array; - Start : in Positive) - return Combinator_Result is - begin - if Start > Input'Last then - return Empty_Fail; - elsif Input (Start) = EOF_Item then - return (Start, Success); - else - return Empty_Fail; - end if; - end Input_End; - - end Packrat.Lexers; diff --git a/src/packrat-lexers.ads b/src/packrat-lexers.ads index ac0ba2b..4b6bbc9 100644 --- a/src/packrat-lexers.ads +++ b/src/packrat-lexers.ads @@ -268,23 +268,6 @@ package Packrat.Lexers is return Combinator_Result; - - - generic - EOL_Item : in Traits.Element_Type; - function Line_End - (Input : in Traits.Element_Array; - Start : in Positive) - return Combinator_Result; - - generic - EOF_Item : in Traits.Element_Type; - function Input_End - (Input : in Traits.Element_Array; - Start : in Positive) - return Combinator_Result; - - private |