[project @ 2000-09-04 13:59:55 by simonmar]

test for bogus parse caused by Happy bug

diff --git a/ghc/tests/reader/should_fail/read015.hs b/ghc/tests/reader/should_fail/read015.hs
new file mode 100644 (file)
index 0000000..6920083
--- /dev/null
+++ b/ghc/tests/reader/should_fail/read015.hs
@@ -0,0 +1,5 @@
+module Test where
+
+-- should fail; doesn't with happy 1.8.
+f = f where b = f
+            c = (b

diff --git a/ghc/tests/reader/should_fail/read015.stderr b/ghc/tests/reader/should_fail/read015.stderr
new file mode 100644 (file)
index 0000000..d2bdab6
--- /dev/null
+++ b/ghc/tests/reader/should_fail/read015.stderr
@@ -0,0 +1,4 @@
+read015.hs:6: parse error (possibly incorrect indentation)
+
+Compilation had errors
+