X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypecheck%2FTcUnify.lhs-boot;h=4d385b123cd6e3f6d9ec491b1921c264f5a92e43;hb=4c6a3f787abcaed009a574196d82237d9ae64fc8;hp=b39573e0766660feee35422fb32f22088e27712e;hpb=ad192ab08564152e226535c179778a896598eac2;p=ghc-hetmet.git diff --git a/compiler/typecheck/TcUnify.lhs-boot b/compiler/typecheck/TcUnify.lhs-boot index b39573e..4d385b1 100644 --- a/compiler/typecheck/TcUnify.lhs-boot +++ b/compiler/typecheck/TcUnify.lhs-boot @@ -1,11 +1,13 @@ \begin{code} module TcUnify where -import TcType ( TcTauType, BoxySigmaType ) +import TcType ( TcTauType, BoxySigmaType, BoxyType ) import TcRnTypes( TcM ) +import Coercion (CoercionI) -- This boot file exists only to tie the knot between -- TcUnify and TcSimplify -unifyType :: TcTauType -> TcTauType -> TcM () +unifyType :: TcTauType -> TcTauType -> TcM CoercionI +boxyUnify :: BoxyType -> BoxyType -> TcM CoercionI zapToMonotype :: BoxySigmaType -> TcM TcTauType \end{code}