diff options
author | roland <rsx@bluewin.ch> | 2018-08-21 12:18:26 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2018-08-21 18:52:42 -0400 |
commit | ebcbfba7bbf07fa9fbb78b46951892997795bcb8 (patch) | |
tree | e86c442edbcc6403bb7a2bf85c12b889f941ef39 /testsuite/tests/driver/T10869A.hs | |
parent | 23774c98f1368b41515cbd5223b87ea6dbf644e1 (diff) | |
download | haskell-ebcbfba7bbf07fa9fbb78b46951892997795bcb8.tar.gz |
Introduce flag -keep-hscpp-files
Test Plan: `make test=T10869`
Reviewers: mpickering, thomie, ezyang, bgamari
Reviewed By: thomie, bgamari
Subscribers: rwbarton, carter
GHC Trac Issues: #10869
Differential Revision: https://phabricator.haskell.org/D4861
Diffstat (limited to 'testsuite/tests/driver/T10869A.hs')
-rw-r--r-- | testsuite/tests/driver/T10869A.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/testsuite/tests/driver/T10869A.hs b/testsuite/tests/driver/T10869A.hs new file mode 100644 index 0000000000..14e57772c7 --- /dev/null +++ b/testsuite/tests/driver/T10869A.hs @@ -0,0 +1,7 @@ +{-# LANGUAGE CPP #-} +module T10869A (writeMsg) where + +writeMsg :: IO () +#if defined(__GLASGOW_HASKELL__) +writeMsg = putStrLn "Hello HSPP File" +#endif |