changeset 2752:93eda5bbc4df

(Faccessible_keymaps): Use whatever size the vector has. (Fwhere_is_internal): Likewise. (describe_vector): Likewise.
author Richard M. Stallman <rms@gnu.org>
date Wed, 12 May 1993 21:58:16 +0000
parents f95808ad4b95
children c824ba373cc2
files src/keymap.c
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/keymap.c	Wed May 12 21:41:56 1993 +0000
+++ b/src/keymap.c	Wed May 12 21:58:16 1993 +0000
@@ -1024,7 +1024,7 @@
 	      register int i;
 
 	      /* Vector keymap.  Scan all the elements.  */
-	      for (i = 0; i < DENSE_TABLE_SIZE; i++)
+	      for (i = 0; i < XVECTOR (elt)->size; i++)
 		{
 		  register Lisp_Object tem;
 		  register Lisp_Object cmd;
@@ -1417,7 +1417,7 @@
 	      /* If we've just finished scanning a vector, advance map
 		 to the next element, and reset i in anticipation of the
 		 next vector we may find.  */
-	      if (i >= DENSE_TABLE_SIZE)
+	      if (i >= XVECTOR (elt)->size)
 		{
 		  map = XCONS (map)->cdr;
 		  i = 0;
@@ -1896,7 +1896,7 @@
   if (partial)
     suppress = intern ("suppress-keymap");
 
-  for (i = 0; i < DENSE_TABLE_SIZE; i++)
+  for (i = 0; i < XVECTOR (vector)->size; i++)
     {
       QUIT;
       tem1 = get_keyelt (XVECTOR (vector)->contents[i]);
@@ -1941,7 +1941,7 @@
       insert1 (this);
 
       /* Find all consecutive characters that have the same definition.  */
-      while (i + 1 < DENSE_TABLE_SIZE
+      while (i + 1 < XVECTOR (vector)->size
 	     && (tem2 = get_keyelt (XVECTOR (vector)->contents[i+1]),
 		 EQ (tem2, tem1)))
 	i++;