From: tomo <tomo>
Date: Fri, 7 Sep 2001 07:23:26 +0000 (+0000)
Subject: (get_char_id_table): Moved to chartab.h as an inline function.
X-Git-Tag: r21-2-41-utf-2000-0_18-1~527
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=1ef82ad6c78b2611155206f3742b368df866b95f;p=chise%2Fxemacs-chise.git-

(get_char_id_table): Moved to chartab.h as an inline function.
---

diff --git a/src/chartab.c b/src/chartab.c
index 4141e88..f0543d8 100644
--- a/src/chartab.c
+++ b/src/chartab.c
@@ -839,23 +839,6 @@ make_char_id_table (Lisp_Object initval)
   return obj;
 }
 
-Lisp_Object
-get_char_id_table (Lisp_Char_Table* cit, Emchar ch)
-{
-  Lisp_Object val = get_byte_table (get_byte_table
-				    (get_byte_table
-				     (get_byte_table
-				      (cit->table,
-				       (unsigned char)(ch >> 24)),
-				      (unsigned char) (ch >> 16)),
-				     (unsigned char)  (ch >> 8)),
-				    (unsigned char)    ch);
-  if (UNBOUNDP (val))
-    return cit->default_value;
-  else
-    return val;
-}
-
 
 Lisp_Object Vcharacter_composition_table;
 Lisp_Object Vcharacter_variant_table;