diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-01-29 02:09:41 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-01-29 02:09:41 +0000 |
| commit | e58077c89313edd673379fa6bd540d0416e53561 (patch) | |
| tree | be9f85b23fe60c28531255bdbd54108fad98cb2f /src/keymap.c | |
| parent | 0237d897f69afea78cca68c3d36b34818d8209ac (diff) | |
| download | emacs-e58077c89313edd673379fa6bd540d0416e53561.tar.gz | |
Scale by sizeof when allocating objects.
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 14 |
1 files 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; } |