From 63f9f901a3c2345411b201c86dceceb4807fb974 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Sat, 5 Dec 2020 22:19:01 +1100 Subject: Reduced generic instantiation size blowup --- example/sentence.adb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'example/sentence.adb') diff --git a/example/sentence.adb b/example/sentence.adb index 5270d3a..cdae38d 100644 --- a/example/sentence.adb +++ b/example/sentence.adb @@ -3,7 +3,7 @@ with Ada.Text_IO, - Packrat.Text, + Packrat.Standard, Packrat.Utilities; use @@ -19,8 +19,8 @@ procedure Sentence is type Lexer_Labels is (Word, Whitespace); type Parser_Labels is (S, NP, PP, VP, Det, Noun, Verb, Prep); - package Text_Rat is new Packrat.Text (Lexer_Labels, Parser_Labels); - package My_Rat renames Text_Rat.Standard; + package My_Rat is new Packrat.Standard + (Lexer_Labels, Parser_Labels, Character, String); -- cgit