[commit: ghc] wip/T15155: WIP: remove tracing (cbcb171)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/T15155
Link       : http://ghc.haskell.org/trac/ghc/changeset/cbcb17110934dad751fb5005ba03dfb528bec340/ghc

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

commit cbcb17110934dad751fb5005ba03dfb528bec340
Author: Gabor Greif <ggreif at gmail.com>
Date:   Thu May 24 16:33:43 2018 +0200

    WIP: remove tracing


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

cbcb17110934dad751fb5005ba03dfb528bec340
 compiler/nativeGen/X86/Ppr.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/nativeGen/X86/Ppr.hs b/compiler/nativeGen/X86/Ppr.hs
index b5571bd..bcb7c78 100644
--- a/compiler/nativeGen/X86/Ppr.hs
+++ b/compiler/nativeGen/X86/Ppr.hs
@@ -155,7 +155,7 @@ pprDatas (_, Statics alias [CmmStaticLit lit@(CmmLabel lbl), CmmStaticLit ind, x
   , not $ externallyVisibleCLabel ind' -- trips ld64 otherwise
   , let equate = pprGloblDecl alias $$ text ".equiv" <+> ppr alias <> comma <> ppr (CmmLabel ind')
   = ASSERT( (case x of CmmStaticLit (CmmInt 0 _) -> True; _ -> False) && (case y of CmmStaticLit (CmmInt 0 _) -> True; _ -> False) )
-      pprTrace "IndStaticInfo: pprDatas" (ppr alias <+> ppr lit <+> ppr ind') equate
+      equate
 
 pprDatas (align, (Statics lbl dats))
  = vcat (pprAlign align : pprLabel lbl : map pprData dats)