summaryrefslogtreecommitdiff
path: root/testsuite/tests/parser/should_fail
diff options
context:
space:
mode:
authorIan Lynagh <ian@well-typed.com>2013-05-19 13:38:07 +0100
committerIan Lynagh <ian@well-typed.com>2013-05-19 13:38:07 +0100
commit26eee8d9852f5927011841ce6e16a25766e1ed59 (patch)
tree3111e5e92a6ecc43cbde96636a33b4162c3d11b0 /testsuite/tests/parser/should_fail
parent8c6794ab70ad2b009ea257f26deb81a5d1fa2312 (diff)
downloadhaskell-26eee8d9852f5927011841ce6e16a25766e1ed59.tar.gz
Add a test for 2 trailing commas in the module export list
Diffstat (limited to 'testsuite/tests/parser/should_fail')
-rw-r--r--testsuite/tests/parser/should_fail/ExportCommaComma.hs3
-rw-r--r--testsuite/tests/parser/should_fail/ExportCommaComma.stderr2
-rw-r--r--testsuite/tests/parser/should_fail/all.T1
3 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/tests/parser/should_fail/ExportCommaComma.hs b/testsuite/tests/parser/should_fail/ExportCommaComma.hs
new file mode 100644
index 0000000000..3ba318f77a
--- /dev/null
+++ b/testsuite/tests/parser/should_fail/ExportCommaComma.hs
@@ -0,0 +1,3 @@
+
+module ExportCommaComma (id, reverse,,) where
+
diff --git a/testsuite/tests/parser/should_fail/ExportCommaComma.stderr b/testsuite/tests/parser/should_fail/ExportCommaComma.stderr
new file mode 100644
index 0000000000..f93d83f6ac
--- /dev/null
+++ b/testsuite/tests/parser/should_fail/ExportCommaComma.stderr
@@ -0,0 +1,2 @@
+
+ExportCommaComma.hs:2:38: parse error on input `,'
diff --git a/testsuite/tests/parser/should_fail/all.T b/testsuite/tests/parser/should_fail/all.T
index ebd768ce29..378a73f4a6 100644
--- a/testsuite/tests/parser/should_fail/all.T
+++ b/testsuite/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, [''])