Commit f3fe518f authored by Camil Staps's avatar Camil Staps 🐧

Removing finalizers for keeping track of shared nodes, step 2a: remove...

Removing finalizers for keeping track of shared nodes, step 2a: remove finalizer handling from garbage collector
parent 6b66e323
Pipeline #13900 passed with stage
in 10 minutes and 4 seconds
......@@ -10,7 +10,6 @@
#ifdef LINK_CLEAN_RUNTIME
# include "../copy_interpreter_to_host.h"
# include "../finalizers.h"
#endif
int in_first_semispace = 1;
......@@ -48,6 +47,7 @@ BC_WORD *collect_copy(BC_WORD *stack, BC_WORD *asp, BC_WORD *heap, size_t heap_s
}
#ifdef LINK_CLEAN_RUNTIME
#if 0 // TODO
/* Pass 1b: reverse pointers on the A-stack */
# if (DEBUG_GARBAGE_COLLECTOR > 1)
fprintf(stderr, "Pass 1b: reverse pointers from the host\n");
......@@ -62,6 +62,7 @@ BC_WORD *collect_copy(BC_WORD *stack, BC_WORD *asp, BC_WORD *heap, size_t heap_s
*temp = (BC_WORD) (&finalizers->cur->arg) | 1;
}
#endif
#endif
#if (DEBUG_GARBAGE_COLLECTOR > 1)
fprintf(stderr, "Pass 2: copy nodes\n");
......
......@@ -7,7 +7,6 @@
#ifdef LINK_CLEAN_RUNTIME
# include "../copy_interpreter_to_host.h"
# include "../finalizers.h"
#endif
#define GREY_NODES_INITIAL 100
......@@ -150,9 +149,11 @@ void mark_a_stack(BC_WORD *stack, BC_WORD *asp, BC_WORD *heap, size_t heap_size,
#ifdef LINK_CLEAN_RUNTIME
void mark_host_references(BC_WORD *heap, size_t heap_size, struct nodes_set *set) {
#if 0 // TODO
struct finalizers *finalizers = NULL;
while ((finalizers = next_interpreter_finalizer(finalizers)) != NULL)
add_grey_node(set, (BC_WORD*) finalizers->cur->arg, heap, heap_size);
#endif
}
#endif
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment