X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Ftypecheck%2FTcUnify.lhs-boot;h=4d385b123cd6e3f6d9ec491b1921c264f5a92e43;hp=b39573e0766660feee35422fb32f22088e27712e;hb=5822cb8d13aa3c05d2b46b4510c13d94b902eb21;hpb=db14f9df7f2f62039af85ac75ac59a4e22d09787

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}