summaryrefslogtreecommitdiff
path: root/libguile/whippet/src/gc-stack.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/whippet/src/gc-stack.h')
-rw-r--r--libguile/whippet/src/gc-stack.h33
1 files changed, 33 insertions, 0 deletions
diff --git a/libguile/whippet/src/gc-stack.h b/libguile/whippet/src/gc-stack.h
new file mode 100644
index 000000000..15df9df6d
--- /dev/null
+++ b/libguile/whippet/src/gc-stack.h
@@ -0,0 +1,33 @@
+#ifndef GC_STACK_H
+#define GC_STACK_H
+
+#ifndef GC_IMPL
+#error internal header file, not part of API
+#endif
+
+#include "gc-inline.h"
+#include <setjmp.h>
+
+struct gc_stack_addr {
+ uintptr_t addr;
+};
+
+struct gc_stack {
+ struct gc_stack_addr cold;
+ struct gc_stack_addr hot;
+ jmp_buf registers;
+};
+
+struct gc_heap;
+
+GC_INTERNAL void gc_stack_init(struct gc_stack *stack,
+ struct gc_stack_addr *base);
+GC_INTERNAL void gc_stack_capture_hot(struct gc_stack *stack);
+GC_INTERNAL void gc_stack_visit(struct gc_stack *stack,
+ void (*visit)(uintptr_t low, uintptr_t high,
+ struct gc_heap *heap,
+ void *data),
+ struct gc_heap *heap,
+ void *data);
+
+#endif // GC_STACK_H