mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-06 23:50:18 +02:00
Code Activity

Prepare structs for new finalization API

Browse source 
* libguile/struct.h:
* libguile/struct.c (scm_i_finalize_struct): New helper.
(struct_finalizer_trampoline): Implement as shim.
This commit is contained in:
Andy Wingo 2025-05-02 15:12:19 +02:00
parent 5e97645b81
commit 9774b3e551
2 changed files with 10 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/struct.h
View file

@ -1,7 +1,7 @@
#ifndef SCM_STRUCT_H
#define SCM_STRUCT_H
/* Copyright 1995,1997,1999-2001,2006-2013,2015,2017-2018
/* Copyright 1995,1997,1999-2001,2006-2013,2015,2017-2018,2025
Free Software Foundation, Inc.
This file is part of Guile.
@ -188,6 +188,7 @@ SCM_API void scm_print_struct (SCM exp, SCM port, scm_print_state *);
SCM_INTERNAL SCM scm_i_struct_equalp (SCM s1, SCM s2);
SCM_INTERNAL unsigned long scm_struct_ihashq (SCM, unsigned long, void *);
SCM_INTERNAL void scm_i_struct_inherit_vtable_magic (SCM vtable, SCM obj);
SCM_INTERNAL void scm_i_finalize_struct (struct scm_thread *thread, SCM obj);
SCM_INTERNAL void scm_init_struct (void);
#endif /* SCM_STRUCT_H */