From: Ian Lynagh <igloo@earth.li>
Date: Mon, 12 Oct 2009 13:26:11 +0000 (+0000)
Subject: Print warnings after doMkDependHS
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=8ee215b9aa2fe37b435e404aad8bb07c6ce1836d;p=ghc-hetmet.git

Print warnings after doMkDependHS
We weren't printing any warning for a commandline like
    ghc -M Foo.hs -optdep--exclude-module=Bar -fffi
but the last 2 flags are both deprecated.
---

diff --git a/ghc/Main.hs b/ghc/Main.hs
index 5a2ebc9..2a9742d 100644
--- a/ghc/Main.hs
+++ b/ghc/Main.hs
@@ -208,7 +208,8 @@ main' postLoadMode dflags0 args flagWarnings = do
     case postLoadMode of
        ShowInterface f        -> liftIO $ doShowIface dflags3 f
        DoMake                 -> doMake srcs
-       DoMkDependHS           -> doMkDependHS (map fst srcs)
+       DoMkDependHS           -> do doMkDependHS (map fst srcs)
+                                    GHC.printWarnings
        StopBefore p           -> oneShot hsc_env p srcs >> GHC.printWarnings
        DoInteractive          -> interactiveUI srcs Nothing
        DoEval exprs           -> interactiveUI srcs $ Just $ reverse exprs