From 9f7e3633c692dce75c27607131bd386178fb0fcf Mon Sep 17 00:00:00 2001
From: Herbert Valerio Riedel <hvr@gnu.org>
Date: Sat, 20 Sep 2014 21:23:28 +0200
Subject: Change linker message verbosity to `-v2` (re #7863)

With this change, the linker status logging output such as

    Loading package ghc-prim ... linking ... done.
    Loading package integer-gmp ... linking ... done.
    Loading package base ... linking ... done.

is suppressed unless verbosity level is `-v2` or higher. This is done
to reduce the compiler message noise when TH is involved, which can
reduce the visibiliy of compile warnings.

Reviewed By: ekmett, austin

Differential Revision: https://phabricator.haskell.org/D232
---
 compiler/ghci/Linker.lhs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'compiler')

diff --git a/compiler/ghci/Linker.lhs b/compiler/ghci/Linker.lhs
index 5b0251c54e..ecba45b0fa 100644
--- a/compiler/ghci/Linker.lhs
+++ b/compiler/ghci/Linker.lhs
@@ -1292,7 +1292,7 @@ findFile mk_file_path (dir : dirs)
 \begin{code}
 maybePutStr :: DynFlags -> String -> IO ()
 maybePutStr dflags s
-    = when (verbosity dflags > 0) $
+    = when (verbosity dflags > 1) $
           do let act = log_action dflags
              act dflags SevInteractive noSrcSpan defaultUserStyle (text s)
 
-- 
cgit v1.2.1