diff options
| author | Andy Wingo <wingo@pobox.com> | 2012-01-31 22:58:24 +0100 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2012-01-31 22:58:24 +0100 |
| commit | 0aed71aa51e89e714de2392c2a5f44694dca77ea (patch) | |
| tree | 9c99918b70d24d7cd344fcc22c34e2b7cff1e517 /libguile/smob.c | |
| parent | 3bf3d735ac743eda1f42627d165dfd86f1178126 (diff) | |
| download | guile-0aed71aa51e89e714de2392c2a5f44694dca77ea.tar.gz | |
Revert "add SCM_HEAP_OBJECT_BASE"
This reverts commit 47ed8656db8800f3ad20a40eb2c4e9ef3dc891e3.
Conflicts:
libguile/foreign.c
Diffstat (limited to 'libguile/smob.c')
| -rw-r--r-- | libguile/smob.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/smob.c b/libguile/smob.c index e966da8e1..0c3a5441b 100644 --- a/libguile/smob.c +++ b/libguile/smob.c @@ -601,7 +601,7 @@ scm_i_new_smob (scm_t_bits tc, scm_t_bits data) 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), finalize_smob, NULL, &prev_finalizer, &prev_finalizer_data); } @@ -635,7 +635,7 @@ scm_i_new_double_smob (scm_t_bits tc, scm_t_bits data1, 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), finalize_smob, NULL, &prev_finalizer, &prev_finalizer_data); } |