summaryrefslogtreecommitdiff
path: root/rts/include/Cmm.h
diff options
context:
space:
mode:
Diffstat (limited to 'rts/include/Cmm.h')
-rw-r--r--rts/include/Cmm.h6
1 files changed, 3 insertions, 3 deletions
diff --git a/rts/include/Cmm.h b/rts/include/Cmm.h
index 94951bc9f8..55d201d94d 100644
--- a/rts/include/Cmm.h
+++ b/rts/include/Cmm.h
@@ -643,6 +643,9 @@
if (TO_W_(RtsFlags_ProfFlags_doHeapProfile(RtsFlags)) != 0) { foreign "C" overwritingMutableClosureOfs(c "ptr", off); }
#endif
+#define IS_STACK_CLEAN(stack) \
+ ((TO_W_(StgStack_dirty(stack)) & STACK_DIRTY) == 0)
+
// Memory barriers.
// For discussion of how these are used to fence heap object
// accesses see Note [Heap memory barriers] in SMP.h.
@@ -787,9 +790,6 @@
__gen = TO_W_(bdescr_gen_no(__bd)); \
if (__gen > 0) { recordMutableCap(__p, __gen); }
-/* -----------------------------------------------------------------------------
- Update remembered set write barrier
- -------------------------------------------------------------------------- */
/* -----------------------------------------------------------------------------
Arrays