Instantiation package improvements

1 files changed, 29 insertions, 0 deletions

diff --git a/src/packrat-text.ads b/src/packrat-text.ads
index 3d239e8..c3a5c51 100644
--- a/src/packrat-text.ads
+++ b/src/packrat-text.ads
@@ -1,8 +1,37 @@
 
 
+with
+
+    Packrat.Standard;
+
+
+generic
+
+    type Lexer_Labels is (<>);
+    type Parser_Labels is (<>);
+
 package Packrat.Text is
 
 
+    package Standard is new Packrat.Standard
+       (Lexer_Labels  => Lexer_Labels,
+        Parser_Labels => Parser_Labels,
+        Element_Type  => Character,
+        Element_Array => String);
+
+    package Wide is new Packrat.Standard
+       (Lexer_Labels  => Lexer_Labels,
+        Parser_Labels => Parser_Labels,
+        Element_Type  => Wide_Character,
+        Element_Array => Wide_String);
+
+    package Wide_Wide is new Packrat.Standard
+       (Lexer_Labels  => Lexer_Labels,
+        Parser_Labels => Parser_Labels,
+        Element_Type  => Wide_Wide_Character,
+        Element_Array => Wide_Wide_String);
+
+
 end Packrat.Text;