diff options
author | Ken Raeburn <raeburn@raeburn.org> | 2012-05-20 16:08:54 -0400 |
---|---|---|
committer | Ken Raeburn <raeburn@raeburn.org> | 2012-05-21 01:14:44 -0400 |
commit | 499f3de0d746191d92432ab90b585bad5ef1f3cc (patch) | |
tree | 6790f92ef610894da7b116576debc4f2a1ceb273 /libguile/struct.c | |
parent | ea178990181fc1e771dcb7b998abdcdcf04d83c9 (diff) | |
download | guile-499f3de0d746191d92432ab90b585bad5ef1f3cc.tar.gz |
Eliminate uses of GC_PTR, a holdover from libgc 6.x.
* libguile/bdw-gc.h (GC_PTR): Don't define.
* libguile/finalizers.c (scm_i_set_finalizer): Use void* instead of
GC_PTR.
* libguile/foreign.c (pointer_finalizer_trampoline): Likewise.
* libguile/guardians.c (finalize_guarded, scm_i_guard): Likewise.
* libguile/numbers.c (finalize_bignum): Likewise.
* libguile/ports.c (finalize_port, finalize_iconv_descriptors): Likewise.
* libguile/smob.c (finalize_smob): Likewise.
* libguile/struct.c (struct_finalizer_trampoline): Likewise.
* libguile/weak-set.c (move_weak_entry, resize_set):
(weak_set_add_x, weak_set_remove_x): Likewise, but also change some
casts that should've been GC_PTR* to void**, and don't cast pointer
values to void*.
* libguile/weak-table.c (register_disappearing_links):
(unregister_disappearing_links, move_disappearing_links): Likewise.
* libguile/weak-vector.c (scm_c_weak_vector_set_x): Likewise.
Diffstat (limited to 'libguile/struct.c')
-rw-r--r-- | libguile/struct.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/struct.c b/libguile/struct.c index 12a884256..e8182a2fd 100644 --- a/libguile/struct.c +++ b/libguile/struct.c @@ -411,7 +411,7 @@ SCM_DEFINE (scm_struct_vtable_p, "struct-vtable?", 1, 0, 0, /* Finalization: invoke the finalizer of the struct pointed to by PTR. */ static void -struct_finalizer_trampoline (GC_PTR ptr, GC_PTR unused_data) +struct_finalizer_trampoline (void *ptr, void *unused_data) { SCM obj = PTR2SCM (ptr); scm_t_struct_finalize finalize = SCM_STRUCT_FINALIZER (obj); |