Mercurial > emacs
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++;