;; 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 MORIOKA Tomohiko
+;; 2009, 2010, 2011, 2012, 2013 MORIOKA Tomohiko
;; Keywords: mule, multilingual, character set, coding system
final ?@
graphic 0))
(make-charset
- '=jis-x0208@1978/-4X
- "JIS X 0208:1978, index before the 4th impression."
+ '=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
+ mother =jis-x0208@1978/1pr
=>iso-ir 42
- ;; final ?@
+ ;; final ?@
graphic 0
partial t))
(make-charset
- '=jis-x0208@1978/1er-pr
- "JIS X 0208:1978, fixed by errata [Nov 1978]."
+ '=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 ?@
+ =>iso-ir 42
+ ;; final ?@
graphic 0
partial t))
+ ;; (make-charset
+ ;; '=jis-x0208@1978/1er-pr
+ ;; "JIS X 0208:1978, fixed by errata [Nov 1978]."
+ ;; '(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/1er-pr
+ mother =jis-x0208@1978
=>iso-ir 42
;; final ?@
graphic 0
graphic 0
;; partial t
))
+ (make-charset
+ '=+>jis-x0213-1@2004
+ "JIS X 0213:2004 Plain 1 unified abstract glyphs"
+ '(registry "jisx0213\\(\\.2004\\)-1"
+ dimension 2
+ chars 94
+ mother =+>jis-x0213-1
+ =>iso-ir 233
+ ;; final ?Q
+ graphic 0
+ ;; partial t
+ ))
(make-charset
'=>jis-x0208
=>iso-ir 172
graphic 0))
(make-charset
+ '=>cns11643-6
+ "CNS 11643 Plane 6 abstract characters."
+ '(registry "CNS11643[.-]\\(.*[.-]\\)?6$"
+ dimension 2
+ chars 94
+ mother =cns11643-6
+ =>iso-ir 186
+ graphic 0))
+ (make-charset
'=>cns11643-7
"CNS 11643 Plane 7 abstract characters."
'(registry "CNS11643[.-]\\(.*[.-]\\)?7$"
registry "HanyoDenshi\\.JC-0$"
mother =hanyo-denshi/jc))
(make-charset
+ '=>>>hanyo-denshi/jd
+ "Han'you-Denshi/JD abstract glyph-forms"
+ '(long-name "Han'you-Denshi/JD glyph-forms"
+ 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 abstract glyph-forms"
'(long-name "Han'you-Denshi/FT glyph-forms"
graphic 2
direction l2r
registry "HanyoDenshi\\.JD-0$"
- mother =hanyo-denshi/jd))
+ mother =>>>hanyo-denshi/jd))
(make-charset
'=>>hanyo-denshi/ft
"Han'you-Denshi/FT abstract glyphs"
registry "HanyoDenshi\\.HG-0$"
mother =>>>hanyo-denshi/hg))
(make-charset
+ '=>>hanyo-denshi/ip
+ "Han'you-Denshi/IP abstract glyphs"
+ '(long-name "Han'you-Denshi/IP abstract glyphs"
+ 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) abstract glyphs"
'(long-name "Han'you-Denshi/JT glyphs"
registry "rui6-0"
mother =ruimoku-v6))
+ ;; (make-charset
+ ;; '=zihai
+ ;; "ZhongHua-ZiHai glyph-images"
+ ;; '(long-name "ZhongHua-ZiHai (pppp-nn)"
+ ;; chars 256
+ ;; dimension 3
+ ;; columns 2
+ ;; graphic 2
+ ;; direction l2r))
+
+ ;; (make-charset
+ ;; '=zihai-17xx
+ ;; "ZhongHua-ZiHai (pp.1700\e$B!A\e(B1781) glyph-images"
+ ;; '(long-name "ZhongHua-ZiHai pp.17xx"
+ ;; chars 256
+ ;; dimension 2
+ ;; columns 2
+ ;; graphic 2
+ ;; direction l2r
+ ;; registry "zihai\\.cp-17$"))
+
+ (make-charset '=big5-cdp-var-3
+ "Big5-CDP-var-3 glyph-images of GlyphWiki"
+ '(long-name "Big5-CDP-var-3"
+ chars 256
+ dimension 2
+ columns 2
+ graphic 2
+ direction l2r
+ registry "cdp\\.var-3$"
+ mother =big5-cdp))
+
+ (make-charset '=big5-cdp-var-5
+ "Big5-CDP-var-5 glyph-images of GlyphWiki"
+ '(long-name "Big5-CDP-var-5"
+ chars 256
+ dimension 2
+ columns 2
+ graphic 2
+ direction l2r
+ registry "cdp\\.var-5$"
+ mother =big5-cdp))
+
(make-charset '==>ucs@bucs
"Basic Subset of Coded Character Sets (BUCS)"
'(long-name "BUCS abstract characters"
=>iso-ir 177
mother =ucs@big5))
+ (make-charset '=ucs-itaiji-084
+ "uXXXX-itaiji-084 glyph-images of GlyphWiki"
+ '(long-name "UCS-itaiji-084"
+ chars 256
+ dimension 3
+ columns 2
+ graphic 2
+ direction l2r
+ ;; =>iso-ir 177
+ mother =ucs))
+ (make-charset '=ucs-bmp-itaiji-084
+ "uXXXX-itaiji-084 glyph-images in BMP"
+ '(long-name "UCS-BMP-itaiji-084"
+ chars 256
+ dimension 2
+ columns 2
+ graphic 2
+ direction l2r
+ ;; =>iso-ir 177
+ mother =ucs-itaiji-084
+ min-code #x2E00
+ max-code #x9FA5
+ registry "ucs\\.itaiji084-0"))
+
(make-charset
'=ucs-radicals
"CJK Radicals of UCS"
max-code #xFAFF
))
(make-charset
+ '=+>ucs-bmp-cjk-compat@jis
+ "CJK Compatibility Ideographs of JIS representatives unified glyphs"
+ '(long-name "JIS unified glyphs for CJK Compat chars"
+ chars 256
+ dimension 2
+ columns 2
+ graphic 2
+ direction l2r
+ registry "-ja-.*-ucs-0"
+ mother =+>ucs@jis
+ min-code #xF900
+ max-code #xFAFF
+ ))
+ (make-charset
'=ucs-sip-ext-b
"CJK Ideographs Extension B"
'(long-name "UCS CJK Ext-B"
projects / chise / xemacs-chise.git.1 / blobdiff