[commit: testsuite] master: Test #8431 (c4c640e)

[git at git.haskell.org]

Repository : ssh://git at git.haskell.org/testsuite

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/c4c640ecc2478143c4a31fd0ed28c06af4bb7b8a/testsuite

>---------------------------------------------------------------

commit c4c640ecc2478143c4a31fd0ed28c06af4bb7b8a
Author: Krzysztof Gogolewski <krz.gogolewski at gmail.com>
Date:   Sat Oct 12 03:33:08 2013 +0200

    Test #8431


>---------------------------------------------------------------

c4c640ecc2478143c4a31fd0ed28c06af4bb7b8a
 tests/parser/should_fail/T8431.hs     |    1 +
 tests/parser/should_fail/T8431.stderr |    2 ++
 tests/parser/should_fail/all.T        |    1 +
 3 files changed, 4 insertions(+)

diff --git a/tests/parser/should_fail/T8431.hs b/tests/parser/should_fail/T8431.hs
new file mode 100644
index 0000000..bea8cd1
--- /dev/null
+++ b/tests/parser/should_fail/T8431.hs
@@ -0,0 +1 @@
+)
diff --git a/tests/parser/should_fail/T8431.stderr b/tests/parser/should_fail/T8431.stderr
new file mode 100644
index 0000000..25d6e59
--- /dev/null
+++ b/tests/parser/should_fail/T8431.stderr
@@ -0,0 +1,2 @@
+
+T8431.hs:1:1: parse error on input `)'
diff --git a/tests/parser/should_fail/all.T b/tests/parser/should_fail/all.T
index 255d2a4..9aba76e 100644
--- a/tests/parser/should_fail/all.T
+++ b/tests/parser/should_fail/all.T
@@ -81,3 +81,4 @@ test('T984', normal, compile_fail, [''])
 test('T7848', normal, compile_fail, ['-dppr-user-length=100'])
 test('ExportCommaComma', normal, compile_fail, [''])
 test('T8430', literate, compile_fail, [''])
+test('T8431', normal, compile_fail, ['-XAlternativeLayoutRule'])