[project @ 1996-04-07 15:41:24 by partain]

[ghc-hetmet.git] / ghc / compiler / prelude / PrelLoop.lhi

diff --git a/ghc/compiler/prelude/PrelLoop.lhi b/ghc/compiler/prelude/PrelLoop.lhi
index 2293431..9d17859 100644 (file)
--- a/ghc/compiler/prelude/PrelLoop.lhi
+++ b/ghc/compiler/prelude/PrelLoop.lhi
@@ -8,18 +8,18 @@ import PreludePS      ( _PackedString )
 import Class           ( GenClass )
 import CoreUnfold      ( mkMagicUnfolding, UnfoldingDetails )
 import IdUtils         ( primOpNameInfo )
-import Name            ( Name )
-import NameTypes       ( mkPreludeCoreName, FullName )
+import Name            ( Name, mkBuiltinName )
 import PrimOp          ( PrimOp )
+import RnHsSyn         ( RnName )
 import Type            ( mkSigmaTy, mkFunTys, GenType )
 import TyVar           ( GenTyVar )
 import Unique          ( Unique )
 import Usage           ( GenUsage )
 
 mkMagicUnfolding :: Unique -> UnfoldingDetails
-mkPreludeCoreName :: _PackedString -> _PackedString -> FullName
+mkBuiltinName :: Unique -> _PackedString -> _PackedString -> Name
 mkSigmaTy :: [a] -> [(GenClass (GenTyVar (GenUsage Unique)) Unique, GenType a b)] -> GenType a b -> GenType a b
 mkFunTys :: [GenType a b] -> GenType a b -> GenType a b
 
-primOpNameInfo :: PrimOp -> (_PackedString, Name)
+primOpNameInfo :: PrimOp -> (_PackedString, RnName)
 \end{code}