diff --git a/ghc/runtime/main/StgStartup.lhc b/ghc/runtime/main/StgStartup.lhc index 30b29a85490455a6ee5ae6f1966336b71b2c7b86..d37d7354b42ed3f59c79c0f355e8ec90f07f616c 100644 --- a/ghc/runtime/main/StgStartup.lhc +++ b/ghc/runtime/main/StgStartup.lhc @@ -193,12 +193,18 @@ SET_STATIC_HDR(EmptySPTable_closure,EmptyStablePointerTable_info,CC_SUBSUMED,,ED /* End of SP stuff */ #endif /* !PAR */ +/* Not a natural home for these, but + 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; /* the IoWorld token to start the whole thing off */ /* Question: this is just an amusing hex code isn't it -- or does it mean something? ADR */ P_ realWorldZh_closure = (P_) 0xbadbadbaL; -P_ GHC_void_closure = (P_) 0xbadbadbaL; #ifndef CONCURRENT