diff options
author | Ben Gamari <ben@smart-cactus.org> | 2023-03-25 23:39:01 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2023-03-25 23:39:01 -0400 |
commit | b9e7a8e0a248ab433633b9751fcbaef9ce51c159 (patch) | |
tree | 8bc730878ac3ed98cb959838735edf642c8f2bf7 | |
parent | 318ea2e411fef8bd2674e74b0ff1454c14713fd4 (diff) | |
download | haskell-wip/rts-warnings.tar.gz |
hihiwip/rts-warnings
-rw-r--r-- | rts/sm/NonMovingMark.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/rts/sm/NonMovingMark.c b/rts/sm/NonMovingMark.c index 26ccdc397d..c7066424f3 100644 --- a/rts/sm/NonMovingMark.c +++ b/rts/sm/NonMovingMark.c @@ -39,9 +39,7 @@ static void trace_PAP_payload (MarkQueue *queue, StgClosure *fun, StgClosure **payload, StgWord size); -#if defined(DEBUG) static bool is_nonmoving_weak(StgWeak *weak); -#endif // How many Array# entries to add to the mark queue at once? #define MARK_ARRAY_CHUNK_LENGTH 128 @@ -1968,7 +1966,6 @@ void nonmovingMarkWeakPtrList (struct MarkQueue_ *queue) // Determine whether a weak pointer object is on one of the nonmoving // collector's weak pointer lists. Used for sanity checking. -#if defined(DEBUG) static bool is_nonmoving_weak(StgWeak *weak) { for (StgWeak *w = nonmoving_old_weak_ptr_list; w != NULL; w = w->link) { @@ -1979,7 +1976,6 @@ static bool is_nonmoving_weak(StgWeak *weak) } return false; } -#endif // Non-moving heap variant of `tidyWeakList` bool nonmovingTidyWeaks (struct MarkQueue_ *queue) |