From 2e9f2703b7509ff565061c2cd8f38eb8da2abcd3 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 3 Oct 2001 08:16:49 +0000
Subject: [PATCH] [project @ 2001-10-03 08:16:49 by simonmar] Don't print the
 "compilation IS NOT required" in quiet mode (-v0).

---
 ghc/compiler/main/HscMain.lhs |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ghc/compiler/main/HscMain.lhs b/ghc/compiler/main/HscMain.lhs
index e9851e6..5da7b8d 100644
--- a/ghc/compiler/main/HscMain.lhs
+++ b/ghc/compiler/main/HscMain.lhs
@@ -161,7 +161,8 @@ hscNoRecomp ghci_mode dflags have_object
 	    mod location (Just old_iface) hst hit pcs_ch
  | ghci_mode == OneShot
  = do {
-      hPutStrLn stderr "compilation IS NOT required";
+      when (verbosity dflags > 0) $
+	  hPutStrLn stderr "compilation IS NOT required";
       let { bomb = panic "hscNoRecomp:OneShot" };
       return (HscNoRecomp pcs_ch bomb bomb)
       }
-- 
1.7.10.4