summaryrefslogtreecommitdiff
path: root/libguile/struct.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2011-11-18 11:15:43 +0100
committerAndy Wingo <wingo@pobox.com>2011-11-24 11:47:36 +0100
commit72d4db5d04a63d15f43c790dd7d2ac20abaa6cfd (patch)
tree3b21579576e09aefcf1ac853dc2165ae4c4aa7e8 /libguile/struct.c
parentfbe1cb7f64a6af5c3dd6b94a9b176a28124f5c9b (diff)
downloadguile-72d4db5d04a63d15f43c790dd7d2ac20abaa6cfd.tar.gz
add Scheme binding for scm_standard_vtable_vtable
* libguile/struct.c (scm_init_struct): Export <standard-vtable> to Scheme.
Diffstat (limited to 'libguile/struct.c')
-rw-r--r--libguile/struct.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/struct.c b/libguile/struct.c
index 8b21330b0..2e0a50354 100644
--- a/libguile/struct.c
+++ b/libguile/struct.c
@@ -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,