diff options
| author | Shea Levy <shea@shealevy.com> | 2016-12-13 14:53:50 -0500 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2016-12-13 15:38:32 -0500 |
| commit | cb582b6476f64c1c86d89dce4d78462581fd2a6f (patch) | |
| tree | b66900e7724c3be8b51f3b03508c50c0b0226d01 /includes/rts | |
| parent | cc2e3ec06ce5ac979ff2ecf453ad85b0e5ff326d (diff) | |
| download | haskell-cb582b6476f64c1c86d89dce4d78462581fd2a6f.tar.gz | |
Don't have CPP macros expanding to 'defined'.
Reviewers: austin, simonmar, erikd, bgamari
Reviewed By: erikd, bgamari
Subscribers: angerman, thomie
Differential Revision: https://phabricator.haskell.org/D2823
Diffstat (limited to 'includes/rts')
| -rw-r--r-- | includes/rts/storage/ClosureMacros.h | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/includes/rts/storage/ClosureMacros.h b/includes/rts/storage/ClosureMacros.h index 90198f20e8..c8c270fdfe 100644 --- a/includes/rts/storage/ClosureMacros.h +++ b/includes/rts/storage/ClosureMacros.h @@ -520,8 +520,17 @@ INLINE_HEADER StgWord8 *mutArrPtrsCard (StgMutArrPtrs *a, W_ n) -------------------------------------------------------------------------- */ -#define ZERO_SLOP_FOR_LDV_PROF (defined(PROFILING)) -#define ZERO_SLOP_FOR_SANITY_CHECK (defined(DEBUG) && !defined(THREADED_RTS)) +#if defined(PROFILING) +#define ZERO_SLOP_FOR_LDV_PROF 1 +#else +#define ZERO_SLOP_FOR_LDV_PROF 0 +#endif + +#if defined(DEBUG) && !defined(THREADED_RTS) +#define ZERO_SLOP_FOR_SANITY_CHECK 1 +#else +#define ZERO_SLOP_FOR_SANITY_CHECK 0 +#endif #if ZERO_SLOP_FOR_LDV_PROF || ZERO_SLOP_FOR_SANITY_CHECK #define OVERWRITING_CLOSURE(c) overwritingClosure(c) |