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 sense of "large_object_space_is_copied".

Browse source 
* src/large-object-space.h (large_object_space_is_copied): I don't
understand why or how it was like it was!
This commit is contained in:
Andy Wingo 2024-10-01 13:18:15 +02:00
parent 8e1574491a
commit 4aa5d04f08
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

@ -145,7 +145,7 @@ static int large_object_space_is_copied(struct large_object_space *space,
int copied = 0; int copied = 0;
uintptr_t addr = gc_ref_value(ref); uintptr_t addr = gc_ref_value(ref);
pthread_mutex_lock(&space->lock); pthread_mutex_lock(&space->lock);
copied = address_set_contains(&space->from_space, addr); copied = address_set_contains(&space->to_space, addr);
pthread_mutex_unlock(&space->lock); pthread_mutex_unlock(&space->lock);
return copied; return copied;
} }