summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--reclaim.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/reclaim.c b/reclaim.c
index f729f5d5..ac92e058 100644
--- a/reclaim.c
+++ b/reclaim.c
@@ -238,6 +238,7 @@ STATIC ptr_t GC_reclaim_uninit(struct hblk *hbp, hdr *hhdr, word sz,
while ((word)p <= (word)plim) {
int marked = mark_bit_from_hdr(hhdr, bit_no);
if (!marked && (*disclaim)(p)) {
+ set_mark_bit_from_hdr(hhdr, bit_no);
hhdr -> hb_n_marks++;
marked = 1;
}