From c0ac1814c8ee184c076922ad363d69152cba18af Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Mon, 6 Sep 1999 12:42:29 +0000
Subject: [PATCH] [project @ 1999-09-06 12:42:29 by simonmar] Add parse
 error/layout test.

---
 ghc/tests/reader/should_fail/read012.hs     |    9 +++++++++
 ghc/tests/reader/should_fail/read012.stderr |    4 ++++
 2 files changed, 13 insertions(+)
 create mode 100644 ghc/tests/reader/should_fail/read012.hs
 create mode 100644 ghc/tests/reader/should_fail/read012.stderr

diff --git a/ghc/tests/reader/should_fail/read012.hs b/ghc/tests/reader/should_fail/read012.hs
new file mode 100644
index 0000000..4a78088
--- /dev/null
+++ b/ghc/tests/reader/should_fail/read012.hs
@@ -0,0 +1,9 @@
+-- !!! test parse errors due to tokens inserted by layout
+
+-- used to report "Parse error on input `'" in 4.04pl0.
+
+main = let 
+	f = (a,
+	g = 1
+	in f
+
diff --git a/ghc/tests/reader/should_fail/read012.stderr b/ghc/tests/reader/should_fail/read012.stderr
new file mode 100644
index 0000000..5105742
--- /dev/null
+++ b/ghc/tests/reader/should_fail/read012.stderr
@@ -0,0 +1,4 @@
+read012.hs:7: parse error (possibly incorrect indentation)
+
+Compilation had errors
+
-- 
1.7.10.4