mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-19 19:20:23 +02:00
Code Activity

gc_init takes const gc_options

Browse source
This commit is contained in:
Andy Wingo 2023-02-28 09:27:59 +01:00
parent 8edfd42ca1
commit c42c538aaa
4 changed files with 7 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

4
whippet.c
View file

@ -2258,7 +2258,7 @@ int gc_options_parse_and_set(struct gc_options *options, int option,
return gc_common_options_parse_and_set(&options->common, option, value);
}
static int heap_init(struct gc_heap *heap, struct gc_options *options) {
static int heap_init(struct gc_heap *heap, const struct gc_options *options) {
// *heap is already initialized to 0.
pthread_mutex_init(&heap->lock, NULL);
@ -2316,7 +2316,7 @@ static int mark_space_init(struct mark_space *space, struct gc_heap *heap) {
return 1;
}
int gc_init(struct gc_options *options, struct gc_stack_addr *stack_base,
int gc_init(const struct gc_options *options, struct gc_stack_addr *stack_base,
struct gc_heap **heap, struct gc_mutator **mut) {
GC_ASSERT_EQ(gc_allocator_small_granule_size(), GRANULE_SIZE);
GC_ASSERT_EQ(gc_allocator_large_threshold(), LARGE_OBJECT_THRESHOLD);