X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FPrelude.h;fp=rts%2FPrelude.h;h=f237e59beafca6e6eb941be001ac845f9b3689d5;hp=31fe136d36da2de05e40d32f317fd0d518f6e0dc;hb=fcf6b22d0478be20e27c2245f3e34dd272e12522;hpb=7f0471be1cfe0ef6110ef7fdd8132d85387d0b21 diff --git a/rts/Prelude.h b/rts/Prelude.h index 31fe136..f237e59 100644 --- a/rts/Prelude.h +++ b/rts/Prelude.h @@ -24,8 +24,8 @@ * modules these names are defined in. */ -PRELUDE_CLOSURE(base_GHCziBase_True_closure); -PRELUDE_CLOSURE(base_GHCziBase_False_closure); +PRELUDE_CLOSURE(ghczmprim_GHCziBool_True_closure); +PRELUDE_CLOSURE(ghczmprim_GHCziBool_False_closure); PRELUDE_CLOSURE(base_GHCziPack_unpackCString_closure); PRELUDE_CLOSURE(base_GHCziWeak_runFinalizzerBatch_closure); @@ -79,8 +79,8 @@ PRELUDE_INFO(base_GHCziWord_W64zh_con_info); PRELUDE_INFO(base_GHCziStable_StablePtr_static_info); PRELUDE_INFO(base_GHCziStable_StablePtr_con_info); -#define True_closure DLL_IMPORT_DATA_REF(base_GHCziBase_True_closure) -#define False_closure DLL_IMPORT_DATA_REF(base_GHCziBase_False_closure) +#define True_closure DLL_IMPORT_DATA_REF(ghczmprim_GHCziBool_True_closure) +#define False_closure DLL_IMPORT_DATA_REF(ghczmprim_GHCziBool_False_closure) #define unpackCString_closure DLL_IMPORT_DATA_REF(base_GHCziPack_unpackCString_closure) #define runFinalizerBatch_closure DLL_IMPORT_DATA_REF(base_GHCziWeak_runFinalizzerBatch_closure) #define mainIO_closure (&ZCMain_main_closure)