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
 	{