diff options
author | Ian Lynagh <igloo@earth.li> | 2011-11-18 13:48:23 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2011-11-18 13:48:23 +0000 |
commit | 413481c6470a5ba19d70e1a86cb1b9779bdcd288 (patch) | |
tree | 2ba4ad0a3e007c7473667062b9eaa1c7110c289b /testsuite/tests/driver | |
parent | 3565a1b517fefe07572654f9d05558a9f7a1a9ba (diff) | |
download | haskell-413481c6470a5ba19d70e1a86cb1b9779bdcd288.tar.gz |
Add a test for T5198
Diffstat (limited to 'testsuite/tests/driver')
-rw-r--r-- | testsuite/tests/driver/Makefile | 8 | ||||
-rw-r--r-- | testsuite/tests/driver/T5198.hs | 6 | ||||
-rw-r--r-- | testsuite/tests/driver/all.T | 3 |
3 files changed, 17 insertions, 0 deletions
diff --git a/testsuite/tests/driver/Makefile b/testsuite/tests/driver/Makefile index c13665b99d..8e5f2da576 100644 --- a/testsuite/tests/driver/Makefile +++ b/testsuite/tests/driver/Makefile @@ -491,3 +491,11 @@ T5584: $(RM) -rf T5584_out mkdir T5584_out "$(TEST_HC)" -odir T5584_out -c T5584/A.hs-boot + +.PHONY: T5198 +T5198: + $(RM) -rf T5198dump + [ ! -d T5198dump ] + "$(TEST_HC)" $(TEST_HC_OPTS) -c T5198.hs -dumpdir T5198dump -ddump-to-file -ddump-simpl + [ -f T5198dump/T5198.dump-simpl ] + diff --git a/testsuite/tests/driver/T5198.hs b/testsuite/tests/driver/T5198.hs new file mode 100644 index 0000000000..f34610197c --- /dev/null +++ b/testsuite/tests/driver/T5198.hs @@ -0,0 +1,6 @@ + +module T5198 where + +v :: () +v = () + diff --git a/testsuite/tests/driver/all.T b/testsuite/tests/driver/all.T index 7f937a91e9..d721f22ae0 100644 --- a/testsuite/tests/driver/all.T +++ b/testsuite/tests/driver/all.T @@ -351,3 +351,6 @@ test('spacesInArgs', test('T5584', normal, run_command, ['$MAKE -s --no-print-directory T5584']) +test('T5198', extra_clean(['T5198dump/T5198.dump-simpl', 'T5198dump']), + run_command, + ['$MAKE -s --no-print-directory T5198']) |