mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-14 15:40:19 +02:00
GOOPS caches created vtables
* libguile/goops.c (scm_i_define_class_for_vtable): Cache created vtables. Fixes #24286. * test-suite/tests/goops.test ("classes for built-in types"): Add tests.
This commit is contained in:
parent
0f2f5949a2
commit
2dbb0e212d
2 changed files with 12 additions and 2 deletions
|
@ -865,7 +865,7 @@ scm_i_define_class_for_vtable (SCM vtable)
|
|||
supers = scm_list_1 (class_top);
|
||||
}
|
||||
|
||||
return scm_make_standard_class (meta, name, supers, SCM_EOL);
|
||||
class = scm_make_standard_class (meta, name, supers, SCM_EOL);
|
||||
}
|
||||
else
|
||||
/* `create_struct_classes' will fill this in later. */
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue