diff options
-rw-r--r-- | testsuite/tests/driver/T16167.hs | 1 | ||||
-rw-r--r-- | testsuite/tests/driver/T16167.stdout | 1 | ||||
-rw-r--r-- | testsuite/tests/driver/all.T | 2 |
3 files changed, 4 insertions, 0 deletions
diff --git a/testsuite/tests/driver/T16167.hs b/testsuite/tests/driver/T16167.hs new file mode 100644 index 0000000000..865a269a5c --- /dev/null +++ b/testsuite/tests/driver/T16167.hs @@ -0,0 +1 @@ +module f diff --git a/testsuite/tests/driver/T16167.stdout b/testsuite/tests/driver/T16167.stdout new file mode 100644 index 0000000000..4cd1e64b6e --- /dev/null +++ b/testsuite/tests/driver/T16167.stdout @@ -0,0 +1 @@ +{"span": {"file": "T16167.hs","startLine": 1,"startCol": 8,"endLine": 1,"endCol": 9},"doc": "parse error on input \u2018f\u2019","severity": "SevError","reason": null} diff --git a/testsuite/tests/driver/all.T b/testsuite/tests/driver/all.T index 3060c8ff13..bb345c7ac9 100644 --- a/testsuite/tests/driver/all.T +++ b/testsuite/tests/driver/all.T @@ -261,6 +261,8 @@ test('T12955', normal, makefile_test, []) test('T12971', [when(opsys('mingw32'), expect_broken(17945)), ignore_stdout], makefile_test, []) test('json', normal, compile_fail, ['-ddump-json']) test('json2', normalise_version('base','ghc-prim'), compile, ['-ddump-types -ddump-json']) +test('T16167', exit_code(1), run_command, + ['{compiler} -x hs -e ":set prog T16167.hs" -ddump-json T16167.hs']) test('T13604', [], makefile_test, []) test('T13604a', [], makefile_test, []) # omitting hpc and profasm because they affect the |