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:
parent
a6e350ddef
commit
036737fce8
3 changed files with 30 additions and 22 deletions
|
@ -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 */
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue