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

* procs.c (scm_make_subr_opt): Tell scm_must_realloc that we're

realloc:ing scm_subr_table ("what" instead of "who").
This commit is contained in:
Mikael Djurfeldt 2000-04-19 03:25:22 +00:00
parent baa702c81f
commit 221c64975f

View file

@ -80,7 +80,7 @@ scm_make_subr_opt (const char *name, int type, SCM (*fcn) (), int set)
= scm_must_realloc ((char *) scm_subr_table, = scm_must_realloc ((char *) scm_subr_table,
sizeof (scm_subr_entry) * scm_subr_table_room, sizeof (scm_subr_entry) * scm_subr_table_room,
sizeof (scm_subr_entry) * new_size, sizeof (scm_subr_entry) * new_size,
"scm_make_subr_opt"); "scm_subr_table");
scm_subr_table = new_table; scm_subr_table = new_table;
scm_subr_table_room = new_size; scm_subr_table_room = new_size;
} }