mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-27 21:40:34 +02:00
Code Activity

Attempt to start creating a proper API

Browse source
This commit is contained in:
Andy Wingo 2022-08-09 09:49:51 +02:00
parent c824f17bd9
commit 2e6dde66b3
7 changed files with 87 additions and 45 deletions
Download patch file Download diff file Expand all files Collapse all files

3
parallel-tracer.h
View file

@ -471,7 +471,8 @@ tracer_visit(struct gc_edge edge, void *trace_data) {
if (trace_edge(trace->heap, edge)) {
if (local_trace_queue_full(&trace->local))
tracer_share(trace);
local_trace_queue_push(&trace->local, dereference_edge(edge));
local_trace_queue_push(&trace->local,
gc_ref_heap_object(gc_edge_ref(edge)));
}
}