1 files changed, 11 insertions, 0 deletions
diff --git a/src/packrat.ads b/src/packrat.ads
index 7f124e1..e61fbc9 100644
--- a/src/packrat.ads
+++ b/src/packrat.ads
@@ -29,6 +29,17 @@ private
         renames Ada.Strings.Unbounded.To_String;
 
 
+
+
+    generic
+        type Base_Type is private;
+        type Array_Type is array (Positive range <>) of Base_Type;
+        with function "<" (Left, Right : in Base_Type) return Boolean is <>;
+    function Array_Less_Than
+           (Left, Right : in Array_Type)
+        return Boolean;
+
+
 end Packrat;