+ (define-charset-alias 'ucs '=ucs)
+ (define-charset-alias 'japanese-jisx0208-1990 '=jis-x0208-1990)
+ (make-charset '=ucs@gb
+ "UCS for GB"
+ `(long-name "ISO/IEC 10646 for GB"
+ chars 256
+ dimension 3
+ columns 2
+ graphic 2
+ direction l2r
+ mother =ucs))
+ (define-charset-alias 'ucs-gb '=ucs@gb)
+ (make-charset '=ucs@cns
+ "UCS for CNS"
+ `(long-name "ISO/IEC 10646 for CNS 11643"
+ chars 256
+ dimension 3
+ columns 2
+ graphic 2
+ direction l2r
+ mother =ucs))
+ (define-charset-alias 'ucs-cns '=ucs@cns)
+ (make-charset '=ucs@jis
+ "UCS for JIS"
+ `(long-name "ISO/IEC 10646 for JIS X0208/0212/0213"
+ chars 256
+ dimension 3
+ columns 2
+ graphic 2
+ direction l2r
+ mother =ucs))
+ (define-charset-alias 'ucs-jis '=ucs@jis)
+ (make-charset '=ucs@jis-1990