1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-14 15:40:19 +02:00

* objects.c (scm_i_make_class_object): Renamed from

make_class_object; exported; error checking moved to
scm_make_class_object and scm_make_subclass_object.
(scm_make_class_object, scm_make_subclass_object): Use
scm_i_make_class_object.
(scm_make_subclass_object): Let the subclass have same metaclass
as the superclass.
This commit is contained in:
Mikael Djurfeldt 1998-11-15 16:16:06 +00:00
parent a6e350ddef
commit 036737fce8
3 changed files with 30 additions and 22 deletions

View file

@ -177,6 +177,8 @@ extern SCM scm_set_object_procedure_x (SCM obj, SCM procs);
extern SCM scm_make_class_object (SCM metaclass, SCM layout);
extern SCM scm_make_subclass_object (SCM class, SCM layout);
extern SCM scm_i_make_class_object (SCM metaclass, SCM layout_string,
unsigned long flags);
extern void scm_init_objects SCM_P ((void));
#endif /* OBJECTSH */