diff options
author | Ben Gamari <ben@smart-cactus.org> | 2020-02-14 11:45:42 -0500 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2020-02-28 15:35:51 -0500 |
commit | fc2ca00e8c947c58f71b358cb0c752bb7c1b6f3a (patch) | |
tree | 5455bc6b2bbeae8954fc8143217245751d5b04e0 | |
parent | 89745769acc181d94d690ce251a6823286cb7e7d (diff) | |
download | haskell-fc2ca00e8c947c58f71b358cb0c752bb7c1b6f3a.tar.gz |
testsuite: Add test for #17786wip/T17786
This isn't pretty but it's perhaps better than nothing.
-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, []) |