[commit: testsuite] master: Add a test for 2 trailing commas in the module export list (ae22bd3)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/testsuite

On branch  : master

https://github.com/ghc/testsuite/commit/ae22bd3ed222b5adc8e320c433a472978551f45c

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

commit ae22bd3ed222b5adc8e320c433a472978551f45c
Author: Ian Lynagh <ian at well-typed.com>
Date:   Sun May 19 13:38:07 2013 +0100

    Add a test for 2 trailing commas in the module export list

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

 tests/parser/should_fail/ExportCommaComma.hs     |    3 +++
 tests/parser/should_fail/ExportCommaComma.stderr |    2 ++
 tests/parser/should_fail/all.T                   |    1 +
 3 files changed, 6 insertions(+), 0 deletions(-)

diff --git a/tests/parser/should_fail/ExportCommaComma.hs b/tests/parser/should_fail/ExportCommaComma.hs
new file mode 100644
index 0000000..3ba318f
--- /dev/null
+++ b/tests/parser/should_fail/ExportCommaComma.hs
@@ -0,0 +1,3 @@
+
+module ExportCommaComma (id, reverse,,) where
+
diff --git a/tests/parser/should_fail/ExportCommaComma.stderr b/tests/parser/should_fail/ExportCommaComma.stderr
new file mode 100644
index 0000000..f93d83f
--- /dev/null
+++ b/tests/parser/should_fail/ExportCommaComma.stderr
@@ -0,0 +1,2 @@
+
+ExportCommaComma.hs:2:38: parse error on input `,'
diff --git a/tests/parser/should_fail/all.T b/tests/parser/should_fail/all.T
index ebd768c..378a73f 100644
--- a/tests/parser/should_fail/all.T
+++ b/tests/parser/should_fail/all.T
@@ -78,3 +78,4 @@ test('ParserNoMultiWayIf', when(compiler_lt('ghc', '7.5'), skip), compile_fail,
 test('T5425', normal, compile_fail, [''])
 test('T984', normal, compile_fail, [''])
 test('T7848', normal, compile_fail, ['-dppr-user-length=100'])
+test('ExportCommaComma', normal, compile_fail, [''])