[commit: ghc] master: Comment out a leftover pprTrace (a5b7ee5)

[Gabor Greif]

Repository : http://darcs.haskell.org/ghc.git/

On branch  : master

https://github.com/ghc/ghc/commit/a5b7ee5fc26ac322e7dc79de96e478cde819640c

>---------------------------------------------------------------

commit a5b7ee5fc26ac322e7dc79de96e478cde819640c
Author: Gabor Greif <ggreif at gmail.com>
Date:   Wed Jul 3 22:56:23 2013 +0200

    Comment out a leftover pprTrace

>---------------------------------------------------------------

 compiler/stranal/DmdAnal.lhs | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/compiler/stranal/DmdAnal.lhs b/compiler/stranal/DmdAnal.lhs
index 572a39d..0aff8ff 100644
--- a/compiler/stranal/DmdAnal.lhs
+++ b/compiler/stranal/DmdAnal.lhs
@@ -26,7 +26,7 @@ import Data.List
 import DataCon
 import Id
 import CoreUtils	( exprIsHNF, exprType, exprIsTrivial )
-import PprCore	
+-- import PprCore	
 import TyCon
 import Type		( eqType )
 -- import Pair
@@ -536,12 +536,12 @@ dmdFix top_lvl env orig_pairs
 		-- iteration of sigs.
 
       | n >= 10
-      = pprTrace "dmdFix loop" (ppr n <+> (vcat 
-			[ text "Sigs:" <+> ppr [ (id,lookupVarEnv (sigEnv env) id, 
-                                                     lookupVarEnv (sigEnv env') id) 
-                                               | (id,_) <- pairs],
-			  text "env:" <+> ppr env,
-			  text "binds:" <+> pprCoreBinding (Rec pairs)]))
+      = -- pprTrace "dmdFix loop" (ppr n <+> (vcat 
+        --                 [ text "Sigs:" <+> ppr [ (id,lookupVarEnv (sigEnv env) id, 
+        --                                              lookupVarEnv (sigEnv env') id) 
+        --                                          | (id,_) <- pairs],
+        --                   text "env:" <+> ppr env,
+        --                   text "binds:" <+> pprCoreBinding (Rec pairs)]))
 	(env, lazy_fv, orig_pairs)	-- Safe output
 		-- The lazy_fv part is really important!  orig_pairs has no strictness
 		-- info, including nothing about free vars.  But if we have