X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FGHC.hs;h=c25a617be92e64c5c6e7cd1625e22d21d0b815f3;hb=d78d04173296841b5949ebce640f444dcfb026f2;hp=be47c76a460bab0bbb9b092f9f1e6aff22f939f0;hpb=ee565d464248078a4f2d46f98667aa4fcdc56db4;p=ghc-hetmet.git

diff --git a/compiler/main/GHC.hs b/compiler/main/GHC.hs
index be47c76..c25a617 100644
--- a/compiler/main/GHC.hs
+++ b/compiler/main/GHC.hs
@@ -109,7 +109,8 @@ module GHC (
 	TyCon, 
 	tyConTyVars, tyConDataCons, tyConArity,
 	isClassTyCon, isSynTyCon, isNewTyCon, isPrimTyCon, isFunTyCon,
-	synTyConDefn, synTyConRhs,
+	isOpenTyCon,
+	synTyConDefn, synTyConType, synTyConResKind,
 
 	-- ** Type variables
 	TyVar,
@@ -203,8 +204,9 @@ import Id		( Id, idType, isImplicitId, isDeadBinder,
 import Var		( TyVar )
 import TysPrim		( alphaTyVars )
 import TyCon		( TyCon, isClassTyCon, isSynTyCon, isNewTyCon,
-			  isPrimTyCon, isFunTyCon, tyConArity,
-			  tyConTyVars, tyConDataCons, synTyConDefn, synTyConRhs )
+			  isPrimTyCon, isFunTyCon, isOpenTyCon, tyConArity,
+			  tyConTyVars, tyConDataCons, synTyConDefn,
+			  synTyConType, synTyConResKind )
 import Class		( Class, classSCTheta, classTvsFds, classMethods )
 import FunDeps		( pprFundeps )
 import DataCon		( DataCon, dataConWrapId, dataConSig, dataConTyCon,