[commit: ghc] master: Remove debug trace (3e904ff)
Simon Peyton Jones
simonpj at microsoft.com
Fri Mar 16 15:27:34 CET 2012
Repository : ssh://darcs.haskell.org//srv/darcs/ghc
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/3e904ffc0b8a5ed2f9538dac5276076f7e27b981
>---------------------------------------------------------------
commit 3e904ffc0b8a5ed2f9538dac5276076f7e27b981
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Wed Mar 14 13:30:25 2012 +0000
Remove debug trace
>---------------------------------------------------------------
compiler/types/FamInstEnv.lhs | 1 -
1 files changed, 0 insertions(+), 1 deletions(-)
diff --git a/compiler/types/FamInstEnv.lhs b/compiler/types/FamInstEnv.lhs
index 3c85395..cc50ed6 100644
--- a/compiler/types/FamInstEnv.lhs
+++ b/compiler/types/FamInstEnv.lhs
@@ -414,7 +414,6 @@ lookupFamInstEnvConflicts envs fam_inst skol_tvs
(ppr tpl_tvs <+> ppr tpl_tys) )
-- Unification will break badly if the variables overlap
-- They shouldn't because we allocate separate uniques for them
- pprTrace "tcUnifyTys" (ppr tpl_tys $$ ppr match_tys $$ ppr fam_inst) $
case tcUnifyTys instanceBindFun tpl_tys match_tys of
Just subst | conflicting old_fam_inst subst -> Just subst
_other -> Nothing
More information about the Cvs-ghc
mailing list