Commit 15dc80ea authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Nuke tc-trace that makes the typechecker loop

The trace was being over-eager, which disturbs the typecheckers
careful knot-tying
parent 3462534c
......@@ -306,7 +306,6 @@ tcCheckHsTypeAndGen :: HsType Name -> Kind -> TcM Type
tcCheckHsTypeAndGen hs_ty kind
= do { ty <- tc_hs_type hs_ty (EK kind expectedKindMsg)
; traceTc "tcCheckHsTypeAndGen" (ppr hs_ty)
; traceTc "tcCheckHsTypeAndGen" (ppr ty)
; kvs <- zonkTcTypeAndFV ty
; kvs <- kindGeneralize kvs
; return (mkForAllTys kvs ty) }
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment