[project @ 2003-02-12 15:01:31 by simonpj]

[ghc-hetmet.git] / ghc / compiler / prelude / PrelInfo.lhs

diff --git a/ghc/compiler/prelude/PrelInfo.lhs b/ghc/compiler/prelude/PrelInfo.lhs
index 92c898b..9e28920 100644 (file)
--- a/ghc/compiler/prelude/PrelInfo.lhs
+++ b/ghc/compiler/prelude/PrelInfo.lhs
@@ -47,7 +47,7 @@ import OccName                ( mkVarOcc )
 import TysPrim         ( primTyCons )
 import TysWiredIn      ( wiredInTyCons )
 import RdrHsSyn                ( mkClassDecl )
-import HscTypes        ( TyThing(..), implicitTyThingIds, TypeEnv, mkTypeEnv,
+import HscTypes        ( TyThing(..), implicitTyThings, TypeEnv, mkTypeEnv,
                          GenAvailInfo(..), RdrAvailInfo )
 import Class           ( Class, classKey, className )
 import Type            ( funTyCon, openTypeKind, liftedTypeKind )
@@ -71,7 +71,7 @@ wiredInThings
   = concat
     [          -- Wired in TyCons and their implicit Ids
          tycon_things
-       , map AnId (implicitTyThingIds tycon_things)
+       , implicitTyThings tycon_things
 
                -- Wired in Ids
        , map AnId wiredInIds