# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1034644671 0
# Node ID 1271680eca43cf594db4861782970bd9bdc0e86c
# Parent  c232917f49f79246fea34c4dae98ecac7b4bc0c6
(Faset): Check NEWELT by ASCII_CHAR_P, not by
SINGLE_BYTE_CHAR_P.

diff -r c232917f49f7 -r 1271680eca43 src/data.c
--- a/src/data.c	Tue Oct 15 01:15:52 2002 +0000
+++ b/src/data.c	Tue Oct 15 01:17:51 2002 +0000
@@ -1955,7 +1955,7 @@
 	args_out_of_range (array, idx);
       CHECK_NUMBER (newelt);
 
-      if (XINT (newelt) < 0 || SINGLE_BYTE_CHAR_P (XINT (newelt)))
+      if (XINT (newelt) < 0 || ASCII_CHAR_P (XINT (newelt)))
 	XSTRING (array)->data[idxval] = XINT (newelt);
       else
 	{