checkpoint
[sbp.git] / tests / regression.tc
index ae452e9..7626c55 100644 (file)
@@ -323,4 +323,20 @@ testcase {
 //
 //
 //}
-//
\ No newline at end of file
+//
+
+
+testcase {
+    input "abc                         ";
+
+    s   ::= q " "* => s
+    q   ::= [a-z] [a-z] [a-z] => a3
+         &~ ~[] "b" ~[]*
+}
+
+testcase {
+    input "abc                         ";
+    output "s:{a b c}";
+
+    s   ::= [a-z] [a-z] [a-z] " "* => s
+}