From e58077c89313edd673379fa6bd540d0416e53561 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Sat, 29 Jan 1994 02:09:41 +0000 Subject: [PATCH] Scale by sizeof when allocating objects. --- src/keymap.c | 14 ++++++++++---- 1 file changed, 10 insertions(+), 4 deletions(-) diff --git a/src/keymap.c b/src/keymap.c index e512dcce258..4a39764c0f3 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -775,15 +775,21 @@ current_minor_maps (modeptr, mapptr) if (cmm_maps) { BLOCK_INPUT; - newmodes = (Lisp_Object *) realloc (cmm_modes, cmm_size *= 2); - newmaps = (Lisp_Object *) realloc (cmm_maps, cmm_size); + cmm_size *= 2; + newmodes = (Lisp_Object *) + realloc (cmm_modes, cmm_size * sizeof (Lisp_Object)); + newmaps = (Lisp_Object *) + realloc (cmm_maps, cmm_size * sizeof (Lisp_Object)); UNBLOCK_INPUT; } else { BLOCK_INPUT; - newmodes = (Lisp_Object *) malloc (cmm_size = 30); - newmaps = (Lisp_Object *) malloc (cmm_size); + cmm_size = 30; + newmodes = (Lisp_Object *) + malloc (cmm_size * sizeof (Lisp_Object)); + newmaps = (Lisp_Object *) + malloc (cmm_size * sizeof (Lisp_Object)); UNBLOCK_INPUT; } -- 2.39.5