X-Git-Url: http://git.megacz.com/?p=sbp.git;a=blobdiff_plain;f=tests%2Fregression.tc;fp=tests%2Fregression.tc;h=ce66c93423c2f9f2e2ee1d815b4dc9f3ed0d0072;hp=c72c01d79bb25580725e64e8bd9e5eaed306781f;hb=b05d375d20da3454008c00fecf79a282d11de5fe;hpb=d3b22e743f1070bc4c465ee66b39ccc12df72883

diff --git a/tests/regression.tc b/tests/regression.tc
index c72c01d..ce66c93 100644
--- a/tests/regression.tc
+++ b/tests/regression.tc
@@ -463,3 +463,9 @@ testcase "epsilon as a negative conjunct" {
     X:: = "a" ("b"* &~ ())
 }
 
+testcase "long input (reported by David Crawshaw)" {
+    input "0123456789";
+    s:: = X*
+    X:: = "a" ("b"* &~ ())
+}
+