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

Merge remote-tracking branch 'whippet/main' into wip-whippet

Browse source
This commit is contained in:
Andy Wingo 2025-05-04 12:11:13 +02:00
commit fd921be76c
5 changed files with 29 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
libguile/whippet/src/mmc.c
View file

@ -844,6 +844,13 @@ gc_collect(struct gc_mutator *mut, enum gc_collection_kind kind) {
trigger_collection(mut, kind);
}
int
gc_heap_contains(struct gc_heap *heap, struct gc_ref ref) {
GC_ASSERT(gc_ref_is_heap_object(ref));
return nofl_space_contains(heap_nofl_space(heap), ref)
|| large_object_space_contains(heap_large_object_space(heap), ref);
}
int*
gc_safepoint_flag_loc(struct gc_mutator *mut) {
return &mutator_heap(mut)->collecting;