X-Git-Url: http://git.megacz.com/?p=sbp.git;a=blobdiff_plain;f=tests%2Fregression.tc;h=28ca476e643fa113eaa2774b4de6801107319c07;hp=f911a97835f5423394d7b490de9476887156ee24;hb=0ab024f487647f99eb000345c29c2f8e9b52a200;hpb=2a11d8ca5ae3af89ac2bdea58f71e463b6e4affe

diff --git a/tests/regression.tc b/tests/regression.tc
index f911a97..28ca476 100644
--- a/tests/regression.tc
+++ b/tests/regression.tc
@@ -352,3 +352,9 @@ testcase {
     Expra   = Foo:: ("a" | "b")
 
 }
+
+testcase {
+    input "aaaaa";
+    s = top:: z q:"a"* z
+    z = a:: "a"
+}
\ No newline at end of file