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 c05ba3c..c2b752f 100644 --- a/tests/GhcSession.hs +++ b/tests/GhcSession.hs @@ -100,7 +100,11 @@ compileModule ep opts = do E.handle (\(ec :: ExitCode) -> print ec >> return False) $ do +#if __GLASGOW_HASKELL__ <= 704 + defaultErrorHandler defaultLogAction $ do +#else defaultErrorHandler defaultFatalMessager defaultFlushOut $ do +#endif runGhc (Just libdir) $ do |