diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-06-11 17:43:46 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-06-11 17:43:46 +0100 |
| commit | 65152943e6fe80dc5314e897dbf910137b01c47b (patch) | |
| tree | 5f68d960e94ef95e1caad7f0b67f03368a93446d /ghc/Main.hs | |
| parent | 2de63e5a912f2abbda44a8125f374b19e8c3a0ff (diff) | |
| download | haskell-65152943e6fe80dc5314e897dbf910137b01c47b.tar.gz | |
Pass DynFlags to prettyPrintGhcErrors
We don't use it yet
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 |