1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-28 05:50:30 +02:00

gpcc: Temporarily always promote survivors

Generational PCC is still a bit buggy.
This commit is contained in:
Andy Wingo 2025-01-10 16:39:39 +01:00
parent 4ab72e92b0
commit 27f9a1f01e

View file

@ -324,7 +324,7 @@ static inline int do_minor_trace(struct gc_heap *heap, struct gc_edge edge,
// However however, it is hard to distinguish between edges from promoted // However however, it is hard to distinguish between edges from promoted
// objects and edges from old objects, so we mostly just rely on an // objects and edges from old objects, so we mostly just rely on an
// idempotent "log if unlogged" operation instead. // idempotent "log if unlogged" operation instead.
int promote = copy_space_should_promote(new_space, ref); int promote = copy_space_should_promote(new_space, ref) || 1;
struct copy_space *dst_space = promote ? old_space : new_space; struct copy_space *dst_space = promote ? old_space : new_space;
struct copy_space_allocator *alloc = promote struct copy_space_allocator *alloc = promote
? trace_worker_old_space_allocator(data) ? trace_worker_old_space_allocator(data)