--- a/progs/lexer/lex.sc	Mon Nov 22 11:35:38 2021 +0000
+++ b/progs/lexer/lex.sc	Tue Nov 30 10:16:47 2021 +0000
@@ -138,6 +138,9 @@
 def lexing(r: Rexp, s: String) = 
   env(lex(r, s.toList))
 
+println(lex(("ab" | "a") ~ (ONE | "b"), "ab".toList))
+
+println(lex(STAR("aa" | "a"), "aaa".toList))
 
 // The Lexing Rules for the WHILE Language