From: tomo <tomo>
Date: Fri, 7 Sep 2001 06:06:01 +0000 (+0000)
Subject: (decode_char_table_range): New prototype in XEmacs UTF-2000.
X-Git-Tag: r21-2-41-utf-2000-0_18-1~529
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=68995e1711ad6fce6ef6c4f4f210335698f0da0c;p=chise%2Fxemacs-chise.git

(decode_char_table_range): New prototype in XEmacs UTF-2000.
(put_char_id_table): New inline function  in XEmacs UTF-2000.
---

diff --git a/src/chartab.h b/src/chartab.h
index 444d41a..b5abc3e 100644
--- a/src/chartab.h
+++ b/src/chartab.h
@@ -328,8 +328,22 @@ put_char_id_table_0 (Lisp_Char_Table* cit, Emchar code, Lisp_Object value)
   cit->table = put_byte_table (table1, (unsigned char)(code >> 24), table2);
 }
 
-void put_char_id_table (Lisp_Char_Table* table,
-			Lisp_Object character, Lisp_Object value);
+void
+decode_char_table_range (Lisp_Object range, struct chartab_range *outrange);
+
+INLINE_HEADER void
+put_char_id_table (Lisp_Char_Table* table,
+		   Lisp_Object character, Lisp_Object value);
+INLINE_HEADER void
+put_char_id_table (Lisp_Char_Table* table,
+		   Lisp_Object character, Lisp_Object value)
+{
+  struct chartab_range range;
+
+  decode_char_table_range (character, &range);
+  put_char_table (table, &range, value);
+}
+
 
 EXFUN (Fget_char_attribute, 3);