X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Fcompiler%2Fstranal%2FSaLib.lhs;h=20501314da41e8beed8b1f3a2bc6ba563a6b5805;hb=26741ec416bae2c502ef00a2ba0e79050a32cb67;hp=f09e9c9a613363b360d7ef9d9d79fb65a4e16455;hpb=ae45ff0e9831a0dc862a5d68d03e355d7e323c62;p=ghc-hetmet.git

diff --git a/ghc/compiler/stranal/SaLib.lhs b/ghc/compiler/stranal/SaLib.lhs
index f09e9c9..2050131 100644
--- a/ghc/compiler/stranal/SaLib.lhs
+++ b/ghc/compiler/stranal/SaLib.lhs
@@ -11,8 +11,8 @@ See also: the ``library'' for the ``back end'' (@SaBackLib@).
 module SaLib (
 	AbsVal(..),
 	AnalysisKind(..),
-	AbsValEnv{-abstract-}, StrictEnv(..), AbsenceEnv(..),
-	StrAnalFlags(..), getStrAnalFlags,
+	AbsValEnv{-abstract-}, SYN_IE(StrictEnv), SYN_IE(AbsenceEnv),
+	SYN_IE(StrAnalFlags), getStrAnalFlags,
 	nullAbsValEnv, addOneToAbsValEnv, growAbsValEnvList,
 	lookupAbsValEnv,
 	absValFromStrictness
@@ -20,9 +20,9 @@ module SaLib (
 
 IMP_Ubiq(){-uitous-}
 
-import CoreSyn		( CoreExpr(..) )
+import CoreSyn		( SYN_IE(CoreExpr) )
 import Id		( nullIdEnv, addOneToIdEnv, growIdEnvList,
-			  lookupIdEnv, IdEnv(..),
+			  lookupIdEnv, SYN_IE(IdEnv),
 			  GenId{-instance Outputable-}
 			)
 import IdInfo		( StrictnessInfo(..), Demand{-instance Outputable-} )