Have the split between InputStream and SourceStream partially functional. Basic

parsing working, but not more fine-grained stream control.

3 files changed, 41 insertions, 0 deletions

diff --git a/test/accumbt2.exp b/test/accumbt2.exp
new file mode 100644
index 00000000..e69de29b
--- /dev/null
+++ b/test/accumbt2.exp
diff --git a/test/accumbt2.in b/test/accumbt2.in
new file mode 100644
index 00000000..12626d93
--- /dev/null
+++ b/test/accumbt2.in
@@ -0,0 +1 @@
+a b c d e ;
diff --git a/test/accumbt2.lm b/test/accumbt2.lm
new file mode 100644
index 00000000..168517bd
--- /dev/null
+++ b/test/accumbt2.lm
@@ -0,0 +1,40 @@
+lex one
+{
+	ignore /[ \t\n]+/
+	token id1 /[a-zA-Z_][a-zA-Z_0-9]*/
+
+	def one [ id1* ]
+}
+
+global OneParser: accum<one> = 
+	cons accum<one>[]
+
+lex two
+{
+	ignore /[ \t]+/
+	token id2 /[a-zA-Z_][a-zA-Z_0-9]*/
+	literal '!', ';', '\n'
+
+	def A1 []
+		{ print( "A1\n" ) }
+
+	def A2 []
+		{ print( "A2\n" ) }
+
+	def item2
+		[id2]
+		{
+			send OneParser [' extra ']
+			send OneParser [$r1]
+		}
+
+	def two 
+		[A1 item2* '!' '\n']
+	|	[A2 item2* ';' '\n']
+}
+
+Two: two = 
+	parse two( stdin )
+
+print( Two )
+print( OneParser.finish() '\n' )