Scale by sizeof when allocating objects.

diff --git a/src/keymap.c b/src/keymap.c
index e512dcc..4a39764 100644 (file)
--- 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;
              }