;; max-code #xA4CF
))
(make-charset
+ '=ucs-bmp-cjk@JP
+ "CJK Characters in BMP with JIS representative glyphs"
+ '(long-name "CJK in BMP@JP"
+ chars 256
+ dimension 2
+ columns 2
+ graphic 2
+ direction l2r
+ registry "-ja-.*-ucs-0"
+ mother =ucs@JP
+ min-code #x2E00
+ max-code #x9FA5
+ ;; max-code #xA4CF
+ ))
+ (make-charset
'==>ucs-bmp-cjk@bucs
"CJK Characters in BMP of BUCS"
'(long-name "BUCS-BMP-CJK"