From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 25 Oct 2010 12:17:24 +0000 (-0600)
Subject: overhaul GC finalization
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=a5854942321e569a573decdea7b1d0407f113792;p=gc

overhaul GC finalization
---

diff --git a/finalize.c b/finalize.c
index acfecc84..869b310b 100644
--- a/finalize.c
+++ b/finalize.c
@@ -147,6 +147,12 @@ int GC_register_disappearing_link(void * * link)
     return(GC_general_register_disappearing_link(link, base));
 }
 
+/* PLTSCHEME: GC_register_indirect_disappearing_link */
+GC_API void GC_register_indirect_disappearing_link(void **link, void *obj)
+{
+  GC_general_register_disappearing_link(link, obj);
+}
+
 /* PLTSCHEME: GC_register_late_disappearing_link */
 static int late_dl; /* a stupid way to pass arguments (to minimize my changes). */
 GC_API void GC_register_late_disappearing_link(void **link, void *obj)