summaryrefslogtreecommitdiff
path: root/libguile/goops.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2011-11-18 11:50:50 +0100
committerAndy Wingo <wingo@pobox.com>2011-11-24 11:47:36 +0100
commit0818837f65fbf141caa84e5d46f93e6e56c1a370 (patch)
treef20359d40643b21eb8d191f15c4542b04da200c2 /libguile/goops.c
parent5139b7b928fe1ddcdae1107470090a275eba9f19 (diff)
downloadguile-0818837f65fbf141caa84e5d46f93e6e56c1a370.tar.gz
deprecate make-vtable-vtable
* libguile/struct.h: * libguile/struct.c (scm_make_vtable_vtable): Deprecate, as you can handle most of the use cases with make-vtable, and we don't want to promote the creation of new roots to the type hierarchy. (scm_i_make_vtable_vtable): The internal replacement.
Diffstat (limited to 'libguile/goops.c')
-rw-r--r--libguile/goops.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/goops.c b/libguile/goops.c
index d82a42f27..957a4e886 100644
--- a/libguile/goops.c
+++ b/libguile/goops.c
@@ -963,7 +963,7 @@ create_basic_classes (void)
/**** <class> ****/
SCM cs = scm_from_locale_string (SCM_CLASS_CLASS_LAYOUT);
SCM name = scm_from_latin1_symbol ("<class>");
- scm_class_class = scm_make_vtable_vtable (cs, SCM_INUM0, SCM_EOL);
+ scm_class_class = scm_i_make_vtable_vtable (cs);
SCM_SET_CLASS_FLAGS (scm_class_class, (SCM_CLASSF_GOOPS_OR_VALID
| SCM_CLASSF_METACLASS));