X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmule%2Fmule-conf.el;h=3953ccb87cd85b2308c9a705806fb06dc405233f;hb=ccc0d373cbd1de9ea8363eeae71739ed89c2fae1;hp=74a09b414948ad8173e0a126a1af5a88c4d1cf4e;hpb=c366c90ad2dc897fd3a5e06cbab0b7d63dd7ccc9;p=chise%2Fxemacs-chise.git.1 diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el index 74a09b4..3953ccb 100644 --- a/lisp/mule/mule-conf.el +++ b/lisp/mule/mule-conf.el @@ -321,7 +321,7 @@ (make-charset '=>>>jis-x0208 - "JIS X 0208 abstract glyph-images (unchanged part)." + "JIS X 0208 abstract glyph-forms (unchanged part)." '(registry "jisx0208\\.1990" dimension 2 chars 94 @@ -330,8 +330,27 @@ ;; final ?B graphic 0)) (make-charset + '=>>>jis-x0208@1978 + "JIS X 0208:1978 abstract glyph-forms." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + mother =>>>jis-x0208 + =>iso-ir 42 + ;; final ?@ + graphic 0)) + (make-charset + '=>>>jis-x0208@1983 + "JIS X 0208:1983 abstract glyph-forms." + '(registry "jisx0208\\.1983" + dimension 2 + chars 94 + mother =>>>jis-x0208 + =>iso-ir 87 + graphic 0)) + (make-charset '=>>>jis-x0208@1990 - "JIS X 0208:1990 abstract glyph-images." + "JIS X 0208:1990 abstract glyph-forms." '(registry "jisx0208\\.1990" dimension 2 chars 94 @@ -341,7 +360,7 @@ graphic 0)) (make-charset '=>>>jis-x0213-1 - "JIS X 0213 Plain 1 abstract glyph-images (unchanged part)" + "JIS X 0213 Plain 1 abstract glyph-forms (unchanged part)" '(registry "jisx0213\\(\\.[0-9]+\\)?-1" dimension 2 chars 94 @@ -351,6 +370,36 @@ graphic 0 ;; partial t )) + (make-charset + '=>>>jis-x0213-1@2000 + "JIS X 0213:2000 Plain 1 abstract glyph-forms" + '(registry "jisx0213\\(\\.2000\\)-1" + dimension 2 + chars 94 + mother =>>>jis-x0213-1 + =>iso-ir 228 + ;; final ?O + graphic 0 + ;; partial t + )) + (make-charset + '=>>>jis-x0213-1@2004 + "JIS X 0213:2004 Plain 1 abstract glyph-forms" + '(mother =>>>jis-x0213-1 + =>iso-ir 233 + ;; registry "jisx0213\\(\\.2004\\)-1" + dimension 2 + chars 94 + graphic 0)) + (make-charset + '=>>>jis-x0213-2 + "JIS X 0213 Plain 2 abstract glyph-forms" + '(mother =jis-x0213-2 + =>iso-ir 229 + registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2" + dimension 2 + chars 94 + graphic 0)) (make-charset '=>>jis-x0208 @@ -364,7 +413,7 @@ graphic 0)) (make-charset '=>>jis-x0208@1978 - "JIS X 0208:1978 abstract glyphs (unchanged part)." + "JIS X 0208:1978 abstract glyphs." '(registry "jisx0208\\.1978" dimension 2 chars 94 @@ -372,6 +421,24 @@ =>iso-ir 42 ;; final ?@ graphic 0)) + (make-charset + '=>>jis-x0208@1983 + "JIS X 0208:1983 abstract glyphs." + '(registry "jisx0208\\.1983" + dimension 2 + chars 94 + mother =>>jis-x0208 + =>iso-ir 87 + graphic 0)) + (make-charset + '=>>jis-x0208@1990 + "JIS X 0208:1990 abstract glyphs." + '(registry "jisx0208\\.1990" + dimension 2 + chars 94 + mother =>>jis-x0208 + =>iso-ir 168 + graphic 0)) (make-charset '=>>jis-x0213-1 @@ -403,7 +470,7 @@ '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2" dimension 2 chars 94 - mother =jis-x0213-2 + mother =>>>jis-x0213-2 =>iso-ir 229 ;; final ?P graphic 0)) @@ -605,6 +672,15 @@ graphic 2 direction l2r mother =gt-k)) + (make-charset '=>gt-k + "GT-K abstract characters" + '(long-name "GT-K abstract characters" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =>>gt-k)) (let ((i 1)) (while (<= i 11) (make-charset @@ -1011,8 +1087,8 @@ mother =>ucs@unicode)) (make-charset '=>>ucs@iso - "Representative abstract glyphs of ISO/IEC 10646" - '(long-name "UCS glyphs for UCS" + "Representative abstract-glyphs of ISO/IEC 10646" + '(long-name "UCS abstract glyphs for UCS" chars 256 dimension 3 columns 2 @@ -1021,7 +1097,7 @@ =>iso-ir 177 mother =>ucs@iso)) (make-charset '=>>ucs@unicode - "Representative abstract glyphs of Unicode" + "Representative abstract-glyphs of Unicode" '(long-name "Unicode abstract glyphs" chars 256 dimension 3 @@ -1031,8 +1107,8 @@ =>iso-ir 177 mother =>>ucs@iso)) (make-charset '=>>ucs@jis - "UCS Representative glyphs for JIS X0208/0212/0213" - '(long-name "UCS glyphs for JIS" + "UCS Representative abstract-glyphs for JIS X0208/0212/0213" + '(long-name "UCS abstract glyphs for JIS" chars 256 dimension 3 columns 2 @@ -1070,6 +1146,16 @@ direction l2r =>iso-ir 177 mother =>>ucs@jis)) + (make-charset '=>>ucs@JP + "UCS abstract-glyphs based on Japanese style glyphs" + '(long-name "UCS glyphs for JP" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>ucs@jis/2004)) (make-charset '=>>ucs@ks "UCS Representative glyphs for Korean Standards" '(long-name "UCS glyphs for KS" @@ -1091,6 +1177,77 @@ =>iso-ir 177 mother =>>ucs@unicode)) + (make-charset '=>>>ucs@iso + "Representative glyph-forms of ISO/IEC 10646" + '(long-name "UCS glyph-forms for UCS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>ucs@iso)) + (make-charset '=>>>ucs@unicode + "Representative glyph-forms of Unicode" + '(long-name "UCS glyph-forms for Unicode" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@iso)) + (make-charset '=>>>ucs@jis + "UCS Representative glyph-forms for JIS X0208/0212/0213" + '(long-name "UCS glyph-forms for JIS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@unicode)) + (make-charset '=>>>ucs@jis/1990 + "UCS Representative glyph-forms for JIS X 0208/0212:1990" + '(long-name "UCS glyph-forms for JIS:1990" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@jis)) + (make-charset '=>>>ucs@jis/2004 + "UCS Representative glyph-forms for JIS X 0213:2004" + '(long-name "UCS glyph-forms for JIS:2004" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@jis)) + (make-charset '=>>>ucs@ks + "UCS Representative glyph-forms for Korean Standards" + '(long-name "UCS glyph-forms for KS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@unicode)) + (make-charset '=>>>ucs@cns + "UCS Representative glyph-forms for CNS 11643 sources" + '(long-name "UCS glyph-forms for CNS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>>ucs@unicode)) + (make-charset '=ucs@iso "ISO/IEC 10646 for its representative glyphs" '(long-name "UCS for ISO" @@ -1100,7 +1257,7 @@ graphic 2 direction l2r =>iso-ir 177 - mother =>>ucs@iso)) + mother =>>>ucs@iso)) (make-charset '=ucs@unicode "Unicode for its representative glyphs" '(long-name "UCS for Unicode" @@ -1207,6 +1364,16 @@ mother =ucs@jis min-code #x0000 max-code #xFFFF)) + ;; (make-charset '=ucs@jis/1983 + ;; "ISO/IEC 10646 for JIS X 0208:1983" + ;; '(long-name "UCS for JIS:1983" + ;; chars 256 + ;; dimension 3 + ;; columns 2 + ;; graphic 2 + ;; direction l2r + ;; =>iso-ir 177 + ;; mother =ucs@jis)) (make-charset '=ucs@jis/1990 "ISO/IEC 10646 for JIS X 0208/0212:1990" '(long-name "UCS for JIS:1990" @@ -1610,6 +1777,111 @@ min-code ,(+ (lsh #x6400 16) (* 94 94 6)) max-code ,(+ (lsh #x6400 16) (1- (* 94 94 7))) code-offset ,(+ (lsh #x6400 16) (* 94 94 6)))) + (make-charset + '=hanyo-denshi/hg + "HG (HyouGai Kanji) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/HG" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.HG-0$" + min-code ,(+ (lsh #x6400 16) (* 94 94 7)) + max-code ,(+ (lsh #x6400 16) (1- (* 94 94 8))) + code-offset ,(+ (lsh #x6400 16) (* 94 94 7)))) + (make-charset + '=hanyo-denshi/ip + "IP (for IPA) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/IP" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IP-0$" + min-code ,(+ (lsh #x6402 16) #x4E00) + max-code ,(+ (lsh #x6402 16) #x9FFF) + code-offset ,(+ (lsh #x6402 16)))) + (make-charset + '=hanyo-denshi/jt + "JT (Juuki Touitsu Moji) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/JT" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JT-0$" + min-code ,(+ (lsh #x6402 16) #xAC00) + max-code ,(+ (lsh #x6402 16) #xD7AF) + code-offset ,(+ (lsh #x6402 16)))) + (make-charset + '=hanyo-denshi/ks + "KS (KoSeki) part of Han'you-Denshi characters" + `(long-name "Han'you-Denshi/KS font encoding" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r)) + (make-charset + '=hanyo-denshi/ks/mf + "font encoding for KS (KoSeki) characters" + `(long-name "Han'you-Denshi/KS font encoding" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.KSMF-0$" + min-code ,(lsh #x6403 16) + max-code ,(+ (lsh #x6403 16) #xFFFF) + code-offset ,(lsh #x6403 16))) + + (make-charset + '=>>hanyo-denshi/ft + "Han'you-Denshi/FT abstract glyphs" + '(long-name "Han'you-Denshi/FT glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.FT-0$" + mother =hanyo-denshi/ft)) + (make-charset + '=>>hanyo-denshi/ib + "Han'you-Denshi/IB abstract glyphs" + '(long-name "Han'you-Denshi/IB abstract glyphs" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IB-0$" + mother =hanyo-denshi/ib)) + (make-charset + '=>>hanyo-denshi/jt + "JT (Juuki Touitsu Moji) abstract glyphs" + '(long-name "Han'you-Denshi/JT glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JT-0$" + mother =hanyo-denshi/jt)) + (make-charset + '=>>hanyo-denshi/ks + "Han'you-Denshi/KS abstract glyphs" + '(long-name "Han'you-Denshi/KS glyphs" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + mother =hanyo-denshi/ks)) ) ;;; mule-conf.el ends here