diff options
Diffstat (limited to 'example/sentence.adb')
-rw-r--r-- | example/sentence.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/example/sentence.adb b/example/sentence.adb index b6cded9..bd69e5b 100644 --- a/example/sentence.adb +++ b/example/sentence.adb @@ -34,7 +34,7 @@ procedure Sentence is function Sat_Blank is new My_Rat.Lexers.Satisfy (Packrat.Utilities.Is_Whitespace); function Many_Blank is new My_Rat.Lexers.Many (Sat_Blank, 1); - function Whitespace is new My_Rat.Lexers.Ignore (Whitespace, Many_Blank); + function Whitespace is new My_Rat.Lexers.Discard (Whitespace, Many_Blank); package Scanner is new My_Rat.Lexers.Scan_Once ((Word'Access, Whitespace'Access)); |