diff options
-rw-r--r-- | testsuite/tests/driver/Makefile | 5 | ||||
-rw-r--r-- | testsuite/tests/driver/T17786.hs | 5 | ||||
-rw-r--r-- | testsuite/tests/driver/all.T | 1 |
3 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/tests/driver/Makefile b/testsuite/tests/driver/Makefile index d1bb30ff37..77a77c158d 100644 --- a/testsuite/tests/driver/Makefile +++ b/testsuite/tests/driver/Makefile @@ -674,3 +674,8 @@ T14452: "$(TEST_HC)" $(TEST_HC_OPTS) -v -c -O2 T14452.hs 2>&1 | grep 'O3' \ | awk 'NF{print $$NF; exit}' | sed 's/\"//g' # awk: extract last word of line, sed: remove quotes + +.PHONY: T17786 +T17786: + # N.B. Check for the presence of caret diagnostics. + "$(TEST_HC)" $(TEST_HC_OPTS) -v $(shell cygpath -w -a T17786.hs) 2>&1 | grep --quiet '3 |' diff --git a/testsuite/tests/driver/T17786.hs b/testsuite/tests/driver/T17786.hs new file mode 100644 index 0000000000..c1bbfc6747 --- /dev/null +++ b/testsuite/tests/driver/T17786.hs @@ -0,0 +1,5 @@ +{-# LANGUAGE CPP #-} +module T17786 where +#if defined(FOO) +foo = 42 + diff --git a/testsuite/tests/driver/all.T b/testsuite/tests/driver/all.T index 11796951f2..b3d6ed2924 100644 --- a/testsuite/tests/driver/all.T +++ b/testsuite/tests/driver/all.T @@ -278,3 +278,4 @@ test('T16737', compile_and_run, ['-optP=-isystem -optP=T16737include']) test('T17143', exit_code(1), run_command, ['{compiler} T17143.hs -S -fno-code']) +test('T17786', [unless(opsys('mingw32'), skip), exit_code(1)], makefile_test, []) |