summaryrefslogtreecommitdiff
path: root/rts/HeapStackCheck.cmm
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2017-04-21 09:16:48 -0400
committerBen Gamari <ben@smart-cactus.org>2017-04-28 22:35:04 -0400
commit945c45ad50ed31e3acb96fdaafb21640c4669f12 (patch)
treeae2e59ba8d3a49bbd3c3dcece39d53aef691ed44 /rts/HeapStackCheck.cmm
parente5b3492f23c2296d0d8221e1787ee585331f726e (diff)
downloadhaskell-945c45ad50ed31e3acb96fdaafb21640c4669f12.tar.gz
Prefer #if defined to #ifdef
Our new CPP linter enforces this.
Diffstat (limited to 'rts/HeapStackCheck.cmm')
-rw-r--r--rts/HeapStackCheck.cmm10
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 ()
{