diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-02-03 06:22:02 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-02-03 06:22:02 +0000 |
| commit | 941e80437c6ea507b910af047a5cd6adab3462f2 (patch) | |
| tree | 3a3aab2b343d5a544880139ee9d7faf366f2e388 | |
| parent | 0b1bd222a246e64e05de7ee54b00b7d5ef7fb5a5 (diff) | |
| download | emacs-941e80437c6ea507b910af047a5cd6adab3462f2.tar.gz | |
(Faref, Faset): Allow indexing a char-table
directly by numbers up to CHAR_TABLE_ORDINARY_SLOTS.
| -rw-r--r-- | src/data.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/data.c b/src/data.c index 4537e649b7f..ba7ed98b527 100644 --- a/src/data.c +++ b/src/data.c @@ -1574,7 +1574,7 @@ or a byte-code object. IDX starts at 0.") 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 @@ IDX starts at 0.") 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 { |