diff options
Diffstat (limited to 'ghc/Main.hs')
-rw-r--r-- | ghc/Main.hs | 2 |
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 |