summaryrefslogtreecommitdiff
path: root/libguile/gc.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/gc.h')
-rw-r--r--libguile/gc.h11
1 files changed, 9 insertions, 2 deletions
diff --git a/libguile/gc.h b/libguile/gc.h
index a7631c3f7..9b4214325 100644
--- a/libguile/gc.h
+++ b/libguile/gc.h
@@ -381,8 +381,12 @@ extern void scm_remember_upto_here (SCM obj1, ...);
extern SCM scm_return_first (SCM elt, ...);
extern int scm_return_first_int (int x, ...);
extern SCM scm_permanent_object (SCM obj);
-extern SCM scm_protect_object (SCM obj);
-extern SCM scm_unprotect_object (SCM obj);
+extern SCM scm_gc_protect_object (SCM obj);
+extern SCM scm_gc_unprotect_object (SCM obj);
+extern void scm_gc_register_root (SCM *p);
+extern void scm_gc_unregister_root (SCM *p);
+extern void scm_gc_register_roots (SCM *b, unsigned long n);
+extern void scm_gc_unregister_roots (SCM *b, unsigned long n);
extern int scm_init_storage (void);
extern void *scm_get_stack_base (void);
extern void scm_init_gc (void);
@@ -391,6 +395,9 @@ extern void scm_init_gc (void);
#if (SCM_DEBUG_DEPRECATED == 0)
+extern SCM scm_protect_object (SCM obj);
+extern SCM scm_unprotect_object (SCM obj);
+
#define SCM_SETAND_CAR(x, y) \
(SCM_SETCAR ((x), SCM_PACK (SCM_UNPACK (SCM_CAR (x)) & (y))))
#define SCM_SETOR_CAR(x, y)\