diff options
author | Andy Wingo <wingo@pobox.com> | 2009-12-08 21:46:47 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-12-08 23:13:13 +0100 |
commit | db5ed68588fc0c4086da1715c8aa13e85fa173ee (patch) | |
tree | 2bcec15faaffdeb26d0f41beb0697bf333064ae8 /libguile/struct.h | |
parent | 34dfef5135a8f65b85f5b3c72168ca2900d9dbcc (diff) | |
download | guile-db5ed68588fc0c4086da1715c8aa13e85fa173ee.tar.gz |
make some applicable struct vtable-vtable public to C
* libguile/struct.h (scm_standard_vtable_vtable)
(scm_applicable_struct_vtable_vtable)
(scm_applicable_struct_with_setter_vtable_vtable)
* libguile/struct.c: Make these stock meta-tables public to C.
Diffstat (limited to 'libguile/struct.h')
-rw-r--r-- | libguile/struct.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libguile/struct.h b/libguile/struct.h index daa1e1ffc..4d4b469af 100644 --- a/libguile/struct.h +++ b/libguile/struct.h @@ -141,6 +141,10 @@ typedef void (*scm_t_struct_finalize) (SCM obj); #define SCM_SET_STRUCT_TABLE_CLASS(X, CLASS) SCM_SETCDR (X, CLASS) SCM_API SCM scm_struct_table; +SCM_API SCM scm_standard_vtable_vtable; +SCM_API SCM scm_applicable_struct_vtable_vtable; +SCM_API SCM scm_applicable_struct_with_setter_vtable_vtable; + SCM_API SCM scm_make_struct_layout (SCM fields); |