Emit 'linking not required' messages only with -v 2 or above.

[ghc-hetmet.git] / compiler / main / DriverPipeline.hs

diff --git a/compiler/main/DriverPipeline.hs b/compiler/main/DriverPipeline.hs
index e20bc56..a39ca38 100644 (file)
--- a/compiler/main/DriverPipeline.hs
+++ b/compiler/main/DriverPipeline.hs
@@ -302,7 +302,7 @@ link BatchCompile dflags batch_attempt_linking hpt
                        any (t <) (map linkableTime linkables)
 
        if dopt Opt_RecompChecking dflags && not linking_needed
-          then do debugTraceMsg dflags 1 (text exe_file <+> ptext SLIT("is up to date, linking not required."))
+          then do debugTraceMsg dflags 2 (text exe_file <+> ptext SLIT("is up to date, linking not required."))
                   return Succeeded
           else do