summaryrefslogtreecommitdiff
path: root/libguile/whippet/api/gc-embedder-api.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/whippet/api/gc-embedder-api.h')
-rw-r--r--libguile/whippet/api/gc-embedder-api.h67
1 files changed, 67 insertions, 0 deletions
diff --git a/libguile/whippet/api/gc-embedder-api.h b/libguile/whippet/api/gc-embedder-api.h
new file mode 100644
index 000000000..c1b272a51
--- /dev/null
+++ b/libguile/whippet/api/gc-embedder-api.h
@@ -0,0 +1,67 @@
+#ifndef GC_EMBEDDER_API_H
+#define GC_EMBEDDER_API_H
+
+#include <stddef.h>
+
+#include "gc-config.h"
+#include "gc-edge.h"
+#include "gc-inline.h"
+#include "gc-forwarding.h"
+
+#ifndef GC_EMBEDDER_API
+#define GC_EMBEDDER_API static
+#endif
+
+struct gc_mutator_roots;
+struct gc_heap_roots;
+struct gc_atomic_forward;
+struct gc_heap;
+struct gc_extern_space;
+
+GC_EMBEDDER_API inline int gc_is_valid_conservative_ref_displacement(uintptr_t displacement);
+GC_EMBEDDER_API inline size_t gc_finalizer_priority_count(void);
+
+GC_EMBEDDER_API inline int gc_extern_space_visit(struct gc_extern_space *space,
+ struct gc_edge edge,
+ struct gc_ref ref) GC_ALWAYS_INLINE;
+GC_EMBEDDER_API inline void gc_extern_space_start_gc(struct gc_extern_space *space,
+ int is_minor_gc);
+GC_EMBEDDER_API inline void gc_extern_space_finish_gc(struct gc_extern_space *space,
+ int is_minor_gc);
+
+GC_EMBEDDER_API inline void gc_trace_object(struct gc_ref ref,
+ void (*visit)(struct gc_edge edge,
+ struct gc_heap *heap,
+ void *visit_data),
+ struct gc_heap *heap,
+ void *trace_data,
+ size_t *size) GC_ALWAYS_INLINE;
+
+GC_EMBEDDER_API inline void gc_trace_mutator_roots(struct gc_mutator_roots *roots,
+ void (*trace_edge)(struct gc_edge edge,
+ struct gc_heap *heap,
+ void *trace_data),
+ struct gc_heap *heap,
+ void *trace_data);
+GC_EMBEDDER_API inline void gc_trace_heap_roots(struct gc_heap_roots *roots,
+ void (*trace_edge)(struct gc_edge edge,
+ struct gc_heap *heap,
+ void *trace_data),
+ struct gc_heap *heap,
+ void *trace_data);
+
+GC_EMBEDDER_API inline uintptr_t gc_object_forwarded_nonatomic(struct gc_ref ref);
+GC_EMBEDDER_API inline void gc_object_forward_nonatomic(struct gc_ref ref,
+ struct gc_ref new_ref);
+
+GC_EMBEDDER_API inline struct gc_atomic_forward gc_atomic_forward_begin(struct gc_ref ref);
+GC_EMBEDDER_API inline void gc_atomic_forward_acquire(struct gc_atomic_forward *);
+GC_EMBEDDER_API inline int gc_atomic_forward_retry_busy(struct gc_atomic_forward *);
+GC_EMBEDDER_API inline void gc_atomic_forward_abort(struct gc_atomic_forward *);
+GC_EMBEDDER_API inline size_t gc_atomic_forward_object_size(struct gc_atomic_forward *);
+GC_EMBEDDER_API inline void gc_atomic_forward_commit(struct gc_atomic_forward *,
+ struct gc_ref new_ref);
+GC_EMBEDDER_API inline uintptr_t gc_atomic_forward_address(struct gc_atomic_forward *);
+
+
+#endif // GC_EMBEDDER_API_H