diff options
Diffstat (limited to 'testsuite/tests/driver/pragma001.hs')
| -rw-r--r-- | testsuite/tests/driver/pragma001.hs | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/testsuite/tests/driver/pragma001.hs b/testsuite/tests/driver/pragma001.hs new file mode 100644 index 0000000000..8c1b7aac94 --- /dev/null +++ b/testsuite/tests/driver/pragma001.hs @@ -0,0 +1,29 @@ + +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- +--------------------------------------------------------------------------- + +-- There is enough comment to fill up one buffer (1024 bytes) of the code +-- in GHC that looks for OPTIONS_GHC pragmas etc. + +{-# OPTIONS_GHC -w #-} + +module Pragma001 () where + +-- This will make a warning if the pragam isn't picked up +foo _ = () +foo _ = () + |