diff --git a/ghc/tests/reader/should_fail/read015.hs b/ghc/tests/reader/should_fail/read015.hs
new file mode 100644
index 0000000000000000000000000000000000000000..6920083483e17804633ccb976178154a03ed9e3f
--- /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
index 0000000000000000000000000000000000000000..d2bdab61acd993969d7f63908c243081974a07fc
--- /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
+