mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 11:50:28 +02:00
Code Activity

Fix race in large object space when counting live object pages

Browse source 
Embarrassing!
This commit is contained in:
Andy Wingo 2025-03-07 13:25:47 +01:00
parent ed5db9bc36
commit 3db1e48ea6
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/large-object-space.h
View file

@ -212,7 +212,7 @@ large_object_space_mark(struct large_object_space *space, struct gc_ref ref) {
memory_order_acquire)); memory_order_acquire));
size_t pages = node->key.size >> space->page_size_log2; size_t pages = node->key.size >> space->page_size_log2;
space->live_pages_at_last_collection += pages; atomic_fetch_add(&space->live_pages_at_last_collection, pages);
return 1; return 1;
} }