summaryrefslogtreecommitdiff
path: root/libguile/struct.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/struct.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/struct.c')
-rw-r--r--libguile/struct.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/struct.c b/libguile/struct.c
index d022cce78..73b2e4ddf 100644
--- a/libguile/struct.c
+++ b/libguile/struct.c
@@ -448,7 +448,7 @@ scm_i_alloc_struct (scm_t_bits *vtable_data, int n_words)
/* Register a finalizer for the newly created instance. */
GC_finalization_proc prev_finalizer;
GC_PTR prev_finalizer_data;
- GC_REGISTER_FINALIZER_NO_ORDER (SCM_HEAP_OBJECT_BASE (ret),
+ GC_REGISTER_FINALIZER_NO_ORDER (SCM2PTR (ret),
struct_finalizer_trampoline,
NULL,
&prev_finalizer,