From: Don Stewart <dons@cse.unsw.edu.au>
Date: Sat, 10 Jun 2006 14:57:13 +0000 (+0000)
Subject: Don't emit 'Skipping' messages unless -v2 or higher is on
X-Git-Tag: Before_FC_branch_merge~396
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=01a5114380c0b04ce0f3f3e9563de8ed02ebe0d3;p=ghc-hetmet.git

Don't emit 'Skipping' messages unless -v2 or higher is on

Following GNU make, this patch makes GHC not emit messages about modules
its skipping. This makes builds much quieter, and its a lot easier to
work out what effects a change had on the code.

The current behaviour can be recovered with -v2
---

diff --git a/compiler/main/HscMain.lhs b/compiler/main/HscMain.lhs
index fdad852..d5d920d 100644
--- a/compiler/main/HscMain.lhs
+++ b/compiler/main/HscMain.lhs
@@ -397,9 +397,9 @@ batchMsg mb_mod_index recomp
          liftIO $ do
          if recomp
             then showMsg "Compiling "
-            else showMsg "Skipping  "
-
-
+            else if verbosity (hsc_dflags hsc_env) >= 2
+                    then showMsg "Skipping  "
+                    else return ()
 
 --------------------------------------------------------------
 -- FrontEnds