[commit: ghc] master: Remove spurious debug print (d9d35d8)

Simon Peyton Jones simonpj at microsoft.com
Thu Apr 26 14:51:38 CEST 2012


Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/d9d35d8c5a74636b41eb0591b8abedb24080d8e3

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

commit d9d35d8c5a74636b41eb0591b8abedb24080d8e3
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Thu Apr 26 13:47:20 2012 +0100

    Remove spurious debug print

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

 compiler/deSugar/DsMeta.hs |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/compiler/deSugar/DsMeta.hs b/compiler/deSugar/DsMeta.hs
index 812a726..060b63d 100644
--- a/compiler/deSugar/DsMeta.hs
+++ b/compiler/deSugar/DsMeta.hs
@@ -117,7 +117,7 @@ repTopDs :: HsGroup Name -> DsM (Core (TH.Q [TH.Dec]))
 repTopDs group
  = do { let { tv_bndrs = hsSigTvBinders (hs_valds group)
             ; bndrs = tv_bndrs ++ hsGroupBinders group } ;
-	ss <- pprTrace "reptop" (ppr bndrs $$ ppr tv_bndrs) $ mkGenSyms bndrs ;
+	ss <- mkGenSyms bndrs ;
 
 	-- Bind all the names mainly to avoid repeated use of explicit strings.
 	-- Thus	we get





More information about the Cvs-ghc mailing list