X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypes%2FUnify.lhs;h=bd9cde1c0b7fbab3ed293944e78c6479b3e98b9e;hb=9d787ef5a8072b6c1f576f2de1b66edfa59813ed;hp=97a54811e356ed2003361888cd8e03eaed3e9891;hpb=5c60f4ca21334fa8b6324423b70ae044e5ad5bf9;p=ghc-hetmet.git

diff --git a/ghc/compiler/types/Unify.lhs b/ghc/compiler/types/Unify.lhs
index 97a5481..bd9cde1 100644
--- a/ghc/compiler/types/Unify.lhs
+++ b/ghc/compiler/types/Unify.lhs
@@ -11,8 +11,9 @@ module Unify ( unifyTysX, unifyTyListsX,
 	       match, matchTy, matchTys
   ) where 
 
-import Type	( Type(..), funTyCon, typeKind, tyVarsOfType,
-		  splitAppTy_maybe
+import TypeRep	( Type(..), funTyCon
+		)  -- friend
+import Type	( typeKind, tyVarsOfType, splitAppTy_maybe
 		)
 
 import Var	( TyVar, tyVarKind )