mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-15 10:10:21 +02:00
Code Activity

mark-sweep: mutator data structure separate from heap

Browse source 
This will allow thread-local allocation buffers.
This commit is contained in:
Andy Wingo 2022-03-29 08:36:24 +02:00
parent 61d38e4205
commit 2401732e31
1 changed files with 10 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

17
mark-sweep.h
View file

@ -116,12 +116,12 @@ struct context {
struct mark_space { struct context cx; };
struct heap { struct mark_space mark_space; };
struct mutator {
struct heap heap;
struct heap *heap;
struct handle *roots;
};
static inline struct heap* mutator_heap(struct mutator *mut) {
return &mut->heap;
return mut->heap;
}
static inline struct mark_space* heap_mark_space(struct heap *heap) {
return &heap->mark_space;
@ -472,11 +472,9 @@ static int initialize_gc(size_t size, struct heap **heap,
return 0;
}
*mut = calloc(1, sizeof(struct mutator));
if (!*mut) abort();
(*mut)->roots = NULL;
*heap = mutator_heap(*mut);
struct mark_space *space = mutator_mark_space(*mut);
*heap = calloc(1, sizeof(struct heap));
if (!*heap) abort();
struct mark_space *space = heap_mark_space(*heap);
struct context *cx = &space->cx;
cx->mem = mem;
@ -501,6 +499,11 @@ static int initialize_gc(size_t size, struct heap **heap,
abort();
reclaim(cx, (void*)cx->heap_base, size_to_granules(cx->heap_size));
*mut = calloc(1, sizeof(struct mutator));
if (!*mut) abort();
(*mut)->heap = *heap;
(*mut)->roots = NULL;
return 1;
}