diff options
-rw-r--r-- | tests/GhcSession.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/GhcSession.hs b/tests/GhcSession.hs index b30d2c7..c05ba3c 100644 --- a/tests/GhcSession.hs +++ b/tests/GhcSession.hs @@ -133,7 +133,11 @@ compileModule ep opts = do ChSetupEntrypoint -> map (IIModule . mkModuleName) ["Main"] +#if __GLASGOW_HASKELL__ <= 704 + GhcMonad.liftIO $ print ExitSuccess +#else liftIO $ print ExitSuccess +#endif return True unChModuleName :: ChModuleName -> String |