From: tomo <tomo>
Date: Thu, 26 Aug 1999 05:35:35 +0000 (+0000)
Subject: (charset_by_leading_byte): Use `NUM_LEADING_BYTES' instead of 128.
X-Git-Tag: r21-2-19-tomo-4~1
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a24fcad38e8b13d7f9344f096f517fc4a27c052e;p=chise%2Fxemacs-chise.git

(charset_by_leading_byte): Use `NUM_LEADING_BYTES' instead of 128.
(make_charset): Use `MIN_LEADING_BYTE' instead of 128.
---

diff --git a/src/mule-charset.c b/src/mule-charset.c
index 4fa9fcd..3bb0967 100644
--- a/src/mule-charset.c
+++ b/src/mule-charset.c
@@ -75,7 +75,7 @@ static int composite_char_col_next;
 #endif /* ENABLE_COMPOSITE_CHARS */
 
 /* Table of charsets indexed by leading byte. */
-Lisp_Object charset_by_leading_byte[128];
+Lisp_Object charset_by_leading_byte[NUM_LEADING_BYTES];
 
 /* Table of charsets indexed by type/final-byte/direction. */
 Lisp_Object charset_by_attributes[4][128][2];
@@ -492,8 +492,8 @@ make_charset (int id, Lisp_Object name, unsigned char rep_bytes,
       charset_by_attributes[type][final][direction] = obj;
     }
 
-  assert (NILP (charset_by_leading_byte[id - 128]));
-  charset_by_leading_byte[id - 128] = obj;
+  assert (NILP (charset_by_leading_byte[id - MIN_LEADING_BYTE]));
+  charset_by_leading_byte[id - MIN_LEADING_BYTE] = obj;
   if (id < 0xA0)
     /* official leading byte */
     rep_bytes_by_first_byte[id] = rep_bytes;