summaryrefslogtreecommitdiff
path: root/ghc/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/Main.hs')
-rw-r--r--ghc/Main.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/ghc/Main.hs b/ghc/Main.hs
index 71a45f8a9a..4a91acd3b9 100644
--- a/ghc/Main.hs
+++ b/ghc/Main.hs
@@ -78,8 +78,7 @@ import Data.Maybe
main :: IO ()
main = do
hSetBuffering stdout NoBuffering
- let defaultErrorHandlerDynFlags = defaultDynFlags (panic "No settings")
- GHC.defaultErrorHandler defaultErrorHandlerDynFlags $ do
+ GHC.defaultErrorHandler defaultLogAction $ do
-- 1. extract the -B flag from the args
argv0 <- getArgs