From 87667886ee386edb89dc18b0bddcf94675c57a00 Mon Sep 17 00:00:00 2001
From: Jed Barber <jjbarber@y7mail.com>
Date: Fri, 4 Dec 2020 12:35:50 +1100
Subject: Added redirects for self-referential combinators

---
 src/packrat-parsers.ads | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

(limited to 'src/packrat-parsers.ads')

diff --git a/src/packrat-parsers.ads b/src/packrat-parsers.ads
index 99dbee7..8d0ba68 100644
--- a/src/packrat-parsers.ads
+++ b/src/packrat-parsers.ads
@@ -113,6 +113,27 @@ package Packrat.Parsers is
 
 
 
+    generic
+    package Redirect is
+
+        procedure Set
+               (Target : in Combinator);
+
+        function Call
+               (Input   : in     Traits.Element_Array;
+                Context : in out Parser_Context;
+                Start   : in     Positive)
+            return Combinator_Result;
+
+    private
+
+        Combo : Combinator := null;
+
+    end Redirect;
+
+
+
+
     generic
         Params : in Combinator_Array;
     function Sequence
-- 
cgit