diff options
Diffstat (limited to 'compiler/main/DriverPipeline.hs')
| -rw-r--r-- | compiler/main/DriverPipeline.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/compiler/main/DriverPipeline.hs b/compiler/main/DriverPipeline.hs index 133bdde283..ea0c6eded1 100644 --- a/compiler/main/DriverPipeline.hs +++ b/compiler/main/DriverPipeline.hs @@ -2054,7 +2054,11 @@ doCpp dflags raw input_fn output_fn = do backend_defs <- getBackendDefs dflags +#ifdef GHCI let th_defs = [ "-D__GLASGOW_HASKELL_TH__" ] +#else + let th_defs = [ "-D__GLASGOW_HASKELL_TH__=0" ] +#endif -- Default CPP defines in Haskell source ghcVersionH <- getGhcVersionPathName dflags let hsSourceCppOpts = [ "-include", ghcVersionH ] |