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

Fix bug in mmc for new lospace locking discipline

Browse source
This commit is contained in:
Andy Wingo 2025-01-23 15:19:09 +01:00
parent 7a9de35aaa
commit 2c72034a1c
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/mmc.c
View file

@ -134,7 +134,7 @@ do_trace(struct gc_heap *heap, struct gc_edge edge, struct gc_ref ref,
if (GC_LIKELY(nofl_space_contains(heap_nofl_space(heap), ref))) if (GC_LIKELY(nofl_space_contains(heap_nofl_space(heap), ref)))
return nofl_space_evacuate_or_mark_object(heap_nofl_space(heap), edge, ref, return nofl_space_evacuate_or_mark_object(heap_nofl_space(heap), edge, ref,
&data->allocator); &data->allocator);
else if (large_object_space_contains(heap_large_object_space(heap), ref)) else if (large_object_space_contains_with_lock(heap_large_object_space(heap), ref))
return large_object_space_mark(heap_large_object_space(heap), ref); return large_object_space_mark(heap_large_object_space(heap), ref);
else else
return gc_extern_space_visit(heap_extern_space(heap), edge, ref); return gc_extern_space_visit(heap_extern_space(heap), edge, ref);