X-Git-Url: https://git.hcoop.net/bpt/guile.git/blobdiff_plain/5070fd11b2975d34df227d7175890ddeed15e1a8..06c1d90009bd20b0e68243b116f660789094c14a:/libguile/guardians.h diff --git a/libguile/guardians.h b/libguile/guardians.h index 7ba9380af..7f88e587c 100644 --- a/libguile/guardians.h +++ b/libguile/guardians.h @@ -24,15 +24,11 @@ #include "libguile/__scm.h" -SCM_API SCM scm_make_guardian (SCM greedy_p); -SCM_API SCM scm_destroy_guardian_x (SCM guardian); +SCM_API SCM scm_make_guardian (void); -SCM_API SCM scm_guardian_greedy_p (SCM guardian); -SCM_API SCM scm_guardian_destroyed_p (SCM guardian); - -/* these are to be called from C: */ -SCM_API SCM scm_guard (SCM guardian, SCM obj, int throw_p); -SCM_API SCM scm_get_one_zombie (SCM guardian); +SCM_API void scm_i_init_guardians_for_gc (void); +SCM_API void scm_i_identify_inaccessible_guardeds (void); +SCM_API int scm_i_mark_inaccessible_guardeds (void); SCM_API void scm_init_guardians (void);