((=hanyo-denshi/jt . isolated) "I-HD-JT-" 4 X)
((=hanyo-denshi/ks . isolated) "I-HD-KS-" 6 d)
((=hanyo-denshi/ks/mf . isolated) "I-KSMF-" 5 d)
+ ( =hanyo-denshi/ja "HD-JA-" 4 X)
+ ( =hanyo-denshi/jb "HD-JB-" 4 X)
+ ( =hanyo-denshi/jc "HD-JC-" 4 X)
+ ( =hanyo-denshi/jd "HD-JD-" 4 X)
+ ( =hanyo-denshi/ft "HD-FT-" 4 X)
+ ( =hanyo-denshi/ia "HD-IA-" 4 X)
+ ( =hanyo-denshi/ib "HD-IB-" 4 X)
+ ( =hanyo-denshi/hg "HD-HG-" 4 X)
+ ( =hanyo-denshi/ip "HD-IP-" 4 X)
+ ( =hanyo-denshi/jt "HD-JT-" 4 X)
+ ( =hanyo-denshi/ks "HD-KS-" 6 d)
((=gt . isolated) "I-GT-" 5 d)
( =gt "GT-" 5 d)
((=jis-x0208@1990 . isolated) "I-J90-" 4 X)
((arabic-digit . isolated) "I-MULE-ARBD-" 2 X)
((ipa . isolated) "I-MULE-IPA-" 2 X)
((china3-jef . isolated) "I-JC3-" 4 X)
- ( =hanyo-denshi/ja "HD-JA-" 4 X)
- ( =hanyo-denshi/jb "HD-JB-" 4 X)
- ( =hanyo-denshi/jc "HD-JC-" 4 X)
- ( =hanyo-denshi/jd "HD-JD-" 4 X)
- ( =hanyo-denshi/ft "HD-FT-" 4 X)
- ( =hanyo-denshi/ia "HD-IA-" 4 X)
- ( =hanyo-denshi/ib "HD-IB-" 4 X)
- ( =hanyo-denshi/hg "HD-HG-" 4 X)
- ( =hanyo-denshi/ip "HD-IP-" 4 X)
- ( =hanyo-denshi/jt "HD-JT-" 4 X)
- ( =hanyo-denshi/ks "HD-KS-" 6 d)
( =zinbun-oracle "ZOB-" 4 d)
( =daikanwa/ho "M-H" 4 d)
( =daikanwa/+p "M-p" 5 d)
+ ( =daikanwa/+2p "M-2p" 5 d)
( =daikanwa "M-" 5 d)
( =daikanwa@rev2 "r2M-" 5 d)
( =daikanwa@rev1 "r1M-" 5 d)
( arabic-2-column "MULE-ARB2-" 2 X)
( arabic-digit "MULE-ARBD-" 2 X)
( ipa "MULE-IPA-" 2 X)
+ (=>>>adobe-japan1 "g2-AJ1-" 5 d)
(=>>>jis-x0208 "g2-J0-" 4 X)
(=>>>jis-x0208 "GI-J0-" 4 X)
(=>>>jis-x0213-1 "g2-JX1-" 4 X)
(=>>>jis-x0213-2 "g2-JX2-" 4 X)
(=>>>jis-x0213-1@2004 "g2-JX3-" 4 X)
(=>>>jis-x0213-1@2004 "GI-JX3-" 4 X)
- (=>>>adobe-japan1 "g2-AJ1-" 5 d)
+ (=>>>hanyo-denshi/ib "g2-HD-IB-" 4 X)
+ (=>>>hanyo-denshi/ft "g2-HD-FT-" 4 X)
(=>>>hanyo-denshi/jt "g2-HD-JT-" 4 X)
(=>>>gt "g2-GT-" 5 d)
- (=>>gt "G-GT-" 5 d)
+ (=>>adobe-japan1 "G-AJ1-" 5 d)
(=>>jis-x0208 "G-J0-" 4 X)
(=>>jis-x0213-1@2000 "G-JX1-" 4 X)
(=>>jis-x0213-2 "G-JX2-" 4 X)
(=>>jis-x0213-1@2004 "G-JX3-" 4 X)
- (=>>adobe-japan1 "G-AJ1-" 5 d)
- (=>>jis-x0208@1978 "G-J78-" 4 X)
- (=>>big5-cdp "G-CDP-" 4 X)
- (=>>gt-k "G-GT-K" 5 d)
- (=>>ruimoku-v6 "G-RUI6-" 4 X)
(=>>hanyo-denshi/ft "G-HD-FT-" 4 X)
(=>>hanyo-denshi/ia "G-HD-IA-" 4 X)
(=>>hanyo-denshi/ib "G-HD-IB-" 4 X)
(=>>hanyo-denshi/jt "G-HD-JT-" 4 X)
(=>>hanyo-denshi/ks "G-HD-KS-" 4 X)
+ (=>>gt "G-GT-" 5 d)
+ (=>>jis-x0208@1978 "G-J78-" 4 X)
+ (=>>cns11643-4 "G-C4-" 4 X)
+ (=>>big5-cdp "G-CDP-" 4 X)
+ (=>>gt-k "G-GT-K" 5 d)
+ (=>>ruimoku-v6 "G-RUI6-" 4 X)
(=>>cbeta "G-CB" 5 d)
(=+>jis-x0208 "o-J0-" 4 X)
(=+>jis-x0213-1 "o-JX1-" 4 X)
))
(make-coding-system
+ 'utf-8-ivs-mcs 'utf-8
+ "Coding-system of UTF-8 with IVS."
+ '(mnemonic "MTF8i" enable-decomposition t))
+
+ (make-coding-system
'utf-8-mcs-er 'utf-8
"Coding-system of UTF-8 with entity-reference."
'(mnemonic "MTF8r" use-entity-reference t))
(make-coding-system
+ 'utf-8-ivs-mcs-er 'utf-8
+ "Coding-system of UTF-8 with IVS and entity-reference."
+ '(mnemonic "MTF8ir" enable-decomposition t use-entity-reference t))
+
+ (make-coding-system
'utf-8-mcs-no-composition 'utf-8
"Coding-system of UTF-8 without composition."
'(mnemonic "MTF8-nc" disable-composition t))
'utf-8-gb 'utf-8
"Coding-system of UTF-8 using GB mapping."
'(mnemonic "UTF8G"
- charset-g0 ucs-gb
- charset-g1 =>ucs-gb
+ charset-g0 =ucs@gb
+ charset-g1 =>ucs@unicode
charset-g2 =>ucs))
(make-coding-system
+ 'utf-8-ivs-gb 'utf-8
+ "Coding-system of UTF-8 using GB mapping with IVS."
+ '(mnemonic "UTF8iG"
+ charset-g0 =ucs@gb
+ charset-g1 =>ucs@unicode
+ charset-g2 =>ucs
+ enable-decomposition t))
+
+ (make-coding-system
'utf-8-gb-er 'utf-8
"Coding-system of UTF-8 using GB mapping with entity-reference."
'(mnemonic "UTF8Gr"
- charset-g0 ucs-gb
- charset-g1 =>ucs-gb
+ charset-g0 =ucs@gb
+ charset-g1 =>ucs@unicode
+ charset-g2 =>ucs
+ use-entity-reference t))
+
+ (make-coding-system
+ 'utf-8-ivs-gb-er 'utf-8
+ "Coding-system of UTF-8 using GB mapping with IVS and entity-reference."
+ '(mnemonic "UTF8iGr"
+ charset-g0 =ucs@gb
+ charset-g1 =>ucs@unicode
charset-g2 =>ucs
+ enable-decomposition t
use-entity-reference t))
(make-coding-system
'utf-8-cns 'utf-8
"Coding-system of UTF-8 using CNS mapping."
'(mnemonic "UTF8C"
- charset-g0 ucs-cns
- charset-g1 =>ucs-cns
+ charset-g0 =ucs@cns
+ charset-g1 =>ucs@cns
charset-g2 =>ucs))
(make-coding-system
+ 'utf-8-ivs-cns 'utf-8
+ "Coding-system of UTF-8 using CNS mapping with IVS."
+ '(mnemonic "UTF8iC"
+ charset-g0 =ucs@cns
+ charset-g1 =>ucs@cns
+ charset-g2 =>ucs
+ enable-decomposition t))
+
+ (make-coding-system
'utf-8-cns-er 'utf-8
"Coding-system of UTF-8 using CNS mapping with entity-reference."
'(mnemonic "UTF8Cr"
- charset-g0 ucs-cns
- charset-g1 =>ucs-cns
+ charset-g0 =ucs@cns
+ charset-g1 =>ucs@cns
charset-g2 =>ucs
use-entity-reference t))
(make-coding-system
+ 'utf-8-ivs-cns-er 'utf-8
+ "Coding-system of UTF-8 using CNS mapping with IVS and entity-reference."
+ '(mnemonic "UTF8iCr"
+ charset-g0 =ucs@cns
+ charset-g1 =>ucs@cns
+ charset-g2 =>ucs
+ enable-decomposition t
+ use-entity-reference t))
+
+ (make-coding-system
'utf-8-big5 'utf-8
"Coding-system of UTF-8 using Big5 mapping."
'(mnemonic "UTF8B"
- charset-g0 ucs-big5
- charset-g1 =>ucs-big5
+ charset-g0 =ucs@big5
+ charset-g1 =>ucs@big5
charset-g2 =>ucs))
(make-coding-system
+ 'utf-8-ivs-big5 'utf-8
+ "Coding-system of UTF-8 using Big5 mapping with IVS."
+ '(mnemonic "UTF8iB"
+ charset-g0 =ucs@big5
+ charset-g1 =>ucs@big5
+ charset-g2 =>ucs
+ enable-decomposition t))
+
+ (make-coding-system
'utf-8-big5-er 'utf-8
"Coding-system of UTF-8 using Big5 mapping with entity-reference."
'(mnemonic "UTF8Br"
- charset-g0 ucs-big5
- charset-g1 =>ucs-big5
+ charset-g0 =ucs@big5
+ charset-g1 =>ucs@big5
charset-g2 =>ucs
use-entity-reference t))
(make-coding-system
+ 'utf-8-ivs-big5-er 'utf-8
+ "Coding-system of UTF-8 using Big5 mapping with IVS and entity-reference."
+ '(mnemonic "UTF8iBr"
+ charset-g0 =ucs@big5
+ charset-g1 =>ucs@big5
+ charset-g2 =>ucs
+ enable-decomposition t
+ use-entity-reference t))
+
+ (make-coding-system
'utf-8-jis 'utf-8
- "Coding-system of UTF-8 using JIS mapping."
- '(mnemonic "UTF8J"
- charset-g0 =ucs@jis-2000
- charset-g1 =>ucs-jis
+ "Coding-system of UTF-8 using JIS2000 mapping."
+ '(mnemonic "UTF8J00"
+ charset-g0 =ucs@jis/2000
+ charset-g1 =>ucs@jis
charset-g2 =>ucs))
(make-coding-system
+ 'utf-8-ivs-jis 'utf-8
+ "Coding-system of UTF-8 using JIS2000 mapping with IVS."
+ '(mnemonic "UTF8iJ00"
+ charset-g0 =ucs@jis/2000
+ charset-g1 =>ucs@jis
+ charset-g2 =>ucs
+ enable-decomposition t))
+
+ (make-coding-system
'utf-8-jis-er 'utf-8
- "Coding-system of UTF-8 using JIS mapping with entity-reference."
- '(mnemonic "UTF8Jr"
- charset-g0 =ucs@jis-2000
- charset-g1 =>ucs-jis
+ "Coding-system of UTF-8 using JIS2000 mapping with entity-reference."
+ '(mnemonic "UTF8J00r"
+ charset-g0 =ucs@jis/2000
+ charset-g1 =>ucs@jis
+ charset-g2 =>ucs
+ use-entity-reference t))
+
+ (make-coding-system
+ 'utf-8-ivs-jis-er 'utf-8
+ "Coding-system of UTF-8 using JIS2000 mapping with IVS and entity-reference."
+ '(mnemonic "UTF8iJ00r"
+ charset-g0 =ucs@jis/2000
+ charset-g1 =>ucs@jis
charset-g2 =>ucs
+ enable-decomposition t
use-entity-reference t))
(make-coding-system
'utf-8-jp 'utf-8
- "Coding-system of UTF-8 for common glyphs used in Japan."
- '(mnemonic "UTF8J"
- charset-g0 =ucs@jp
- charset-g1 =>ucs-jis
+ "Coding-system of UTF-8 using =ucs@JP mapping."
+ '(mnemonic "UTF8JP"
+ charset-g0 =ucs@JP
+ charset-g1 =>ucs@jis
charset-g2 =>ucs))
(make-coding-system
+ 'utf-8-ivs-jp 'utf-8
+ "Coding-system of UTF-8 using =ucs@JP mapping with IVS."
+ '(mnemonic "UTF8iJP"
+ charset-g0 =ucs@JP
+ charset-g1 =>ucs@jis
+ charset-g2 =>ucs
+ enable-decomposition t))
+
+ (make-coding-system
'utf-8-jp-er 'utf-8
- "Coding-system of UTF-8 using =ucs@jp mapping with entity-reference."
- '(mnemonic "UTF8Jr"
- charset-g0 =ucs@jp
- charset-g1 =>ucs-jis
+ "Coding-system of UTF-8 using =ucs@JP mapping with entity-reference."
+ '(mnemonic "UTF8JPr"
+ charset-g0 =ucs@JP
+ charset-g1 =>ucs@jis
+ charset-g2 =>ucs
+ use-entity-reference t))
+
+ (make-coding-system
+ 'utf-8-ivs-jp-er 'utf-8
+ "Coding-system of UTF-8 using =ucs@JP mapping with IVS and entity-reference."
+ '(mnemonic "UTF8iJPr"
+ charset-g0 =ucs@JP
+ charset-g1 =>ucs@jis
charset-g2 =>ucs
+ enable-decomposition t
use-entity-reference t))
(make-coding-system
'utf-8-ks 'utf-8
"Coding-system of UTF-8 using KS mapping."
'(mnemonic "UTF8K"
- charset-g0 ucs-ks
- charset-g1 =>ucs-ks
+ charset-g0 =ucs@ks
+ charset-g1 =>ucs@ks
charset-g2 =>ucs))
(make-coding-system
+ 'utf-8-ivs-ks 'utf-8
+ "Coding-system of UTF-8 using KS mapping with IVS."
+ '(mnemonic "UTF8iK"
+ charset-g0 =ucs@ks
+ charset-g1 =>ucs@ks
+ charset-g2 =>ucs
+ enable-decomposition t))
+
+ (make-coding-system
'utf-8-ks-er 'utf-8
"Coding-system of UTF-8 using KS mapping with entity-reference."
'(mnemonic "UTF8Kr"
- charset-g0 ucs-ks
- charset-g1 =>ucs-ks
+ charset-g0 =ucs@ks
+ charset-g1 =>ucs@ks
+ charset-g2 =>ucs
+ use-entity-reference t))
+
+ (make-coding-system
+ 'utf-8-ivs-ks-er 'utf-8
+ "Coding-system of UTF-8 using KS mapping with IVS and entity-reference."
+ '(mnemonic "UTF8iKr"
+ charset-g0 =ucs@ks
+ charset-g1 =>ucs@ks
charset-g2 =>ucs
+ enable-decomposition t
use-entity-reference t))
(define-coding-system-alias 'utf-8 'utf-8-mcs)
projects / chise / xemacs-chise.git / blobdiff