summaryrefslogtreecommitdiff
path: root/ghc/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/Main.hs')
-rw-r--r--ghc/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/Main.hs b/ghc/Main.hs
index ce4c62822f..5a51c38d92 100644
--- a/ghc/Main.hs
+++ b/ghc/Main.hs
@@ -167,7 +167,7 @@ main' postLoadMode dflags0 args flagWarnings = do
-- Leftover ones are presumably files
(dflags2, fileish_args, dynamicFlagWarnings) <- GHC.parseDynamicFlags dflags1a args
- GHC.prettyPrintGhcErrors $ do
+ GHC.prettyPrintGhcErrors dflags2 $ do
let flagWarnings' = flagWarnings ++ dynamicFlagWarnings