From 5e67dc27e396e3d4f534e028c8cf06d57f7cd508 Mon Sep 17 00:00:00 2001 From: Ludovic Courtes Date: Tue, 30 May 2006 21:23:44 +0000 Subject: Added support for the free function of structures. * libguile/struct.c (struct_finalizer_trampoline): New. (scm_struct_gc_init): Removed. (scm_i_structs_to_free): Removed. (scm_free_structs): Removed. (scm_make_struct): Register a finalizer for the new struct if need be. (scm_struct_prehistory): Cleared. * libguile/struct.h (scm_i_structs_to_free): Removed. git-archimport-id: lcourtes@laas.fr--2005-libre/guile-core--boehm-gc--1.9--patch-33 --- libguile/struct.h | 1 - 1 file changed, 1 deletion(-) (limited to 'libguile/struct.h') diff --git a/libguile/struct.h b/libguile/struct.h index fcd8ec858..04f5e3e02 100644 --- a/libguile/struct.h +++ b/libguile/struct.h @@ -79,7 +79,6 @@ SCM_API SCM scm_struct_table; #define SCM_STRUCT_GC_CHAIN(X) SCM_CELL_OBJECT_3 (X) #define SCM_SET_STRUCT_GC_CHAIN(X, Y) SCM_SET_CELL_OBJECT_3 (X, Y) -SCM_API SCM scm_i_structs_to_free; -- cgit v1.2.3