Mercurial > emacs
changeset 20827:4b85e02aae14
(Faref, Faset): Allow indexing a char-table
directly by numbers up to CHAR_TABLE_ORDINARY_SLOTS.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 03 Feb 1998 06:22:02 +0000 |
parents | cbaa9e50b013 |
children | 82305d3fbfb1 |
files | src/data.c |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/data.c Tue Feb 03 06:19:34 1998 +0000 +++ b/src/data.c Tue Feb 03 06:22:02 1998 +0000 @@ -1574,7 +1574,7 @@ if (idxval < 0) args_out_of_range (array, idx); - if (idxval < CHAR_TABLE_SINGLE_BYTE_SLOTS) + if (idxval < CHAR_TABLE_ORDINARY_SLOTS) { /* For ASCII and 8-bit European characters, the element is stored in the top table. */ @@ -1702,7 +1702,7 @@ if (idxval < 0) args_out_of_range (array, idx); - if (idxval < CHAR_TABLE_SINGLE_BYTE_SLOTS) + if (idxval < CHAR_TABLE_ORDINARY_SLOTS) XCHAR_TABLE (array)->contents[idxval] = newelt; else {