summaryrefslogtreecommitdiff
path: root/libguile/guardians.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2012-01-31 22:58:24 +0100
committerAndy Wingo <wingo@pobox.com>2012-01-31 22:58:24 +0100
commit0aed71aa51e89e714de2392c2a5f44694dca77ea (patch)
tree9c99918b70d24d7cd344fcc22c34e2b7cff1e517 /libguile/guardians.c
parent3bf3d735ac743eda1f42627d165dfd86f1178126 (diff)
downloadguile-0aed71aa51e89e714de2392c2a5f44694dca77ea.tar.gz
Revert "add SCM_HEAP_OBJECT_BASE"
This reverts commit 47ed8656db8800f3ad20a40eb2c4e9ef3dc891e3. Conflicts: libguile/foreign.c
Diffstat (limited to 'libguile/guardians.c')
-rw-r--r--libguile/guardians.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/libguile/guardians.c b/libguile/guardians.c
index 532137857..a3d03230a 100644
--- a/libguile/guardians.c
+++ b/libguile/guardians.c
@@ -218,8 +218,6 @@ scm_i_guard (SCM guardian, SCM obj)
SCM_EOL);
finalizer_data = scm_cons (SCM_BOOL_F, guardians_for_obj);
- /* FIXME: should be SCM_HEAP_OBJECT_BASE, but will the finalizer
- strip the tag bits of pairs or structs? */
GC_REGISTER_FINALIZER_NO_ORDER (SCM_UNPACK_POINTER (obj), finalize_guarded,
SCM_UNPACK_POINTER (finalizer_data),
&prev_finalizer, &prev_data);