1 files changed, 62 insertions, 0 deletions
diff --git a/test/translate2.lm b/test/translate2.lm
new file mode 100644
index 0000000..47bda35
--- /dev/null
+++ b/test/translate2.lm
@@ -0,0 +1,62 @@
+##### LM #####
+lex
+	ignore /space+/
+	literal `# `{ `}
+	token id2 /[a-zA-Z_]+/ 
+end
+
+def item2
+	[id2]
+|	[`{ item2* `}]
+
+def start2
+	[item2*]
+
+context ctx
+
+	lex
+		ignore /space+/
+		literal `* `( `) `!
+		token SEMI_NL /';\n'/
+		token id /[a-zA-Z_0-9]+/ 
+
+		token ddd /'...'/ {
+			print('translating\n')
+			input.pull( match_length )
+			input.push( make_token( typeid<id> "dot" ) )
+			input.push( make_token( typeid<id> "dot" ) )
+			input.push( make_token( typeid<id> "dot" ) )
+		}
+	end
+
+	def item 
+		[id]
+	|	[`( item* `)]
+
+	def A [] {
+		print( 'A\n' )
+	}
+
+	def B [] {
+		print( 'B\n' )
+	}
+	
+
+	def start 
+		[A item* `!]
+	|	[B item* SEMI_NL]
+
+end # ctx
+
+CTX: ctx = cons ctx []
+parse Input: ctx::start( CTX ) [ stdin ]
+print( Input )
+
+##### IN #####
+a b c ( d1 ... d2 ) e f g ;
+##### EXP #####
+A
+translating
+B
+translating
+a b c ( d1 dotdotdot d2 ) e f g ;