\begin{code}
interface PrelLoop where
-import PreludePS ( _PackedString )
+--import PreludePS ( _PackedString )
+import FastString ( FastSring )
import Class ( GenClass )
-import CoreUnfold ( mkMagicUnfolding, UnfoldingDetails )
-import IdUtils ( primOpNameInfo )
-import Name ( Name, mkBuiltinName )
+import CoreUnfold ( mkMagicUnfolding, Unfolding )
+import IdUtils ( primOpName )
+import Name ( Name, ExportFlag )
import PrimOp ( PrimOp )
import RnHsSyn ( RnName )
-import Type ( mkSigmaTy, mkFunTys, GenType )
+import Type ( mkSigmaTy, mkFunTy, mkFunTys, GenType )
import TyVar ( GenTyVar )
import Unique ( Unique )
import Usage ( GenUsage )
-mkMagicUnfolding :: Unique -> UnfoldingDetails
-mkBuiltinName :: Unique -> _PackedString -> _PackedString -> Name
+mkMagicUnfolding :: Unique -> Unfolding
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
+mkFunTy :: GenType a b -> GenType a b -> GenType a b
-primOpNameInfo :: PrimOp -> (_PackedString, RnName)
+primOpName :: PrimOp -> Name
\end{code}