mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 14:00:21 +02:00
Code Activity

Complete fix of `hell' allocation in GOOPS.

Browse source
This commit is contained in:
Ludovic Courtès 2008-08-19 19:08:29 +02:00
parent 408bcd99d3
commit bb764c0e3c
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/goops.c
View file

@ -2995,7 +2995,7 @@ scm_init_goops_builtins (void)
list_of_no_method = scm_permanent_object (scm_list_1 (sym_no_method));
hell = scm_calloc (hell_size * sizeof(scm_t_bits));
hell = scm_calloc (hell_size * sizeof (*hell));
hell_mutex = scm_permanent_object (scm_make_mutex ());
create_basic_classes ();