From 0eb6439ecb6c5759f4e82e18442050b263f0c1e2 Mon Sep 17 00:00:00 2001
From: Simon Marlow <marlowsd@gmail.com>
Date: Thu, 25 Aug 2011 11:11:50 +0100
Subject: [PATCH] disable a debug trace

---
 compiler/cmm/CmmContFlowOpt.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/compiler/cmm/CmmContFlowOpt.hs b/compiler/cmm/CmmContFlowOpt.hs
index 0019213829..73ce57e93f 100644
--- a/compiler/cmm/CmmContFlowOpt.hs
+++ b/compiler/cmm/CmmContFlowOpt.hs
@@ -56,7 +56,8 @@ optProc _   top                  = top
 branchChainElim :: CmmGraph -> CmmGraph
 branchChainElim g
   | null lone_branch_blocks = g    -- No blocks to remove
-  | otherwise               = pprTrace "branchChainElim" (ppr forest) $ replaceLabels (mapFromList edges) g
+  | otherwise               = {- pprTrace "branchChainElim" (ppr forest) $ -}
+                              replaceLabels (mapFromList edges) g
   where
     blocks = toBlockList g
 
-- 
GitLab