X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=ghc%2Fcompiler%2Fmain%2FGHC.hs;h=b5707c7886adc9b5681f068ef8f8e5cdfc2ed571;hp=e278626a426d6818eaaacf1c2503ec5355211f24;hb=ac10f8408520a30e8437496d320b8b86afda2e8f;hpb=479cc24837aa2c14c3bbed323bb640a5c53a2522

diff --git a/ghc/compiler/main/GHC.hs b/ghc/compiler/main/GHC.hs
index e278626..b5707c7 100644
--- a/ghc/compiler/main/GHC.hs
+++ b/ghc/compiler/main/GHC.hs
@@ -98,7 +98,7 @@ module GHC (
 	TyCon, 
 	tyConTyVars, tyConDataCons, tyConArity,
 	isClassTyCon, isSynTyCon, isNewTyCon, isPrimTyCon, isFunTyCon,
-	getSynTyConDefn,
+	synTyConDefn, synTyConRhs,
 
 	-- ** Type variables
 	TyVar,
@@ -192,7 +192,7 @@ import Var		( TyVar )
 import TysPrim		( alphaTyVars )
 import TyCon		( TyCon, isClassTyCon, isSynTyCon, isNewTyCon,
 			  isPrimTyCon, isFunTyCon, tyConArity,
-			  tyConTyVars, tyConDataCons, getSynTyConDefn )
+			  tyConTyVars, tyConDataCons, synTyConDefn, synTyConRhs )
 import Class		( Class, classSCTheta, classTvsFds, classMethods )
 import FunDeps		( pprFundeps )
 import DataCon		( DataCon, dataConWrapId, dataConSig, dataConTyCon,