(U+96A3): Use `->subsumptive'.

[chise/xemacs-chise.git] / lisp / mule / mule-coding.el

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index 1b51736..daa2401 100644 (file)
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -189,6 +189,26 @@
          ( ideograph-hanziku-1                "HZK01-" 4 X)
          ((ideograph-hanziku-2 . isolated)  "I-HZK02-" 4 X)
          ( ideograph-hanziku-2                "HZK02-" 4 X)
+         ((ideograph-hanziku-3 . isolated)  "I-HZK03-" 4 X)
+         ( ideograph-hanziku-3                "HZK03-" 4 X)
+         ((ideograph-hanziku-4 . isolated)  "I-HZK04-" 4 X)
+         ( ideograph-hanziku-4                "HZK04-" 4 X)
+         ((ideograph-hanziku-5 . isolated)  "I-HZK05-" 4 X)
+         ( ideograph-hanziku-5                "HZK05-" 4 X)
+         ((ideograph-hanziku-6 . isolated)  "I-HZK06-" 4 X)
+         ( ideograph-hanziku-6                "HZK06-" 4 X)
+         ((ideograph-hanziku-7 . isolated)  "I-HZK07-" 4 X)
+         ( ideograph-hanziku-7                "HZK07-" 4 X)
+         ((ideograph-hanziku-8 . isolated)  "I-HZK08-" 4 X)
+         ( ideograph-hanziku-8                "HZK08-" 4 X)
+         ((ideograph-hanziku-9 . isolated)  "I-HZK09-" 4 X)
+         ( ideograph-hanziku-9                "HZK09-" 4 X)
+         ((ideograph-hanziku-10 . isolated) "I-HZK10-" 4 X)
+         ( ideograph-hanziku-10               "HZK10-" 4 X)
+         ((ideograph-hanziku-11 . isolated) "I-HZK11-" 4 X)
+         ( ideograph-hanziku-11               "HZK11-" 4 X)
+         ((ideograph-hanziku-12 . isolated) "I-HZK12-" 4 X)
+         ( ideograph-hanziku-12               "HZK12-" 4 X)
          ((ideograph-hanziku-1 . isolated)   "I-HZK1-" 4 X)
          ( ideograph-hanziku-1                 "HZK1-" 4 X)
          ((ideograph-hanziku-2 . isolated)   "I-HZK2-" 4 X)
@@ -221,9 +241,64 @@
          ( chinese-cns11643-7                    "C7-" 4 X)
          ((korean-ksc5601 . isolated)          "I-K0-" 4 X)
          ( korean-ksc5601                        "K0-" 4 X)
+         ((chinese-gb2312 . isolated)          "I-G0-" 4 X)
+         ( chinese-gb2312                        "G0-" 4 X)
+         ((=iso-ir165 . isolated)             "I-EGB-" 4 X)
+         ( =iso-ir165                           "EGB-" 4 X)
+         ((latin-iso8859-1 . isolated)     "I-LATIN1-" 2 X)
+         ( latin-iso8859-1                   "LATIN1-" 2 X)
+         ((latin-iso8859-2 . isolated)     "I-LATIN2-" 2 X)
+         ( latin-iso8859-2                   "LATIN2-" 2 X)
+         ((latin-iso8859-3 . isolated)     "I-LATIN3-" 2 X)
+         ( latin-iso8859-3                   "LATIN3-" 2 X)
+         ((latin-iso8859-4 . isolated)     "I-LATIN4-" 2 X)
+         ( latin-iso8859-4                   "LATIN4-" 2 X)
+         ((cyrillic-iso8859-5 . isolated) "I-CYRILLIC-" 2 X)
+         ( cyrillic-iso8859-5              "CYRILLIC-" 2 X)
+         ((greek-iso8859-7 . isolated)      "I-GREEK-" 2 X)
+         ( greek-iso8859-7                    "GREEK-" 2 X)
+         ((hebrew-iso8859-8 . isolated)    "I-HEBREW-" 2 X)
+         ( hebrew-iso8859-8                  "HEBREW-" 2 X)
+         ((latin-iso8859-9 . isolated)     "I-LATIN5-" 2 X)
+         ( latin-iso8859-9                   "LATIN5-" 2 X)
+         ((latin-jisx0201 . isolated)      "I-LATINJ-" 2 X)
+         ( latin-jisx0201                    "LATINJ-" 2 X)
+         ((katakana-jisx0201 . isolated) "I-KATAKANA-" 2 X)
+         ( katakana-jisx0201               "KATAKANA-" 2 X)
+          ;; ((latin-viscii . isolated)        "I-VISCII-" 2 X)
+          ;; ( latin-viscii                      "VISCII-" 2 X)
+         ((latin-tcvn5712 . isolated)      "I-VSCII2-" 2 X)
+         ( latin-tcvn5712                    "VSCII2-" 2 X)
+         ((thai-tis620 . isolated)           "I-THAI-" 2 X)
+         ( thai-tis620                         "THAI-" 2 X)
+         ((lao . isolated)               "I-MULE-LAO-" 2 X)
+         ( lao                             "MULE-LAO-" 2 X)
+         ( ethiopic                      "MULE-ETHIO-" 4 X)
+         ((arabic-1-column . isolated)  "I-MULE-ARB1-" 2 X)
+         ( arabic-1-column                "MULE-ARB1-" 2 X)
+         ((arabic-2-column . isolated)  "I-MULE-ARB2-" 2 X)
+         ( arabic-2-column                "MULE-ARB2-" 2 X)
+         ((arabic-digit . isolated)     "I-MULE-ARBD-" 2 X)
+         ( arabic-digit                   "MULE-ARBD-" 2 X)
+         ((ipa . isolated)               "I-MULE-IPA-" 2 X)
+         ( ipa                             "MULE-IPA-" 2 X)
+         ((china3-jef . isolated)             "I-JC3-" 4 X)
          ( china3-jef                           "JC3-" 4 X)
+         ((chinese-big5 . isolated)             "I-B-" 4 X)
          ( chinese-big5                           "B-" 4 X)
          ( chinese-big5                          "C0-" 4 X)
+         ( =ucs@unicode                          "UU+" 4 X)
+         ( =ucs@unicode                          "UU-" 8 X)
+         ( =ucs@iso                               "U+" 4 X)
+         ( =ucs@iso                               "U-" 8 X)
+         ( =ucs@gb                               "GU+" 4 X)
+         ( =ucs@gb                               "GU-" 8 X)
+         ( =ucs@jis                              "JU+" 4 X)
+         ( =ucs@jis                              "JU-" 8 X)
+         ( =ucs@cns                              "CU+" 4 X)
+         ( =ucs@cns                              "CU-" 8 X)
+         ( =ucs@ks                               "KU+" 4 X)
+         ( =ucs@ks                               "KU-" 8 X)
          ))
 
   (make-coding-system