X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lisp%2Fmule%2Fmule-conf.el;h=271adb87259a539603e2e8c5f3754d45082c0685;hb=180d66355d7b8bcbaa4613e9d4b493c1eed59a26;hp=66badbea36502dc51977c0fb2da4636e0ca318d6;hpb=690b3da4bcf00e4f66bc24f7bb2bc085b50bad48;p=chise%2Fxemacs-chise.git- diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el index 66badbe..271adb8 100644 --- a/lisp/mule/mule-conf.el +++ b/lisp/mule/mule-conf.el @@ -3,7 +3,7 @@ ;; Copyright (C) 1995,1999 Electrotechnical Laboratory, JAPAN. ;; Licensed to the Free Software Foundation. ;; Copyright (C) 1997, 1999, 2000, 2002, 2003, 2004, 2005, 2006, 2008, -;; 2009, 2010, 2011, 2012, 2013, 2014 MORIOKA Tomohiko +;; 2009, 2010, 2011, 2012, 2013, 2014, 2015 MORIOKA Tomohiko ;; Keywords: mule, multilingual, character set, coding system @@ -787,6 +787,96 @@ ;; final ?@ graphic 0)) (make-charset + '==jis-x0208@1978/-4pr + "JIS X 0208:1978, 1st - 3rd impressions." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + mother ==jis-x0208@1978 + =>iso-ir 42 + ;; final ?@ + graphic 0 + ;; partial t + )) + (make-charset + '==jis-x0208@1978/1pr + "JIS X 0208:1978, 1st impression." + '(registry "jisx0208\\.1978" + =>iso-ir 42 + dimension 2 + chars 94 + mother ==jis-x0208@1978/-4pr + ;; final ?@ + graphic 0)) + (make-charset + '==jis-x0208@1978/1pr/fixed + "JIS X 0208:1978, correct glyph in the errata of 1st impression." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + mother ==jis-x0208@1978/1pr + =>iso-ir 42 + ;; final ?@ + graphic 0 + partial t)) + (make-charset + '==jis-x0208@1978/-4X + "JIS X 0208:1978, index before the 4th impression." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + mother ==jis-x0208@1978 + =>iso-ir 42 + ;; final ?@ + graphic 0 + partial t)) + (make-charset + '==jis-x0208@1978/2-pr + "JIS X 0208:1978, 2nd impression or later." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + ;; mother =jis-x0208@1978/1er-pr + mother ==jis-x0208@1978 + =>iso-ir 42 + ;; final ?@ + graphic 0 + ;; partial t + )) + (make-charset + '==jis-x0208@1978/4er + "JIS X 0208:1978, replaced by errata of 4th impression." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + mother ==jis-x0208@1978/2-pr + =>iso-ir 42 + ;; final ?@ + graphic 0 + partial t)) + (make-charset + '==jis-x0208@1978/4-pr + "JIS X 0208:1978, 4th impression or later." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + mother ==jis-x0208@1978/2-pr + =>iso-ir 42 + ;; final ?@ + graphic 0 + partial t)) + (make-charset + '==jis-x0208@1978/5pr + "JIS X 0208:1978, 5th impression." + '(registry "jisx0208\\.1978" + dimension 2 + chars 94 + mother ==jis-x0208@1978/4-pr + =>iso-ir 42 + ;; final ?@ + graphic 0 + partial t)) + (make-charset '==jis-x0208@1983 "JIS X 0208:1983 abstract glyph-forms." '(registry "jisx0208\\.1983" @@ -927,7 +1017,7 @@ '(registry "jisx0208\\.1978" dimension 2 chars 94 - mother ===jis-x0208 + mother ==jis-x0208@1978 =>iso-ir 42 ;; final ?@ graphic 0)) @@ -937,7 +1027,7 @@ '(registry "jisx0208\\.1983" dimension 2 chars 94 - mother ===jis-x0208 + mother ==jis-x0208@1983 =>iso-ir 87 graphic 0)) (make-charset @@ -946,7 +1036,7 @@ '(registry "jisx0208\\.1990" dimension 2 chars 94 - mother ===jis-x0208 + mother ==jis-x0208@1990 =>iso-ir 168 ;; final ?B graphic 0)) @@ -969,7 +1059,7 @@ '(registry "jisx0213\\(\\.2000\\)-1" dimension 2 chars 94 - mother ===jis-x0213-1 + mother ==jis-x0213-1@2000 =>iso-ir 228 ;; final ?O graphic 0 @@ -978,7 +1068,7 @@ (make-charset '===jis-x0213-1@2004 "JIS X 0213:2004 Plain 1 detailed representative glyph-images." - '(mother ===jis-x0213-1 + '(mother ==jis-x0213-1@2004 =>iso-ir 233 ;; registry "jisx0213\\(\\.2004\\)-1" dimension 2 @@ -1420,6 +1510,15 @@ =>iso-ir 172 graphic 0)) (make-charset + '=>cns11643-5 + "CNS 11643 Plane 5 abstract characters." + '(registry "CNS11643[.-]\\(.*[.-]\\)?5$" + dimension 2 + chars 94 + mother =cns11643-5 + =>iso-ir 185 + graphic 0)) + (make-charset '=>cns11643-6 "CNS 11643 Plane 6 abstract characters." '(registry "CNS11643[.-]\\(.*[.-]\\)?6$" @@ -1877,14 +1976,24 @@ (make-charset '=koseki - "Representative glyph-images of KoSeki-touitsu-moji." - '(long-name "KoSeki-touitsu-moji" + "Abstract glyph-forms of KoSeki-touitsu-moji." + '(long-name "KoSeki-touitsu-moji glyph-forms" chars 256 dimension 3 columns 2 graphic 2 direction l2r mother =hanyo-denshi/ks)) + (make-charset + '==koseki + "Representative glyph-images of KoSeki-touitsu-moji." + '(long-name "KoSeki-touitsu-moji glyph-images" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + mother =koseki)) (define-charset-alias '=>>>hanyo-denshi/ja '==hanyo-denshi/ja) (define-charset-alias '=>>>hanyo-denshi/jb '==hanyo-denshi/jb) @@ -1908,6 +2017,39 @@ ;; registry "HanyoDenshi\\.JA-0$" ;; mother ==hanyo-denshi/ja)) (make-charset + '===hanyo-denshi/jb + "Han'you-Denshi/JB detailed glyph-images." + '(long-name "Han'you-Denshi/JB glyph-images" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JB-0$" + mother ==hanyo-denshi/jb)) + (make-charset + '===hanyo-denshi/jc + "Han'you-Denshi/JC representative glyph-images." + '(long-name "Han'you-Denshi/JC glyph-images" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JC-0$" + mother ==hanyo-denshi/jc)) + (make-charset + '===hanyo-denshi/jd + "Han'you-Denshi/JD representative glyph-images." + '(long-name "Han'you-Denshi/JD glyph-images" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JD-0$" + mother ==hanyo-denshi/jd)) + (make-charset '===hanyo-denshi/ft "Han'you-Denshi/FT detailed glyph-images." '(long-name "Han'you-Denshi/FT glyph-images" @@ -1919,6 +2061,17 @@ registry "HanyoDenshi\\.FT-0$" mother ==hanyo-denshi/ft)) (make-charset + '===hanyo-denshi/ia + "Han'you-Denshi/IA detailed glyph-images." + '(long-name "Han'you-Denshi/IA glyph-images" + chars 94 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IA-0$" + mother ==hanyo-denshi/ia)) + (make-charset '===hanyo-denshi/ib "Han'you-Denshi/IB detailed glyph-images." '(long-name "Han'you-Denshi/IB glyph-images" @@ -1941,6 +2094,17 @@ registry "HanyoDenshi\\.HG-0$" mother ==hanyo-denshi/hg)) (make-charset + '===hanyo-denshi/ip + "Han'you-Denshi/IP representative glyph-images." + '(long-name "Han'you-Denshi/IP glyph-images" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.IP-0$" + mother ==hanyo-denshi/ip)) + (make-charset '===hanyo-denshi/jt "JT (Juuki Touitsu Moji) detailed glyph-images." '(long-name "Han'you-Denshi/JT glyph-images" @@ -2014,6 +2178,29 @@ code-offset #x10000)) (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/jt + "JT (Juuki Touitsu Moji) unified abstract glyphs." + '(long-name "Han'you-Denshi/JT unified glyphs" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "HanyoDenshi\\.JT-0$" + mother =hanyo-denshi/jt)) + + (make-charset '=>>mj "Moji-Jouhou-Kiban abstract glyphs." '(long-name "MJ glyphs" @@ -2382,6 +2569,15 @@ graphic 2 direction l2r mother =daikanwa/+p)) + (make-charset '==daikanwa/+2p + "Daikanwa detailed glyph-images (ddddd'')" + '(long-name "Daikanwa glyph-images ddddd''" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + mother =daikanwa/+2p)) (make-charset '==daikanwa/ho "Daikanwa detailed glyph-images (Hokan)" '(long-name "Daikanwa-ho detailed glyph-images" @@ -2609,130 +2805,318 @@ hzk-max (+ hzk-min 65535)) (setq i (1+ i)))) - (make-charset '=cbeta "CBETA private characters" - '(long-name "CBETA PUA" + (make-charset '===hng-jou "HNG:誠實論卷八（P.2179）" + '(long-name "HNG/P2179" chars 256 dimension 2 - registry "cbeta-0" + registry "hng-1$" graphic 2 - min-code #xE20000 - max-code #xE2FFFF - code-offset #xE20000 columns 2 direction l2r)) - (define-charset-alias 'ideograph-cbeta '=cbeta) - (make-charset '==cbeta "CBETA private characters" - '(long-name "CBETA PUA glyph-images" + (make-charset '===hng-keg "HNG:華嚴經卷十六（S.2067）" + '(long-name "HNG/S2067" chars 256 dimension 2 - registry "cbeta-0" + registry "hng-2$" graphic 2 columns 2 - direction l2r - mother =cbeta)) - (make-charset '===cbeta "CBETA private characters" - '(long-name "CBETA PUA glyph-images" + direction l2r)) + (make-charset '===hng-dng "HNG:大般涅槃經卷十一（S.81）" + '(long-name "HNG/S81" chars 256 dimension 2 - registry "cbeta-0" + registry "hng-3$" graphic 2 columns 2 - direction l2r - mother ==cbeta)) - (make-charset '=>>cbeta "CBETA abstract glyphs" - '(long-name "CBETA glyphs" + direction l2r)) + (make-charset '===hng-khi "HNG:妙法蓮華經卷五（今西本）" + '(long-name "HNG/宮廷今西" chars 256 dimension 2 - registry "cbeta-0" + registry "hng-10$" graphic 2 columns 2 - direction l2r - mother =cbeta)) - - (make-charset '=zinbun-oracle - "Oracle Bones Script" - `(long-name "Oracle Bones Script in Zinbun, Kyoto Univ." + direction l2r)) + (make-charset '===hng-khm "HNG:妙法蓮華經卷三（守屋本）" + '(long-name "HNG/宮廷守屋" chars 256 dimension 2 - registry "zob1968-0" + registry "hng-11$" graphic 2 - min-code #xE70000 - max-code ,(+ #xE70000 8192) - code-offset #xE70000 columns 2 direction l2r)) - - (make-charset '=>zinbun-oracle - "Abstract Oracle Bones" - '(long-name "Abstract characters of Zinbun Oracle Bones." + (make-charset '===hng-kak "HNG:開成石經孝經" + '(long-name "HNG/開成孝經" chars 256 dimension 2 - mother =zinbun-oracle - registry "zob1968-0" + registry "hng-17$" graphic 2 columns 2 direction l2r)) - - (make-charset '=jef-china3 - "JEF + CHINA3 private characters" - '(long-name "JEF + CHINA3" + (make-charset '===hng-sys "HNG:瑜伽師地論卷三十（S.5309）" + '(long-name "HNG/S5309" chars 256 dimension 2 - columns 2 + registry "hng-22$" graphic 2 - direction l2r - registry "china3jef-0" - min-code #xE80000 - max-code #xE8FFFF - code-offset #xE80000)) - (define-charset-alias 'china3-jef '=jef-china3) - (make-charset '==jef-china3 - "JEF + CHINA3 abstract glyph-images." - '(long-name "JEF + CHINA3" + columns 2 + direction l2r)) + (make-charset '===hng-tsu "HNG:通典卷一" + '(long-name "HNG/通典卷一" chars 256 dimension 2 - columns 2 + registry "hng-24$" graphic 2 - direction l2r - registry "china3jef-0" - mother =jef-china3)) - (make-charset '===jef-china3 - "JEF + CHINA3 glyph-images." - '(long-name "JEF-CHINA3 glyph-images" + columns 2 + direction l2r)) + (make-charset '===hng-hod "HNG:法藏和尚傳（高山寺本）" + '(long-name "HNG/法藏和尚" chars 256 dimension 2 - columns 2 + registry "hng-30$" graphic 2 - direction l2r - registry "china3jef-0" - mother ==jef-china3)) - - (make-charset '=ruimoku-v6 - "private characters used in RUIMOKU Version.6" - `(long-name "RUI6" + columns 2 + direction l2r)) + (make-charset '===hng-gok "HNG:後漢書光武帝紀" + '(long-name "HNG/光武帝紀" chars 256 dimension 2 + registry "hng-31$" + graphic 2 columns 2 + direction l2r)) + (make-charset '===hng-k24 "HNG:日本書紀 卷二十四（寛文九年版）" + '(long-name "HNG/寛九紀24" + chars 256 + dimension 2 + registry "hng-37$" graphic 2 - direction l2r - registry "rui6-0" - ;; mother ucs - min-code #xE90000 ; #xE000 - max-code #xE908FF ; #xE8FF - code-offset ,(- #xE90000 #xE000))) - (make-charset '==ruimoku-v6 - "RUIMOKU Version.6 glyph-images." - '(long-name "RUI6 glyph-images." + columns 2 + direction l2r)) + (make-charset '===hng-kcj "HNG:日本書紀 卷二（慶長十五年版）" + '(long-name "HNG/慶長紀2" chars 256 dimension 2 + registry "hng-42$" + graphic 2 columns 2 + direction l2r)) + (make-charset '===hng-kbk "HNG:日本書紀 卷二（寛文九年版）" + '(long-name "HNG/寛九紀2" + chars 256 + dimension 2 + registry "hng-43$" graphic 2 - direction l2r - registry "rui6-0" - mother =ruimoku-v6)) - (make-charset '=>>ruimoku-v6 - "RUIMOKU Version.6 glyphs" - '(long-name "RUI6 glyphs" + columns 2 + direction l2r)) + (make-charset '===hng-sik "HNG:花嚴經卷八（新羅本寫本）" + '(long-name "HNG/花嚴新羅" + chars 256 + dimension 2 + registry "hng-44$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '===hng-skk "HNG:華嚴經卷二十（晉本高麗古版）" + '(long-name "HNG/古麗華20" + chars 256 + dimension 2 + registry "hng-46$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '===hng-kyu "HNG:初麗瑜5" + '(long-name "HNG/瑜伽師地論卷五（高麗初彫本）" + chars 256 + dimension 2 + registry "hng-47$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '===hng-ksk "HNG:華嚴經卷六（高麗再彫本）" + '(long-name "HNG/再麗華6" + chars 256 + dimension 2 + registry "hng-48$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '===hng-wan "HNG:華嚴經卷三十八（趙氏藏本）" + '(long-name "HNG/和寧華38" + chars 256 + dimension 2 + registry "hng-49$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '===hng-kss "HNG:華嚴信種義（明惠自筆）" + '(long-name "HNG/華嚴信種" + chars 256 + dimension 2 + registry "hng-64$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '===hng-kyo "HNG:教行信証卷四（親鸞自筆）" + '(long-name "HNG/教行信証" + chars 256 + dimension 2 + registry "hng-66$" + graphic 2 + columns 2 + direction l2r)) + (make-charset '===hng-smk "HNG:西夏版妙法蓮華經卷一" + '(long-name "HNG/西夏法華" + chars 256 + dimension 2 + registry "hng-74$" + graphic 2 + columns 2 + direction l2r)) + + (make-charset '=cbeta "CBETA private characters" + '(long-name "CBETA PUA" + chars 256 + dimension 2 + registry "cbeta-0" + graphic 2 + min-code #xE20000 + max-code #xE2FFFF + code-offset #xE20000 + columns 2 + direction l2r)) + (define-charset-alias 'ideograph-cbeta '=cbeta) + (make-charset '==cbeta "CBETA private characters" + '(long-name "CBETA PUA glyph-images" + chars 256 + dimension 2 + registry "cbeta-0" + graphic 2 + columns 2 + direction l2r + mother =cbeta)) + (make-charset '===cbeta "CBETA private characters" + '(long-name "CBETA PUA glyph-images" + chars 256 + dimension 2 + registry "cbeta-0" + graphic 2 + columns 2 + direction l2r + mother ==cbeta)) + (make-charset '=>>cbeta "CBETA abstract glyphs" + '(long-name "CBETA glyphs" + chars 256 + dimension 2 + registry "cbeta-0" + graphic 2 + columns 2 + direction l2r + mother =cbeta)) + (make-charset '=>cbeta "CBETA abstract characters" + '(long-name "CBETA characters" + chars 256 + dimension 2 + registry "cbeta-0" + graphic 2 + columns 2 + direction l2r + mother =cbeta)) + + (make-charset '=zinbun-oracle + "Oracle Bones Script" + `(long-name "Oracle Bones Script in Zinbun, Kyoto Univ." + chars 256 + dimension 2 + registry "zob1968-0" + graphic 2 + min-code #xE70000 + max-code ,(+ #xE70000 8192) + code-offset #xE70000 + columns 2 + direction l2r)) + + (make-charset '=>zinbun-oracle + "Abstract Oracle Bones" + '(long-name "Abstract characters of Zinbun Oracle Bones." + chars 256 + dimension 2 + mother =zinbun-oracle + registry "zob1968-0" + graphic 2 + columns 2 + direction l2r)) + + (make-charset '=jef-china3 + "JEF + CHINA3 private characters" + '(long-name "JEF + CHINA3" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "china3jef-0" + min-code #xE80000 + max-code #xE8FFFF + code-offset #xE80000)) + (define-charset-alias 'china3-jef '=jef-china3) + (make-charset '==jef-china3 + "JEF + CHINA3 abstract glyph-images." + '(long-name "JEF + CHINA3" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "china3jef-0" + mother =jef-china3)) + (make-charset '===jef-china3 + "JEF + CHINA3 glyph-images." + '(long-name "JEF-CHINA3 glyph-images" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "china3jef-0" + mother ==jef-china3)) + + (make-charset '=ruimoku-v6 + "private characters used in RUIMOKU Version.6" + `(long-name "RUI6" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "rui6-0" + ;; mother ucs + min-code #xE90000 ; #xE000 + max-code #xE908FF ; #xE8FF + code-offset ,(- #xE90000 #xE000))) + (make-charset '==ruimoku-v6 + "RUIMOKU Version.6 glyph-images." + '(long-name "RUI6 glyph-images." + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "rui6-0" + mother =ruimoku-v6)) + (make-charset '===ruimoku-v6 + "RUIMOKU Version.6 representative glyph-images." + '(long-name "RUI6 rep-glyph-images." + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "rui6-0" + mother ==ruimoku-v6)) + (make-charset '=>>ruimoku-v6 + "RUIMOKU Version.6 glyphs" + '(long-name "RUI6 glyphs" chars 256 dimension 2 columns 2 @@ -2753,7 +3137,7 @@ ;; (make-charset ;; '=zihai-17xx - ;; "ZhongHua-ZiHai (pp.1700$B!A(B1781) glyph-images" + ;; "ZhongHua-ZiHai (pp.1700〜1781) glyph-images" ;; '(long-name "ZhongHua-ZiHai pp.17xx" ;; chars 256 ;; dimension 2 @@ -2795,6 +3179,37 @@ =>iso-ir 177 mother =ucs)) + (make-charset '=>iwds-1 + "The IRG Working Document Series 1: List of UCV of Ideograhs." + '(long-name "IWDS 1: List of UCV" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r)) + + (make-charset '=>ucs@iwds-1 + "UCS abstract characters based on IWDS-1." + '(long-name "UCS based on IWDS-1" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =ucs)) + + (make-charset '=>ucs@component + "UCS encoding for abstract components of IWDS-1." + '(long-name "UCS for IWDS-1 abstract components" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =ucs)) + (make-charset '=>ucs@hanyo-denshi "UCS abstract characters based on Han'you-Denshi collection." '(long-name "UCS base characters of Han'you-Denshi" @@ -2930,97 +3345,6 @@ =>iso-ir 177 mother =+>ucs@unicode)) - (make-charset '=>>ucs@iso - "Representative abstract-glyphs of ISO/IEC 10646" - '(long-name "UCS abstract glyphs for UCS" - chars 256 - dimension 3 - columns 2 - graphic 2 - direction l2r - =>iso-ir 177 - mother =+>ucs@iso)) - (make-charset '=>>ucs@unicode - "Representative abstract-glyphs of Unicode" - '(long-name "Unicode abstract glyphs" - chars 256 - dimension 3 - columns 2 - graphic 2 - direction l2r - =>iso-ir 177 - mother =>>ucs@iso)) - (make-charset '=>>ucs@jis - "UCS Representative abstract-glyphs for JIS X0208/0212/0213" - '(long-name "UCS abstract glyphs 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 glyphs for JIS X 0208/0212:1990" - '(long-name "UCS glyphs for JIS:1990" - chars 256 - dimension 3 - columns 2 - graphic 2 - direction l2r - =>iso-ir 177 - mother =>>ucs@jis)) - (make-charset '=>>ucs@jis/2000 - "UCS Representative glyphs for JIS X 0213:2000" - '(long-name "UCS glyphs for JIS:2000" - chars 256 - dimension 3 - columns 2 - graphic 2 - direction l2r - =>iso-ir 177 - mother =>>ucs@jis)) - (make-charset '=>>ucs@jis/2004 - "UCS Representative glyphs for JIS X 0213:2004" - '(long-name "UCS glyphs for JIS:2004" - chars 256 - dimension 3 - columns 2 - graphic 2 - 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" - chars 256 - dimension 3 - columns 2 - graphic 2 - direction l2r - =>iso-ir 177 - mother =>>ucs@unicode)) - (make-charset '=>>ucs@cns - "UCS Representative glyphs for CNS 11643 sources" - '(long-name "UCS glyphs 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" @@ -3030,7 +3354,7 @@ graphic 2 direction l2r =>iso-ir 177 - mother =>>ucs@iso + mother =+>ucs@iso )) (make-charset '=ucs@unicode "Unicode for its representative glyphs" @@ -3085,7 +3409,6 @@ =>iso-ir 177 mother =ucs@unicode)) (define-charset-alias 'ucs-cns '=ucs@cns) - (define-charset-alias '=>>>ucs@cns '=ucs@cns) (make-charset '=ucs@cns/fw "ISO/IEC 10646 for CNS 11643 with fullwidth" '(long-name "UCS for CNS-fullwidth" @@ -3118,7 +3441,6 @@ =>iso-ir 177 mother =ucs@unicode)) (define-charset-alias 'ucs-jis '=ucs@jis) - (define-charset-alias '=>>>ucs@jis '=ucs@jis) (make-charset '=ucs@jis/fw "ISO/IEC 10646 for JIS X0208/0212/0213 with fullwidth" '(long-name "UCS for JIS-fullwidth" @@ -3162,7 +3484,6 @@ mother =ucs@jis)) (define-charset-alias '=ucs@jis-1990 '=ucs@jis/1990) (define-charset-alias '=ucs-jis-1990 '=ucs@jis/1990) - (define-charset-alias '=>>>ucs@jis/1990 '=ucs@jis/1990) (make-charset '=ucs@jis/2000 "ISO/IEC 10646 for JIS X 0213:2000" '(long-name "UCS for JIS:2000" @@ -3175,7 +3496,6 @@ mother =ucs@jis)) (define-charset-alias '=ucs@jis-2000 '=ucs@jis/2000) (define-charset-alias '=ucs-jis-2000 '=ucs@jis/2000) - (define-charset-alias '=>>>ucs@jis/2000 '=ucs@jis/2000) (make-charset '=ucs@jis/2004 "ISO/IEC 10646 for JIS X 0213:2004" '(long-name "UCS for JIS:2004" @@ -3186,7 +3506,6 @@ direction l2r =>iso-ir 177 mother =ucs@jis)) - (define-charset-alias '=>>>ucs@jis/2004 '=ucs@jis/2004) (make-charset '=ucs@JP "UCS for common glyphs used in Japan" '(long-name "UCS for Japan" @@ -3219,7 +3538,6 @@ =>iso-ir 177 mother =ucs@unicode)) (define-charset-alias 'ucs-ks '=ucs@ks) - (define-charset-alias '=>>>ucs@ks '=ucs@ks) (make-charset '=ucs@ks/2012 "Mapping for Korean Standards in ISO/IEC 10646:2012" '(long-name "UCS:2012 for KS" @@ -3275,6 +3593,97 @@ =>iso-ir 177 mother =ucs@big5)) + (make-charset '=>>ucs@iso + "Representative abstract-glyphs of ISO/IEC 10646" + '(long-name "UCS abstract glyphs for UCS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =ucs@iso)) + (make-charset '=>>ucs@unicode + "Representative abstract-glyphs of Unicode" + '(long-name "Unicode abstract glyphs" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>ucs@iso)) + (make-charset '=>>ucs@jis + "UCS Representative abstract-glyphs for JIS X0208/0212/0213" + '(long-name "UCS abstract glyphs 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 glyphs for JIS X 0208/0212:1990" + '(long-name "UCS glyphs for JIS:1990" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>ucs@jis)) + (make-charset '=>>ucs@jis/2000 + "UCS Representative glyphs for JIS X 0213:2000" + '(long-name "UCS glyphs for JIS:2000" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>ucs@jis)) + (make-charset '=>>ucs@jis/2004 + "UCS Representative glyphs for JIS X 0213:2004" + '(long-name "UCS glyphs for JIS:2004" + chars 256 + dimension 3 + columns 2 + graphic 2 + 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" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>ucs@unicode)) + (make-charset '=>>ucs@cns + "UCS Representative glyphs for CNS 11643 sources" + '(long-name "UCS glyphs for CNS" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + =>iso-ir 177 + mother =>>ucs@unicode)) + (make-charset '==ucs@iso "Representative glyph-forms of ISO/IEC 10646." '(long-name "UCS glyph-forms for UCS" @@ -3328,6 +3737,7 @@ direction l2r =>iso-ir 177 mother ==ucs@unicode)) + (define-charset-alias '=>>>ucs@cns '==ucs@cns) (make-charset '==ucs-bmp@cns "ISO/IEC 10646 BMP for CNS" '(long-name "BMP for CNS" @@ -3349,6 +3759,7 @@ direction l2r =>iso-ir 177 mother ==ucs@unicode)) + (define-charset-alias '=>>>ucs@jis '==ucs@jis) (make-charset '==ucs@jis/1990 "UCS Representative glyph-forms for JIS X 0208/0212:1990." '(long-name "UCS glyph-forms for JIS:1990" @@ -3359,6 +3770,7 @@ direction l2r =>iso-ir 177 mother ==ucs@jis)) + (define-charset-alias '=>>>ucs@jis/1990 '==ucs@jis/1990) (make-charset '==ucs@jis/2000 "UCS Representative glyph-forms for JIS X 0213:2000." '(long-name "UCS glyph-forms for JIS:2000" @@ -3369,6 +3781,7 @@ direction l2r =>iso-ir 177 mother ==ucs@jis)) + (define-charset-alias '=>>>ucs@jis/2000 '==ucs@jis/2000) (make-charset '==ucs@jis/2004 "UCS Representative glyph-forms for JIS X 0213:2004." '(long-name "UCS glyph-forms for JIS:2004" @@ -3379,6 +3792,7 @@ direction l2r =>iso-ir 177 mother ==ucs@jis)) + (define-charset-alias '=>>>ucs@jis/2004 '==ucs@jis/2004) (make-charset '==ucs@JP "UCS for common glyph-forms used in Japan." '(long-name "UCS for Japan" @@ -3409,6 +3823,7 @@ direction l2r =>iso-ir 177 mother ==ucs@unicode)) + (define-charset-alias '=>>>ucs@ks '==ucs@ks) (make-charset '==ucs-bmp@ks "ISO/IEC 10646 BMP for KS." '(long-name "BMP for KS" @@ -3450,7 +3865,7 @@ graphic 2 direction l2r =>iso-ir 177 - mother ===ucs@iso)) + mother ==ucs@unicode)) (make-charset '===ucs@gb "UCS representative glyph-images of GB." '(long-name "UCS rep-images for GB" @@ -3470,8 +3885,100 @@ graphic 2 direction l2r =>iso-ir 177 - mother ===ucs@unicode)) + mother ==ucs@ks)) + (make-charset '=ucs-var-001 + "uXXXX-var-001 glyph-images of GlyphWiki" + '(long-name "UCS-var-001" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs)) + (make-charset '=ucs-bmp-var-001 + "uXXXX-var-001 glyph-images in BMP" + '(long-name "UCS-BMP-var-001" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs-var-001 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.var001-0")) + (make-charset '=ucs-var-002 + "uXXXX-var-002 glyph-images of GlyphWiki" + '(long-name "UCS-var-002" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs)) + (make-charset '=ucs-bmp-var-002 + "uXXXX-var-002 glyph-images in BMP" + '(long-name "UCS-BMP-var-002" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs-var-002 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.var002-0")) + (make-charset '=ucs-var-003 + "uXXXX-var-003 glyph-images of GlyphWiki" + '(long-name "UCS-var-003" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs)) + (make-charset '=ucs-bmp-var-003 + "uXXXX-var-003 glyph-images in BMP" + '(long-name "UCS-BMP-var-003" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs-var-003 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.var003-0")) + (make-charset '=ucs-itaiji-002 + "uXXXX-itaiji-002 glyphs of GlyphWiki" + '(long-name "UCS-itaiji-002" + chars 256 + dimension 3 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs)) + (make-charset '=ucs-bmp-itaiji-002 + "uXXXX-itaiji-002 glyph-images in BMP" + '(long-name "UCS-BMP-itaiji-002" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + ;; =>iso-ir 177 + mother =ucs-itaiji-002 + min-code #x2E00 + max-code #x9FCC + registry "ucs\\.itaiji002-0")) (make-charset '=ucs-itaiji-084 "uXXXX-itaiji-084 glyph-images of GlyphWiki" '(long-name "UCS-itaiji-084" @@ -3493,7 +4000,7 @@ ;; =>iso-ir 177 mother =ucs-itaiji-084 min-code #x2E00 - max-code #x9FA5 + max-code #x9FCC registry "ucs\\.itaiji084-0")) (make-charset @@ -3521,6 +4028,18 @@ mother =ucs@unicode min-code #x2E00 max-code #x2FFF)) (make-charset + '==ucs-radicals@unicode + "CJK Radicals of UCS" + '(long-name "UCS-Radicals" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "-zhRadicals-.*-ucs-0" + mother ==ucs@unicode + min-code #x2E00 max-code #x2FFF)) + (make-charset '=ucs-hangul "Hangul Syllables of UCS" '(long-name "UCS-Hangul-Syllables" @@ -3545,6 +4064,7 @@ mother ucs-bmp min-code #x2E00 max-code #x9FA5 + ;; max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3560,6 +4080,7 @@ mother =ucs@gb min-code #x2E00 max-code #x9FA5 + ;; max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3575,6 +4096,7 @@ mother ==ucs@gb min-code #x2E00 max-code #x9FA5 + ;; max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3590,6 +4112,7 @@ mother ===ucs@gb min-code #x2E00 max-code #x9FA5 + ;; max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3604,7 +4127,7 @@ registry "-ja-.*-ucs-0" mother =ucs@JP min-code #x2E00 - max-code #x9FA5 + max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3619,7 +4142,7 @@ registry "-ja-.*-ucs-0" mother =ucs@JP/hanazono min-code #x2E00 - max-code #x9FA5 + max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3634,7 +4157,7 @@ registry "-ja-.*-ucs-0" mother ==ucs@JP/hanazono min-code #x2E00 - max-code #x9FA5 + max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3650,6 +4173,7 @@ mother =+>ucs@unicode min-code #x2E00 max-code #x9FA5 + ;; max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3665,6 +4189,22 @@ mother =>ucs@unicode min-code #x2E00 max-code #x9FA5 + ;; max-code #x9FCC + ;; max-code #xA4CF + )) + (make-charset + '=>ucs-bmp-cjk@component + "CJK Characters in BMP for IWDS-1 abstract components." + '(long-name "CJK in BMP@component" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "-ja-.*-ucs-0" + mother =>ucs@component + min-code #x2E00 + max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3680,6 +4220,7 @@ mother ==>ucs@bucs min-code #x2E00 max-code #x9FA5 + ;; max-code #x9FCC ;; max-code #xA4CF )) (make-charset @@ -3733,11 +4274,24 @@ columns 2 graphic 2 direction l2r - registry "\\(iso10646\\|ucs02\\)-2$" + registry "\\(iso10646\\|ucs00\\)-2$" mother ucs min-code #x20000 max-code #x2A6D6 code-offset #x20000)) (make-charset + '=ucs-sip@iso + "CJK Ideographs Extension B (ISO/IEC 10646-2)" + '(long-name "UCS CJK Ext-B" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "ucs00-2$" + mother =ucs@iso + min-code #x20000 max-code #x2FFFF + code-offset #x20000)) + (make-charset '=ucs-sip-ext-b@iso "CJK Ideographs Extension B (ISO/IEC 10646-2)" '(long-name "UCS CJK Ext-B" @@ -3746,11 +4300,23 @@ columns 2 graphic 2 direction l2r - registry "\\(iso10646\\|ucs02\\)-2$" + registry "\\(iso10646\\|ucs00\\)-2$" mother =ucs@iso min-code #x20000 max-code #x2A6D6 code-offset #x20000)) (make-charset + '==ucs-sip@iso + "ISO representative abstract-glyph-images of ISO/IEC 10646 Plane 2" + '(long-name "SIP abstract glyph-images" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "\\(ucs00\\)-2$" + mother ==ucs@iso + code-offset #x20000)) + (make-charset '==ucs-sip-ext-b@iso "CJK Ideographs Extension B (ISO/IEC 10646-2)" '(long-name "UCS CJK Ext-B" @@ -3759,11 +4325,23 @@ columns 2 graphic 2 direction l2r - registry "\\(iso10646\\|ucs02\\)-2$" + registry "\\(iso10646\\|ucs00\\)-2$" mother ==ucs@iso min-code #x20000 max-code #x2A6D6 code-offset #x20000)) (make-charset + '===ucs-sip@iso + "ISO representative glyph-images of ISO/IEC 10646 Plane 2" + '(long-name "SIP rep-glyph-images" + chars 256 + dimension 2 + columns 2 + graphic 2 + direction l2r + registry "\\(ucs00\\)-2$" + mother ===ucs@iso + code-offset #x20000)) + (make-charset '===ucs-sip-ext-b@iso "CJK Ideographs Extension B (ISO/IEC 10646-2)" '(long-name "UCS CJK Ext-B" @@ -3772,7 +4350,7 @@ columns 2 graphic 2 direction l2r - registry "\\(iso10646\\|ucs02\\)-2$" + registry "\\(iso10646\\|ucs00\\)-2$" mother ===ucs@iso min-code #x20000 max-code #x2A6D6 code-offset #x20000))