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
=>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$"
=>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 #xA4CF
))
(make-charset
- '=ucs-bmp-cjk@unicode
- "CJK Characters in BMP of Unicode"
- '(long-name "Unicode-BMP-CJK"
+ '=ucs-bmp-cjk@gb
+ "CJK Characters in BMP with GB representative glyph-images."
+ '(long-name "CJK in BMP@GB"
chars 256
dimension 2
columns 2
graphic 2
direction l2r
registry "-zh-.*-ucs-0"
- mother =ucs@unicode
+ mother =ucs@gb
min-code #x2E00
max-code #x9FA5
;; max-code #xA4CF
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"