diff options
Diffstat (limited to 'rts/HeapStackCheck.cmm')
| -rw-r--r-- | rts/HeapStackCheck.cmm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/rts/HeapStackCheck.cmm b/rts/HeapStackCheck.cmm index 9bfe37ebd4..001e5f6299 100644 --- a/rts/HeapStackCheck.cmm +++ b/rts/HeapStackCheck.cmm @@ -14,7 +14,7 @@ #include "Updates.h" #include "SMPClosureOps.h" -#ifdef __PIC__ +#if defined(__PIC__) import pthread_mutex_unlock; #endif import EnterCriticalSection; @@ -404,7 +404,7 @@ __stg_gc_fun /* explicit stack */ size = BITMAP_SIZE(StgFunInfoExtra_bitmap(info)); } else { if (type == ARG_GEN_BIG) { -#ifdef TABLES_NEXT_TO_CODE +#if defined(TABLES_NEXT_TO_CODE) // bitmap field holds an offset size = StgLargeBitmap_size( TO_W_(StgFunInfoExtraRev_bitmap_offset(info)) @@ -417,7 +417,7 @@ __stg_gc_fun /* explicit stack */ } } -#ifdef NO_ARG_REGS +#if defined(NO_ARG_REGS) // we don't have to save any registers away Sp_adj(-3); Sp(2) = R1; @@ -457,7 +457,7 @@ INFO_TABLE_RET ( stg_gc_fun, RET_FUN ) { R1 = Sp(2); Sp_adj(3); -#ifdef NO_ARG_REGS +#if defined(NO_ARG_REGS) // Minor optimisation: there are no argument registers to load up, // so we can just jump straight to the function's entry point. jump %GET_ENTRY(UNTAG(R1)) [R1]; @@ -647,7 +647,7 @@ stg_block_throwto (P_ tso, P_ exception) } } -#ifdef mingw32_HOST_OS +#if defined(mingw32_HOST_OS) INFO_TABLE_RET ( stg_block_async, RET_SMALL, W_ info_ptr, W_ ares ) return () { |