[project @ 1996-07-15 16:16:46 by partain]
[ghc-hetmet.git] / ghc / compiler / prelude / PrelLoop.lhi
index 5f6b5e9..acf9a4e 100644 (file)
@@ -6,7 +6,7 @@ interface PrelLoop where
 import PreludePS       ( _PackedString )
 
 import Class           ( GenClass )
-import CoreUnfold      ( mkMagicUnfolding, UnfoldingDetails )
+import CoreUnfold      ( mkMagicUnfolding, Unfolding )
 import IdUtils         ( primOpNameInfo )
 import Name            ( Name, OrigName, mkPrimitiveName, mkWiredInName, ExportFlag )
 import PrimOp          ( PrimOp )
@@ -16,7 +16,7 @@ import TyVar          ( GenTyVar )
 import Unique          ( Unique )
 import Usage           ( GenUsage )
 
-mkMagicUnfolding :: Unique -> UnfoldingDetails
+mkMagicUnfolding :: Unique -> Unfolding
 mkPrimitiveName :: Unique -> OrigName -> Name
 mkWiredInName :: Unique -> OrigName -> ExportFlag -> Name
 mkSigmaTy :: [a] -> [(GenClass (GenTyVar (GenUsage Unique)) Unique, GenType a b)] -> GenType a b -> GenType a b