--- a/progs/lexer/lex.sc	Fri Oct 31 11:25:14 2025 +0000
+++ b/progs/lexer/lex.sc	Fri Oct 31 19:26:11 2025 +0000
@@ -139,7 +139,7 @@
 
 
 
-println(lex(("ab" | "a") ~ (ONE | "b"), "ab".toList))
+println(lex(("ab" | "ab") ~ (ONE | "b"), "ab".toList))
 
 println(lex(STAR("aa" | "a"), "aaa".toList))
 
@@ -207,7 +207,7 @@
   println(s"test: $prog1")
   println(lexing(WHILE_REGS, prog1))
 
-  val prog2 = """read  n; write n"""  
+  val prog2 = """read  n; write n; write n"""  
   println(s"test: $prog2")
   println(lexing(WHILE_REGS, prog2))
 }