X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=tests%2Fregression.tc;h=28ca476e643fa113eaa2774b4de6801107319c07;hb=b318adb49d46a596314d7b7c0dd9f52681abb449;hp=eb29cf86a75fd4e8d1f5a2e6cc55aa5425e2989a;hpb=017b5ed533ca298fe5ae1078e2a59da1d2d95ea2;p=sbp.git diff --git a/tests/regression.tc b/tests/regression.tc index eb29cf8..28ca476 100644 --- a/tests/regression.tc +++ b/tests/regression.tc @@ -344,7 +344,7 @@ testcase { testcase { input "a+2"; - output ""; + output "Plus:{left:{Foo} right:{{2}}}"; s = Expr Expr = [0-9]++ @@ -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