diff --git a/ghc/runtime/main/StgStartup.lhc b/ghc/runtime/main/StgStartup.lhc index d37d7354b42ed3f59c79c0f355e8ec90f07f616c..44ce07b006e305813cb69d6548ee1b26f6fc7b95 100644 --- a/ghc/runtime/main/StgStartup.lhc +++ b/ghc/runtime/main/StgStartup.lhc @@ -197,9 +197,9 @@ SET_STATIC_HDR(EmptySPTable_closure,EmptyStablePointerTable_info,CC_SUBSUMED,,ED the following symbols may be referenced in an object file, but never entered */ -P_ GHC_void_closure = (P_) 0xbadbadbaL; -P_ GHC_ZcCCallable_static_info = (P_) 0xbadbadbaL; -P_ GHC_ZcCReturnable_static_info = (P_) 0xbadbadbaL; +P_ PrelGHC_void_closure = (P_) 0xbadbadbaL; +P_ PrelGHC_ZcCCallable_static_info = (P_) 0xbadbadbaL; +P_ PrelGHC_ZcCReturnable_static_info = (P_) 0xbadbadbaL; /* the IoWorld token to start the whole thing off */ /* Question: this is just an amusing hex code isn't it @@ -631,14 +631,7 @@ END_REGISTER_CCS() /* _regPrelude is above */ -START_REGISTER_PRELUDE(_regGHCbase); -END_REGISTER_CCS() - -/* OLD: START_REGISTER_PRELUDE(_regGHCerr); */ -START_REGISTER_PRELUDE(_regGHC); -END_REGISTER_CCS() - -START_REGISTER_PRELUDE(_regPreludeGlaST); +START_REGISTER_PRELUDE(_regPrelGHC); END_REGISTER_CCS() #endif