summaryrefslogtreecommitdiff
path: root/testsuite/tests/runghc/T6132.hs
blob: dbb996b141bcd5065c5a3041efc9cca0378d3505 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#!/usr/bin/env whatever

{-# LANGUAGE CPP #-}

module Main where

-- Compiling a program with CPP that also has a hash bang should work (#6132).
-- Before ghc-7.8, it failed with:
--
-- error: invalid preprocessing directive #!
-- #!/usr/bin/env runghc

#if 1
main = return ()
#endif