From 68f77b1b56e1a837e2de517acbf479a21a37c296 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 2 Dec 1999 13:33:06 +0000
Subject: [PATCH] [project @ 1999-12-02 13:33:06 by simonmar] The infamous
 "NOTE: simplifier still going..." message is now protected
 by #ifdef DEBUG.  It doesn't mean much to the average user,
 and we tend to use DEBUG when hacking anyway.

---
 ghc/compiler/simplCore/SimplCore.lhs |    5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/ghc/compiler/simplCore/SimplCore.lhs b/ghc/compiler/simplCore/SimplCore.lhs
index 2356d85..b78ebc4 100644
--- a/ghc/compiler/simplCore/SimplCore.lhs
+++ b/ghc/compiler/simplCore/SimplCore.lhs
@@ -288,11 +288,14 @@ simplifyPgm (imported_rule_ids, rule_lhs_fvs)
 		-- Stop if we've run out of iterations
 	   if iteration_no == max_iterations then
 		do {
+#ifdef DEBUG
 		    if  max_iterations > 2 then
 			    hPutStr stderr ("NOTE: Simplifier still going after " ++ 
 				    show max_iterations ++ 
 				    " iterations; bailing out.\n")
-		    else return ();
+		    else 
+#endif
+			return ();
 
 		    return ("Simplifier baled out", iteration_no, all_counts, binds')
 		}
-- 
1.7.10.4