mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-31 17:30:24 +02:00
Code Activity

add Scheme binding for scm_standard_vtable_vtable

Browse source 
* libguile/struct.c (scm_init_struct): Export <standard-vtable> to
  Scheme.
This commit is contained in:
Andy Wingo 2011-11-18 11:15:43 +01:00
parent fbe1cb7f64
commit 72d4db5d04
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/struct.c
View file

@ -1039,6 +1039,7 @@ scm_init_struct ()
scm_standard_vtable_vtable =
scm_make_vtable_vtable (scm_nullstr, SCM_INUM0, SCM_EOL);
scm_c_define ("<standard-vtable>", scm_standard_vtable_vtable);
scm_applicable_struct_vtable_vtable =
scm_make_struct (scm_standard_vtable_vtable, SCM_INUM0,