mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-06 04:00:26 +02:00
Code Activity

Fix bof returning blocks from the evacuation target list to empties

Browse source
This commit is contained in:
Andy Wingo 2025-05-22 16:15:31 +02:00
parent 1d157a133d
commit 6d5e7c9b60
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/nofl-space.h
View file

@ -1840,7 +1840,7 @@ nofl_space_shrink(struct nofl_space *space, size_t bytes) {
size_t active = nofl_active_block_count(space);
size_t target = space->evacuation_minimum_reserve * active;
ssize_t avail = nofl_block_count(&space->evacuation_targets);
while (avail > target && pending > 0) {
while (avail-- > target && pending > 0) {
struct nofl_block_ref block =
nofl_block_list_pop(&space->evacuation_targets);
GC_ASSERT(!nofl_block_is_null(block));