[commit: ghc] master: Remove debugging output (#8356) (eaa4682)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/eaa4682b68348eb3b49a0bf2700abc58be820555/ghc

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

commit eaa4682b68348eb3b49a0bf2700abc58be820555
Author: Krzysztof Gogolewski <krz.gogolewski at gmail.com>
Date:   Fri Nov 1 12:36:28 2013 +0100

    Remove debugging output (#8356)


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

eaa4682b68348eb3b49a0bf2700abc58be820555
 compiler/types/FunDeps.lhs |    3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/compiler/types/FunDeps.lhs b/compiler/types/FunDeps.lhs
index bd0f7d7..c91a293 100644
--- a/compiler/types/FunDeps.lhs
+++ b/compiler/types/FunDeps.lhs
@@ -466,8 +466,7 @@ checkInstCoverage be_liberal clas theta inst_taus
        | if be_liberal then liberal_ok else conservative_ok
        = Nothing
        | otherwise
-       = pprTrace "cic" (vcat [ppr clas <+> ppr inst_taus, ppr fd, ppr ls_tvs, ppr rs_tvs, ppr (oclose theta ls_tvs), ppr theta]) $
-         Just msg
+       = Just msg
        where
          (ls,rs) = instFD fd tyvars inst_taus
          ls_tvs = closeOverKinds (tyVarsOfTypes ls)  -- See Note [Closing over kinds in coverage]