From 4e38b0436ec52739e4a20784efd252ef95825754 Mon Sep 17 00:00:00 2001 From: tomo Date: Fri, 29 Oct 1999 06:16:33 +0000 Subject: [PATCH] (struct Lisp_Charset): Delete `encoding_table'. (CHARSET_ENCODING_TABLE): Delete. (XCHARSET_ENCODING_TABLE): Delete. (charset_code_point): New interface. --- src/char-ucs.h | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/src/char-ucs.h b/src/char-ucs.h index b85c78a..6c51a89 100644 --- a/src/char-ucs.h +++ b/src/char-ucs.h @@ -236,9 +236,6 @@ struct Lisp_Charset /* Byte->character mapping table */ Lisp_Object decoding_table; - /* Character->byte mapping table */ - Lisp_Object encoding_table; - /* Range of character code */ Emchar ucs_min, ucs_max; @@ -287,7 +284,6 @@ DECLARE_LRECORD (charset, struct Lisp_Charset); #define CHARSET_CHARS(cs) ((cs)->chars) #define CHARSET_REVERSE_DIRECTION_CHARSET(cs) ((cs)->reverse_direction_charset) #define CHARSET_DECODING_TABLE(cs) ((cs)->decoding_table) -#define CHARSET_ENCODING_TABLE(cs) ((cs)->encoding_table) #define CHARSET_UCS_MIN(cs) ((cs)->ucs_min) #define CHARSET_UCS_MAX(cs) ((cs)->ucs_max) #define CHARSET_CODE_OFFSET(cs) ((cs)->code_offset) @@ -311,7 +307,6 @@ DECLARE_LRECORD (charset, struct Lisp_Charset); #define XCHARSET_REVERSE_DIRECTION_CHARSET(cs) \ CHARSET_REVERSE_DIRECTION_CHARSET (XCHARSET (cs)) #define XCHARSET_DECODING_TABLE(cs) CHARSET_DECODING_TABLE(XCHARSET(cs)) -#define XCHARSET_ENCODING_TABLE(cs) CHARSET_ENCODING_TABLE(XCHARSET(cs)) #define XCHARSET_UCS_MIN(cs) CHARSET_UCS_MIN(XCHARSET(cs)) #define XCHARSET_UCS_MAX(cs) CHARSET_UCS_MAX(XCHARSET(cs)) #define XCHARSET_CODE_OFFSET(cs) CHARSET_CODE_OFFSET(XCHARSET(cs)) @@ -471,6 +466,7 @@ MAKE_CHAR (Lisp_Object charset, int c1, int c2) extern Lisp_Object Vcharacter_attribute_table; Lisp_Object range_charset_code_point (Lisp_Object charset, Emchar ch); +Lisp_Object charset_code_point (Lisp_Object charset, Emchar ch); extern Lisp_Object Vdefault_coded_charset_priority_list; EXFUN (Ffind_charset, 1); -- 1.7.10.4