diff options
author | Ian Lynagh <ian@well-typed.com> | 2013-05-19 13:38:07 +0100 |
---|---|---|
committer | Ian Lynagh <ian@well-typed.com> | 2013-05-19 13:38:07 +0100 |
commit | 26eee8d9852f5927011841ce6e16a25766e1ed59 (patch) | |
tree | 3111e5e92a6ecc43cbde96636a33b4162c3d11b0 /testsuite/tests/parser/should_fail | |
parent | 8c6794ab70ad2b009ea257f26deb81a5d1fa2312 (diff) | |
download | haskell-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.hs | 3 | ||||
-rw-r--r-- | testsuite/tests/parser/should_fail/ExportCommaComma.stderr | 2 | ||||
-rw-r--r-- | testsuite/tests/parser/should_fail/all.T | 1 |
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, ['']) |