Merge GB 12345 code points.

[chise/xemacs-chise.git] / src / char-ucs.h

diff --git a/src/char-ucs.h b/src/char-ucs.h
index 38056ba..7c60319 100644 (file)
--- a/src/char-ucs.h
+++ b/src/char-ucs.h
@@ -26,6 +26,10 @@ Boston, MA 02111-1307, USA.  */
 #define CHAR_ASCII_P(ch) ((ch) <= 0x7F)
 
 \f
+/************************************************************************/
+/*                               Char-ID Tables                         */
+/************************************************************************/
+
 struct Lisp_Uint8_Byte_Table
 {
   struct lcrecord_header header;
@@ -125,6 +129,9 @@ typedef short Charset_ID;
 /* ISO/IEC 10646 for CNS */
 #define LEADING_BYTE_UCS_CNS           (CHARSET_ID_OFFSET - 5)
 
+/* ISO/IEC 10646 for JIS */
+#define LEADING_BYTE_UCS_JIS           (CHARSET_ID_OFFSET - 6)
+
 /* ISO/IEC 10646 for Big5 */
 #define LEADING_BYTE_UCS_BIG5          (CHARSET_ID_OFFSET - 9)
 
@@ -142,21 +149,23 @@ typedef short Charset_ID;
 /* Big5 Level 2                        2/4 2/{(8),9,10,11} 4/0 '1' */
 #define LEADING_BYTE_CHINESE_BIG5_2    (CHARSET_ID_OFFSET - 22)
 
+#define LEADING_BYTE_CHINESE_BIG5_CDP  (CHARSET_ID_OFFSET - 23)
+
 /* VISCII 1.1 */
-#define LEADING_BYTE_LATIN_VISCII      (CHARSET_ID_OFFSET - 23)
+#define LEADING_BYTE_LATIN_VISCII      (CHARSET_ID_OFFSET - 24)
 
 /* MULE VISCII-LOWER                   (CHARSET_ID_OFFSET_96 + '1') */
-#define LEADING_BYTE_LATIN_VISCII_LOWER        (CHARSET_ID_OFFSET - 24)
+#define LEADING_BYTE_LATIN_VISCII_LOWER        (CHARSET_ID_OFFSET - 25)
 
 /* MULE VISCII-UPPER                   (CHARSET_ID_OFFSET_96 + '2') */
-#define LEADING_BYTE_LATIN_VISCII_UPPER        (CHARSET_ID_OFFSET - 25)
+#define LEADING_BYTE_LATIN_VISCII_UPPER        (CHARSET_ID_OFFSET - 26)
 
-#define LEADING_BYTE_ETHIOPIC_UCS      (CHARSET_ID_OFFSET - 26)
+#define LEADING_BYTE_ETHIOPIC_UCS      (CHARSET_ID_OFFSET - 27)
 
-#define LEADING_BYTE_DAIKANWA          (CHARSET_ID_OFFSET - 27)
-#define LEADING_BYTE_DAIKANWA_EKANJI   (CHARSET_ID_OFFSET - 28)
+#define LEADING_BYTE_DAIKANWA          (CHARSET_ID_OFFSET - 28)
+#define LEADING_BYTE_DAIKANWA_EKANJI   (CHARSET_ID_OFFSET - 29)
 
-#define LEADING_BYTE_GT                        (CHARSET_ID_OFFSET - 29)
+#define LEADING_BYTE_GT                        (CHARSET_ID_OFFSET - 30)
 #define LEADING_BYTE_GT_PJ_1           (CHARSET_ID_OFFSET - 31)
 #define LEADING_BYTE_GT_PJ_2           (CHARSET_ID_OFFSET - 32)
 #define LEADING_BYTE_GT_PJ_3           (CHARSET_ID_OFFSET - 33)
@@ -471,15 +480,9 @@ CHARSET_BY_ATTRIBUTES (int chars, int dimension, int final, int dir)
 #define MAX_CHAR_BASIC_LATIN   0x007F
 
 /*
-#define MIN_CHAR_GREEK         0x0370
-#define MAX_CHAR_GREEK         0x03CF
-
-#define MIN_CHAR_CYRILLIC      0x0400
-#define MAX_CHAR_CYRILLIC      0x045F
-*/
-
 #define MIN_CHAR_HEBREW                0x0590
 #define MAX_CHAR_HEBREW                0x05EF
+*/
 
 #define MIN_CHAR_THAI          0x0E00
 #define MAX_CHAR_THAI          0x0E5F
@@ -786,8 +789,14 @@ CHAR_TO_CHARC (Emchar ch)
 
 EXFUN (Fget_charset, 1);
 
+extern Lisp_Object Qucs;
+
 extern Lisp_Object Vcharset_japanese_jisx0208;
 extern Lisp_Object Vcharset_japanese_jisx0208_1990;
 extern Lisp_Object Vcharset_japanese_jisx0212;
 
+Lisp_Object put_char_ccs_code_point (Lisp_Object character,
+                                    Lisp_Object ccs, Lisp_Object value);
+Lisp_Object remove_char_ccs (Lisp_Object character, Lisp_Object ccs);
+
 #endif /* INCLUDED_char_ucs_h_ */