Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/c1ea823c02c3f4cc675c188e2b41acfe66e16a98 >--------------------------------------------------------------- commit c1ea823c02c3f4cc675c188e2b41acfe66e16a98 Author: Simon Peyton Jones <[email protected]> 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 _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
