From 38992c68207d89c6160511c7a89a8f8bc904330b Mon Sep 17 00:00:00 2001 From: tomo Date: Thu, 27 Jan 2000 04:45:26 +0000 Subject: [PATCH] (charset_code_point): Moved to char-ucs.h. --- src/mule-charset.c | 15 --------------- 1 file changed, 15 deletions(-) diff --git a/src/mule-charset.c b/src/mule-charset.c index 0991fe1..886006e 100644 --- a/src/mule-charset.c +++ b/src/mule-charset.c @@ -1623,21 +1623,6 @@ encode_builtin_char_1 (Emchar c, Lisp_Object* charset) } } -int -charset_code_point (Lisp_Object charset, Emchar ch) -{ - Lisp_Object cdef = get_char_code_table (ch, Vcharacter_attribute_table); - - if (!NILP (cdef)) - { - Lisp_Object field = Fassq (charset, cdef); - - if (!NILP (field)) - return XINT (Fcdr (field)); - } - return range_charset_code_point (charset, ch); -} - Lisp_Object Vdefault_coded_charset_priority_list; #endif -- 1.7.10.4