summaryrefslogtreecommitdiff
path: root/libguile/ephemerons.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/ephemerons.c')
-rw-r--r--libguile/ephemerons.c12
1 files changed, 12 insertions, 0 deletions
diff --git a/libguile/ephemerons.c b/libguile/ephemerons.c
index 9995d8e79..f8b7ecf54 100644
--- a/libguile/ephemerons.c
+++ b/libguile/ephemerons.c
@@ -126,6 +126,18 @@ scm_c_ephemeron_next (struct gc_ephemeron *e)
return gc_ephemeron_chain_next (e);
}
+struct gc_ephemeron*
+scm_c_ephemeron_load (struct gc_ephemeron **loc)
+{
+ return gc_ephemeron_chain_head (loc);
+}
+
+void
+scm_c_ephemeron_push (struct gc_ephemeron **loc, struct gc_ephemeron *e)
+{
+ gc_ephemeron_chain_push (loc, e);
+}
+