1 ;;; mule-conf.el --- configure multilingual environment
3 ;; Copyright (C) 1995,1999 Electrotechnical Laboratory, JAPAN.
4 ;; Licensed to the Free Software Foundation.
5 ;; Copyright (C) 1997, 1999, 2000, 2002, 2003, 2004, 2005, 2006, 2008,
6 ;; 2009, 2010, 2011, 2012, 2013 MORIOKA Tomohiko
8 ;; Keywords: mule, multilingual, character set, coding system
10 ;; This file is part of XEmacs.
12 ;; XEmacs is free software; you can redistribute it and/or modify
13 ;; it under the terms of the GNU General Public License as published by
14 ;; the Free Software Foundation; either version 2, or (at your option)
17 ;; XEmacs is distributed in the hope that it will be useful,
18 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
19 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 ;; GNU General Public License for more details.
22 ;; You should have received a copy of the GNU General Public License
23 ;; along with XEmacs; see the file COPYING. If not, write to the
24 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
25 ;; Boston, MA 02111-1307, USA.
33 "Adobe-Japan1 Character Collection for CID-Keyed Fonts"
34 `(long-name "Adobe-Japan1"
40 registry "AdobeJapan1-[0-6]$"
41 min-code ,(lsh #x6300 16)
42 max-code ,(+ (lsh #x6300 16) 23057)
43 code-offset ,(lsh #x6300 16)))
46 "Adobe-Japan1-0 Character Collection for CID-Keyed Fonts"
47 '(long-name "Adobe-Japan1-0"
53 mother =adobe-japan1-base
56 registry "AdobeJapan1-[0-6]$"))
59 "Adobe-Japan1-1 Character Collection for CID-Keyed Fonts"
60 '(long-name "Adobe-Japan1-1"
66 mother =adobe-japan1-0
69 registry "AdobeJapan1-[1-6]$"))
72 "Adobe-Japan1-2 Character Collection for CID-Keyed Fonts"
73 '(long-name "Adobe-Japan1-2"
79 mother =adobe-japan1-1
82 registry "AdobeJapan1-[2-6]$"))
85 "Adobe-Japan1-3 Character Collection for CID-Keyed Fonts"
86 '(long-name "Adobe-Japan1-3"
92 mother =adobe-japan1-2
95 registry "AdobeJapan1-[3-6]$"))
98 "Adobe-Japan1-4 Character Collection for CID-Keyed Fonts"
99 '(long-name "Adobe-Japan1-4"
105 mother =adobe-japan1-3
108 registry "AdobeJapan1-[4-6]$"))
111 "Adobe-Japan1-5 Character Collection for CID-Keyed Fonts"
112 '(long-name "Adobe-Japan1-5"
118 mother =adobe-japan1-4
121 registry "AdobeJapan1-[5-6]$"))
124 "Adobe-Japan1-6 Character Collection for CID-Keyed Fonts"
125 '(long-name "Adobe-Japan1-6"
131 mother =adobe-japan1-5
134 registry "AdobeJapan1-6$"))
135 (define-charset-alias '=adobe-japan1 '=adobe-japan1-6)
139 "Adobe-Japan1-0 detailed glyph-images."
140 '(long-name "Adobe-Japan1-0 glyph-images"
146 mother =adobe-japan1-0
147 registry "AdobeJapan1-0$"))
150 "Adobe-Japan1-1 detailed glyph-images."
151 '(long-name "Adobe-Japan1-1 glyph-images"
157 mother ==adobe-japan1-0
158 registry "AdobeJapan1-1$"))
161 "Adobe-Japan1-2 detailed glyph-images."
162 '(long-name "Adobe-Japan1-2 glyph-images"
168 mother ==adobe-japan1-1
169 registry "AdobeJapan1-2$"))
172 "Adobe-Japan1-3 detailed glyph-images."
173 '(long-name "Adobe-Japan1-3 glyph-images"
179 mother ==adobe-japan1-2
180 registry "AdobeJapan1-3$"))
183 "Adobe-Japan1-4 detailed glyph-images."
184 '(long-name "Adobe-Japan1-4 glyph-images"
190 mother ==adobe-japan1-3
191 registry "AdobeJapan1-4$"))
194 "Adobe-Japan1-5 detailed glyph-images."
195 '(long-name "Adobe-Japan1-5 glyph-images"
201 mother ==adobe-japan1-4
202 registry "AdobeJapan1-5$"))
205 "Adobe-Japan1-6 detailed glyph-images."
206 '(long-name "Adobe-Japan1-6 glyph-images"
212 mother ==adobe-japan1-5
213 registry "AdobeJapan1-6$"))
214 (define-charset-alias '==adobe-japan1 '==adobe-japan1-6)
216 (define-charset-alias '=>>>adobe-japan1-0 '=adobe-japan1-0)
217 (define-charset-alias '=>>>adobe-japan1-1 '=adobe-japan1-1)
218 (define-charset-alias '=>>>adobe-japan1-2 '=adobe-japan1-2)
219 (define-charset-alias '=>>>adobe-japan1-3 '=adobe-japan1-3)
220 (define-charset-alias '=>>>adobe-japan1-4 '=adobe-japan1-4)
221 (define-charset-alias '=>>>adobe-japan1-5 '=adobe-japan1-5)
222 (define-charset-alias '=>>>adobe-japan1-6 '=adobe-japan1-6)
224 ;; '=>>>adobe-japan1-0
225 ;; "Adobe-Japan1-0 abstract glyph-forms"
226 ;; '(long-name "Adobe-Japan1-0 abstract glyph-forms"
232 ;; mother =adobe-japan1-0
233 ;; registry "AdobeJapan1-0$"))
235 ;; '=>>>adobe-japan1-1
236 ;; "Adobe-Japan1-1 abstract glyph-forms"
237 ;; '(long-name "Adobe-Japan1-1 abstract glyph-forms"
243 ;; mother =>>>adobe-japan1-0
244 ;; registry "AdobeJapan1-1$"))
246 ;; '=>>>adobe-japan1-2
247 ;; "Adobe-Japan1-2 abstract glyph-forms"
248 ;; '(long-name "Adobe-Japan1-2 abstract glyph-forms"
254 ;; mother =>>>adobe-japan1-1
255 ;; registry "AdobeJapan1-2$"))
257 ;; '=>>>adobe-japan1-3
258 ;; "Adobe-Japan1-3 abstract glyph-forms"
259 ;; '(long-name "Adobe-Japan1-3 abstract glyph-forms"
265 ;; mother =>>>adobe-japan1-2
266 ;; registry "AdobeJapan1-3$"))
268 ;; '=>>>adobe-japan1-4
269 ;; "Adobe-Japan1-4 abstract glyph-forms"
270 ;; '(long-name "Adobe-Japan1-4 abstract glyph-forms"
276 ;; mother =>>>adobe-japan1-3
277 ;; registry "AdobeJapan1-4$"))
279 ;; '=>>>adobe-japan1-5
280 ;; "Adobe-Japan1-5 abstract glyph-forms"
281 ;; '(long-name "Adobe-Japan1-5 abstract glyph-forms"
287 ;; mother =>>>adobe-japan1-4
288 ;; registry "AdobeJapan1-5$"))
290 ;; '=>>>adobe-japan1-6
291 ;; "Adobe-Japan1-6 abstract glyph-forms"
292 ;; '(long-name "Adobe-Japan1-6 abstract glyph-forms"
298 ;; mother =>>>adobe-japan1-5
299 ;; registry "AdobeJapan1-6$"))
300 (define-charset-alias '=>>>adobe-japan1 '=>>>adobe-japan1-6)
304 "Adobe-Japan1-0 abstract glyphs"
305 '(long-name "Adobe-Japan1-0 abstract glyphs"
311 mother =>>>adobe-japan1
312 registry "AdobeJapan1-0$"))
315 "Adobe-Japan1-1 abstract glyphs"
316 '(long-name "Adobe-Japan1-1 abstract glyphs"
322 mother =>>adobe-japan1-0
323 registry "AdobeJapan1-1"))
326 "Adobe-Japan1-2 abstract glyphs"
327 '(long-name "Adobe-Japan1-2 abstract glyphs"
333 mother =>>adobe-japan1-1
334 registry "AdobeJapan1-2"))
337 "Adobe-Japan1-3 abstract glyphs"
338 '(long-name "Adobe-Japan1-3 abstract glyphs"
344 mother =>>adobe-japan1-2
345 registry "AdobeJapan1-3"))
348 "Adobe-Japan1-4 abstract glyphs"
349 '(long-name "Adobe-Japan1-4 abstract glyphs"
355 mother =>>adobe-japan1-3
356 registry "AdobeJapan1-4"))
359 "Adobe-Japan1-5 abstract glyphs"
360 '(long-name "Adobe-Japan1-5 abstract glyphs"
366 mother =>>adobe-japan1-4
367 registry "AdobeJapan1-5"))
370 "Adobe-Japan1-6 abstract glyphs"
371 '(long-name "Adobe-Japan1-6 abstract glyphs"
377 mother =>>adobe-japan1-5
378 registry "AdobeJapan1-6"))
379 (define-charset-alias '=>>adobe-japan1 '=>>adobe-japan1-6)
383 "Adobe-Japan1-0 unified abstract glyphs"
384 '(long-name "Adobe-Japan1-0 unified abstract glyphs"
390 mother =>>adobe-japan1
391 registry "AdobeJapan1-0$"))
394 "Adobe-Japan1-1 unified abstract glyphs"
395 '(long-name "Adobe-Japan1-1 unified abstract glyphs"
401 mother =+>adobe-japan1-0
402 registry "AdobeJapan1-1"))
405 "Adobe-Japan1-2 unified abstract glyphs"
406 '(long-name "Adobe-Japan1-2 unified abstract glyphs"
412 mother =+>adobe-japan1-1
413 registry "AdobeJapan1-2"))
416 "Adobe-Japan1-3 unified abstract glyphs"
417 '(long-name "Adobe-Japan1-3 unified abstract glyphs"
423 mother =+>adobe-japan1-2
424 registry "AdobeJapan1-3"))
427 "Adobe-Japan1-4 unified abstract glyphs"
428 '(long-name "Adobe-Japan1-4 unified abstract glyphs"
434 mother =+>adobe-japan1-3
435 registry "AdobeJapan1-4"))
438 "Adobe-Japan1-5 unified abstract glyphs"
439 '(long-name "Adobe-Japan1-5 unified abstract glyphs"
445 mother =+>adobe-japan1-4
446 registry "AdobeJapan1-5"))
449 "Adobe-Japan1-6 unified abstract glyphs"
450 '(long-name "Adobe-Japan1-6 unified abstract glyphs"
456 mother =+>adobe-japan1-5
457 registry "AdobeJapan1-6"))
458 (define-charset-alias '=+>adobe-japan1 '=+>adobe-japan1-6)
462 "JIS X 0208:1978, unchanged part."
463 '(registry "jisx0208\\.1978"
472 '=jis-x0208@1978/-4pr
473 "JIS X 0208:1978, 1st - 3rd impressions."
474 '(registry "jisx0208\\.1978"
477 mother =jis-x0208@1978
484 "JIS X 0208:1978, 1st impression."
486 registry "jisx0208\\.1978"
489 mother =jis-x0208@1978/-4pr
493 '=jis-x0208@1978/1pr/fixed
494 "JIS X 0208:1978, correct glyph in the errata of 1st impression."
495 '(registry "jisx0208\\.1978"
498 mother =jis-x0208@1978/1pr
505 "JIS X 0208:1978, index before the 4th impression."
506 '(registry "jisx0208\\.1978"
509 mother =jis-x0208@1978
515 ;; '=jis-x0208@1978/1er-pr
516 ;; "JIS X 0208:1978, fixed by errata [Nov 1978]."
517 ;; '(registry "jisx0208\\.1978"
520 ;; mother =jis-x0208@1978
526 '=jis-x0208@1978/2-pr
527 "JIS X 0208:1978, 2nd impression or later."
528 '(registry "jisx0208\\.1978"
531 ;; mother =jis-x0208@1978/1er-pr
532 mother =jis-x0208@1978
539 "JIS X 0208:1978, replaced by errata of 4th impression."
540 '(registry "jisx0208\\.1978"
543 mother =jis-x0208@1978/2-pr
549 '=jis-x0208@1978/4-pr
550 "JIS X 0208:1978, 4th impression or later."
551 '(registry "jisx0208\\.1978"
554 mother =jis-x0208@1978/2-pr
561 "JIS X 0208:1978, 5th impression."
562 '(registry "jisx0208\\.1978"
565 mother =jis-x0208@1978/4-pr
570 (define-charset-alias '=jis-x0208@1978/i1 '=jis-x0208@1978/1pr)
571 (define-charset-alias '=jis-x0208@1978/i-4 '=jis-x0208@1978/-4pr)
572 (define-charset-alias '=jis-x0208@1978/i4- '=jis-x0208@1978/4-pr)
577 "JIS X0208:1978 Japanese Kanji (so called \"old JIS\")."
579 registry "jisx0208\\.1978"
587 (define-charset-alias '=jis-x0208-1978 '=jis-x0208@1978)
588 (define-charset-alias 'japanese-jisx0208-1978 '=jis-x0208@1978)
589 (define-charset-alias 'chinese-gb2312 '=gb2312)
590 (define-charset-alias '=jis-x0208-1983 '=jis-x0208@1983)
591 (define-charset-alias 'japanese-jisx0208 '=jis-x0208@1983)
592 (define-charset-alias 'korean-ksc5601 '=ks-x1001)
593 (define-charset-alias 'japanese-jisx0212 '=jis-x0212)
594 (define-charset-alias 'chinese-cns11643-1 '=cns11643-1)
595 (define-charset-alias 'chinese-cns11643-2 '=cns11643-2)
596 (define-charset-alias 'chinese-gb12345 '=gb12345)
597 (define-charset-alias 'chinese-big5 '=big5)
600 (make-charset 'sisheng "PinYin-ZhuYin"
601 '(registry "sisheng_cwnn\\|OMRON_UDC_ZH"
609 ;; ISO10646's 0x0E80..0x0EDF are mapped to 0x20..0x7F.
610 (make-charset 'lao "Lao script"
611 '(registry "MuleLao-1"
617 ;; IPA (International Phonetic Alphabet)
618 (make-charset 'ipa "International Phonetic Alphabet"
626 (make-charset 'ethiopic "Ethiopic"
634 ;; ISO-IR-165 (CCITT Extended GB)
635 ;; It is based on CCITT Recommendation T.101, includes GB 2312-80 +
636 ;; GB 8565-88 table A4 + 293 characters.
637 (if (featurep 'utf-2000)
639 (make-charset '=iso-ir165
640 "ISO-IR-165 (CCITT Extended GB; Chinese simplified)"
648 (define-charset-alias 'chinese-isoir165 '=iso-ir165))
649 (make-charset 'chinese-isoir165
650 "ISO-IR-165 (CCITT Extended GB; Chinese simplified)"
658 ;; CNS11643 Plane3 thru Plane7
659 ;; These represent more and more obscure Chinese characters.
660 ;; By the time you get to Plane 7, we're talking about characters
661 ;; that appear once in some ancient manuscript and whose meaning
665 ((make-chinese-cns11643-charset
666 (name iso-ir plane final)
668 name (concat "CNS 11643 Plane " plane " (Chinese traditional)")
671 ,(concat "CNS11643[.-]\\(.*[.-]\\)?" plane "$")
677 (make-chinese-cns11643-charset '=cns11643-3 183 "3" ?I)
678 (make-chinese-cns11643-charset '=cns11643-4 184 "4" ?J)
679 (make-chinese-cns11643-charset '=cns11643-5 185 "5" ?K)
680 (make-chinese-cns11643-charset '=cns11643-6 186 "6" ?L)
681 (make-chinese-cns11643-charset '=cns11643-7 187 "7" ?M)
682 (define-charset-alias 'chinese-cns11643-3 '=cns11643-3)
683 (define-charset-alias 'chinese-cns11643-4 '=cns11643-4)
684 (define-charset-alias 'chinese-cns11643-5 '=cns11643-5)
685 (define-charset-alias 'chinese-cns11643-6 '=cns11643-6)
686 (define-charset-alias 'chinese-cns11643-7 '=cns11643-7)
691 ((featurep 'utf-2000)
694 "JIS X 0213 Plain 1 (unchanged part)"
695 '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
705 "JIS X 0213:2000 Plain 1"
707 registry "jisx0213\\(\\.2000\\)-1"
717 registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
725 "JIS X 0213:2004 Plain 1"
727 registry "jisx0213\\(\\.2004\\)-1"
734 (define-charset-alias 'japanese-jisx0213-1 '=jis-x0213-1@2000)
735 (define-charset-alias 'japanese-jisx0213-2 '=jis-x0213-2)
736 (define-charset-alias '=jis-x0213-1-2000 '=jis-x0213-1@2000)
737 (define-charset-alias '=jis-x0213-2-2000 '=jis-x0213-2)
742 "JIS X 0213:2000 Plain 1"
743 '(registry "jisx0213\\(\\.2000\\)-1"
750 "JIS X 0213:2000 Plain 2"
751 '(registry "jisx0213\\(\\.2000\\)-2"
758 (when (featurep 'utf-2000)
759 (define-charset-alias 'ucs '=ucs)
760 (define-charset-alias '=jis-x0208-1990 '=jis-x0208@1990)
761 (define-charset-alias 'japanese-jisx0208-1990 '=jis-x0208@1990)
765 "JIS X 0208 detailed representative glyph-images (unchanged part)."
766 '(registry "jisx0208\\.1990"
775 "JIS X 0208:1978 detailed representative glyph-images."
776 '(registry "jisx0208\\.1978"
785 "JIS X 0208:1983 detailed representative glyph-images."
786 '(registry "jisx0208\\.1983"
794 "JIS X 0208:1990 detailed representative glyph-images."
795 '(registry "jisx0208\\.1990"
805 "JIS X 0213 Plain 1 detailed representative glyph-images (unchanged part)."
806 '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
817 "JIS X 0213:2000 Plain 1 detailed representative glyph-images."
818 '(registry "jisx0213\\(\\.2000\\)-1"
829 "JIS X 0213:2004 Plain 1 detailed representative glyph-images."
830 '(mother ==jis-x0213-1
832 ;; registry "jisx0213\\(\\.2004\\)-1"
839 "JIS X 0213 Plain 2 detailed representative glyph-images."
840 '(mother =jis-x0213-2
842 registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
849 "JIS X 0212 representative glyph-images."
850 '(registry "jisx0212"
860 "GB 2312 representative glyph-images."
870 "ISO-IR-165 (CCITT Extended GB; Chinese simplified)"
871 '(registry "isoir165"
880 "GB 12345 representative glyph-images."
889 "KS X 1001 representative glyph-images."
898 (define-charset-alias '=>>>jis-x0208 '=jis-x0208)
899 (define-charset-alias '=>>>jis-x0208@1978 '=jis-x0208@1978)
900 (define-charset-alias '=>>>jis-x0208@1983 '=jis-x0208@1983)
901 (define-charset-alias '=>>>jis-x0208@1990 '=jis-x0208@1990)
904 ;; "JIS X 0208 abstract glyph-forms (unchanged part)."
905 ;; '(registry "jisx0208\\.1990"
913 ;; '=>>>jis-x0208@1978
914 ;; "JIS X 0208:1978 abstract glyph-forms."
915 ;; '(registry "jisx0208\\.1978"
918 ;; mother =>>>jis-x0208
923 ;; '=>>>jis-x0208@1983
924 ;; "JIS X 0208:1983 abstract glyph-forms."
925 ;; '(registry "jisx0208\\.1983"
928 ;; mother =>>>jis-x0208
932 ;; '=>>>jis-x0208@1990
933 ;; "JIS X 0208:1990 abstract glyph-forms."
934 ;; '(registry "jisx0208\\.1990"
937 ;; mother =>>>jis-x0208
942 (define-charset-alias '=>>>jis-x0213-1 '=jis-x0213-1)
943 (define-charset-alias '=>>>jis-x0213-1@2000 '=jis-x0213-1@2000)
944 (define-charset-alias '=>>>jis-x0213-1@2004 '=jis-x0213-1@2004)
945 (define-charset-alias '=>>>jis-x0213-2 '=jis-x0213-2)
948 ;; "JIS X 0213 Plain 1 abstract glyph-forms (unchanged part)"
949 ;; '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
952 ;; mother =jis-x0213-1
959 ;; '=>>>jis-x0213-1@2000
960 ;; "JIS X 0213:2000 Plain 1 abstract glyph-forms"
961 ;; '(registry "jisx0213\\(\\.2000\\)-1"
964 ;; mother =>>>jis-x0213-1
971 ;; '=>>>jis-x0213-1@2004
972 ;; "JIS X 0213:2004 Plain 1 abstract glyph-forms"
973 ;; '(mother =>>>jis-x0213-1
975 ;; ;; registry "jisx0213\\(\\.2004\\)-1"
981 ;; "JIS X 0213 Plain 2 abstract glyph-forms"
982 ;; '(mother =jis-x0213-2
984 ;; registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
991 "JIS X 0208 abstract glyphs (unchanged part)."
992 '(registry "jisx0208\\.1990"
1001 "JIS X 0208:1978 abstract glyphs."
1002 '(registry "jisx0208\\.1978"
1011 "JIS X 0208:1983 abstract glyphs."
1012 '(registry "jisx0208\\.1983"
1020 "JIS X 0208:1990 abstract glyphs."
1021 '(registry "jisx0208\\.1990"
1030 "JIS X 0213 Plain 1 abstract glyphs (unchanged part)"
1031 '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
1034 mother =>>>jis-x0213-1
1041 '=>>jis-x0213-1@2000
1042 "JIS X 0213:2000 Plain 1 abstract glyphs"
1043 '(registry "jisx0213\\(\\.2000\\)-1"
1046 mother =>>jis-x0213-1
1054 "JIS X 0213 Plain 2 abstract glyphs"
1055 '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
1058 mother =>>>jis-x0213-2
1063 '=>>jis-x0213-1@2004
1064 "JIS X 0213:2004 Plain 1 abstract glyphs"
1065 '(registry "jisx0213\\(\\.2004\\)-1"
1068 mother =>>jis-x0213-1
1077 "JIS X 0208 based on usual unification."
1078 '(registry "jisx0208\\.1990"
1085 (define-charset-alias '=>jis-x0208@usual '=+>jis-x0208)
1088 "JIS X 0208:1978 unified abstract glyphs."
1089 '(registry "jisx0208\\.1978"
1098 "JIS X 0208:1983 unified abstract glyphs."
1099 '(registry "jisx0208\\.1983"
1107 "JIS X 0208:1990 unified abstract glyphs."
1108 '(registry "jisx0208\\.1990"
1116 "JIS X 0213 Plain 1 unified abstract glyphs (unchanged part)"
1117 '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
1120 mother =>>jis-x0213-1
1127 '=+>jis-x0213-1@2000
1128 "JIS X 0213:2000 Plain 1 unified abstract glyphs"
1129 '(registry "jisx0213\\(\\.2000\\)-1"
1132 mother =+>jis-x0213-1
1139 '=+>jis-x0213-1@2004
1140 "JIS X 0213:2004 Plain 1 unified abstract glyphs"
1141 '(registry "jisx0213\\(\\.2004\\)-1"
1144 mother =+>jis-x0213-1
1153 "JIS X 0208 based on the unchanged unification rules."
1154 '(registry "jisx0208\\.1990"
1161 (define-charset-alias '<=>jis-x0208 '=>jis-x0208)
1164 "JIS X 0208 based on the unification rule of 1997 edition."
1165 '(registry "jisx0208\\.1990"
1172 (define-charset-alias '<=>jis-x0208@1997 '=>jis-x0208@1997)
1173 (define-charset-alias ' =jis-x0208@1997 '=>jis-x0208@1997)
1177 "JIS X 0213 Plain 1 abstract characters (unchanged part)"
1178 '(registry "jisx0213\\(\\.[0-9]+\\)?-1"
1181 mother =+>jis-x0213-1
1187 (define-charset-alias '<=>jis-x0213-1 '=>jis-x0213-1)
1190 "JIS X 0213:2000 Plain 1 abstract characters"
1191 '(registry "jisx0213\\(\\.2000\\)-1"
1194 mother =>jis-x0213-1
1200 (define-charset-alias '<=>jis-x0213-1@2000 '=>jis-x0213-1@2000)
1203 "JIS X 0213:2004 Plain 1 abstract characters"
1204 '(registry "jisx0213\\(\\.2004\\)-1"
1207 mother =>jis-x0213-1
1213 (define-charset-alias '<=>jis-x0213-1@2004 '=>jis-x0213-1@2004)
1216 "JIS X 0213 Plain 2 based on usual unification."
1217 '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
1220 mother =>>jis-x0213-2
1224 (define-charset-alias '=>jis-x0213-2@usual '=+>jis-x0213-2)
1227 "JIS X 0213 Plain 2 abstract characters"
1228 '(registry "jisx0213\\(\\.\\(2000\\|2004\\)\\)?-2"
1231 mother =+>jis-x0213-2
1238 "CNS 11643 Plane 1 representative glyph-images."
1239 '(registry "CNS11643[.-]\\(.*[.-]\\)?1$"
1247 "CNS 11643 Plane 2 representative glyph-images."
1248 '(registry "CNS11643[.-]\\(.*[.-]\\)?2$"
1256 "CNS 11643 Plane 3 representative glyph-images."
1257 '(registry "CNS11643[.-]\\(.*[.-]\\)?3$"
1265 "CNS 11643 Plane 4 representative glyph-images."
1266 '(registry "CNS11643[.-]\\(.*[.-]\\)?4$"
1274 "CNS 11643 Plane 5 representative glyph-images."
1275 '(registry "CNS11643[.-]\\(.*[.-]\\)?5$"
1283 "CNS 11643 Plane 6 representative glyph-images."
1284 '(registry "CNS11643[.-]\\(.*[.-]\\)?6$"
1292 "CNS 11643 Plane 7 representative glyph-images."
1293 '(registry "CNS11643[.-]\\(.*[.-]\\)?7$"
1302 "CNS 11643 Plane 4 abstract glyphs."
1303 '(registry "CNS11643[.-]\\(.*[.-]\\)?4$"
1312 "CNS 11643 Plane 2 abstract characters."
1313 '(registry "CNS11643[.-]\\(.*[.-]\\)?2$"
1321 "CNS 11643 Plane 6 abstract characters."
1322 '(registry "CNS11643[.-]\\(.*[.-]\\)?6$"
1330 "CNS 11643 Plane 7 abstract characters."
1331 '(registry "CNS11643[.-]\\(.*[.-]\\)?7$"
1338 (make-charset '=big5-eten
1340 '(long-name "Big5-ETEN"
1349 registry "Big5\\.ETEN"))
1350 (define-charset-alias 'chinese-big5-eten '=big5-eten)
1351 (make-charset 'chinese-big5-eten-a
1352 "Big5 ETEN (#xF9D6 .. #xF9FE)"
1353 '(long-name "Big5-ETEN-a"
1362 registry "Big5\\.ETEN"))
1363 (make-charset 'chinese-big5-eten-b
1364 "Big5 ETEN (#xC6A1 .. #xC8FE)"
1365 '(long-name "Big5-ETEN-b"
1374 registry "Big5\\.ETEN"))
1376 (make-charset '=big5-cdp
1377 "Big5 with CDP extension"
1378 '(long-name "Big5-CDP"
1384 registry "big5\\.cdp-0"
1388 (define-charset-alias 'chinese-big5-cdp '=big5-cdp)
1390 (make-charset '==big5-cdp
1391 "Representative glyph-images of Big5-CDP"
1392 '(long-name "Big5-CDP glyph-images"
1398 registry "big5\\.cdp-0"
1401 (make-charset '=>>big5-cdp
1402 "Abstract glyphs of Big5-CDP"
1403 '(long-name "Big5-CDP glyphs"
1409 registry "big5\\.cdp-0"
1412 (make-charset '=>big5-cdp
1413 "Big5-CDP abstract characters"
1414 '(long-name "Big5-CDP abstract characters"
1420 registry "big5\\.cdp-0"
1421 mother =>>big5-cdp))
1425 "JA (JIS X0208) part of Han'you-Denshi characters"
1426 `(long-name "Han'you-Denshi/JA"
1432 registry "HanyoDenshi\\.JA-0$"
1433 min-code ,(lsh #x6400 16)
1434 max-code ,(+ (lsh #x6400 16) (1- (* 94 94)))
1435 code-offset ,(lsh #x6400 16)))
1438 "JB (JIS X0212) part of Han'you-Denshi characters"
1439 `(long-name "Han'you-Denshi/JB"
1445 registry "HanyoDenshi\\.JB-0$"
1446 min-code ,(+ (lsh #x6400 16) (* 94 94))
1447 max-code ,(+ (lsh #x6400 16) (1- (* 94 94 2)))
1448 code-offset ,(+ (lsh #x6400 16) (* 94 94))))
1451 "JC (JIS X0213:2000 Plane 1) part of Han'you-Denshi characters"
1452 `(long-name "Han'you-Denshi/JC"
1458 registry "HanyoDenshi\\.JC-0$"
1459 min-code ,(+ (lsh #x6400 16) (* 94 94 2))
1460 max-code ,(+ (lsh #x6400 16) (1- (* 94 94 3)))
1461 code-offset ,(+ (lsh #x6400 16) (* 94 94 2))))
1464 "JD (JIS X0213:2000 Plane 1) part of Han'you-Denshi characters"
1465 `(long-name "Han'you-Denshi/JD"
1471 registry "HanyoDenshi\\.JD-0$"
1472 min-code ,(+ (lsh #x6400 16) (* 94 94 3))
1473 max-code ,(+ (lsh #x6400 16) (1- (* 94 94 4)))
1474 code-offset ,(+ (lsh #x6400 16) (* 94 94 3))))
1477 "FT (FDPC additional) part of Han'you-Denshi characters"
1478 `(long-name "Han'you-Denshi/FT"
1484 registry "HanyoDenshi\\.FT-0$"
1485 min-code ,(+ (lsh #x6400 16) (* 94 94 4))
1486 max-code ,(+ (lsh #x6400 16) (1- (* 94 94 5)))
1487 code-offset ,(+ (lsh #x6400 16) (* 94 94 4))))
1490 "IA part of Han'you-Denshi characters"
1491 `(long-name "Han'you-Denshi/IA"
1497 registry "HanyoDenshi\\.IA-0$"
1498 min-code ,(+ (lsh #x6400 16) (* 94 94 5))
1499 max-code ,(+ (lsh #x6400 16) (1- (* 94 94 6)))
1500 code-offset ,(+ (lsh #x6400 16) (* 94 94 5))))
1503 "IB part of Han'you-Denshi characters"
1504 `(long-name "Han'you-Denshi/IB"
1510 registry "HanyoDenshi\\.IB-0$"
1511 min-code ,(+ (lsh #x6400 16) (* 94 94 6))
1512 max-code ,(+ (lsh #x6400 16) (1- (* 94 94 7)))
1513 code-offset ,(+ (lsh #x6400 16) (* 94 94 6))))
1516 "HG (HyouGai Kanji) part of Han'you-Denshi characters"
1517 `(long-name "Han'you-Denshi/HG"
1523 registry "HanyoDenshi\\.HG-0$"
1524 min-code ,(+ (lsh #x6400 16) (* 94 94 7))
1525 max-code ,(+ (lsh #x6400 16) (1- (* 94 94 8)))
1526 code-offset ,(+ (lsh #x6400 16) (* 94 94 7))))
1529 "IP (for IPA) part of Han'you-Denshi characters"
1530 `(long-name "Han'you-Denshi/IP"
1536 registry "HanyoDenshi\\.IP-0$"
1537 min-code ,(+ (lsh #x6402 16) #x4E00)
1538 max-code ,(+ (lsh #x6402 16) #x9FFF)
1539 code-offset ,(+ (lsh #x6402 16))))
1542 "JT (Juuki Touitsu Moji) part of Han'you-Denshi characters"
1543 `(long-name "Han'you-Denshi/JT"
1549 registry "HanyoDenshi\\.JT-0$"
1550 min-code ,(+ (lsh #x6402 16) #xAC00)
1551 max-code ,(+ (lsh #x6402 16) #xD7AF)
1552 code-offset ,(+ (lsh #x6402 16))))
1555 "KS (KoSeki) part of Han'you-Denshi characters"
1556 `(long-name "Han'you-Denshi/KS font encoding"
1565 "Han'you-Denshi/JA detailed glyph-images."
1566 '(long-name "Han'you-Denshi/JA glyph-images"
1572 registry "HanyoDenshi\\.JA-0$"
1573 mother =hanyo-denshi/ja))
1576 "Han'you-Denshi/JB detailed glyph-images."
1577 '(long-name "Han'you-Denshi/JB glyph-images"
1583 registry "HanyoDenshi\\.JB-0$"
1584 mother =hanyo-denshi/jb))
1587 "Han'you-Denshi/JC detailed glyph-images."
1588 '(long-name "Han'you-Denshi/JC glyph-images"
1594 registry "HanyoDenshi\\.JC-0$"
1595 mother =hanyo-denshi/jc))
1598 "Han'you-Denshi/JD detailed glyph-images."
1599 '(long-name "Han'you-Denshi/JD glyph-images"
1605 registry "HanyoDenshi\\.JD-0$"
1606 mother =hanyo-denshi/jd))
1609 "Han'you-Denshi/FT detailed glyph-images."
1610 '(long-name "Han'you-Denshi/FT glyph-images"
1616 registry "HanyoDenshi\\.FT-0$"
1617 mother =hanyo-denshi/ft))
1620 "Han'you-Denshi/IA representative glyph-images."
1621 '(long-name "Han'you-Denshi/IA glyph-images"
1627 registry "HanyoDenshi\\.IA-0$"
1628 mother =hanyo-denshi/ia))
1631 "Han'you-Denshi/IB detailed glyph-images."
1632 '(long-name "Han'you-Denshi/IB glyph-images"
1638 registry "HanyoDenshi\\.IB-0$"
1639 mother =hanyo-denshi/ib))
1642 "Han'you-Denshi/HG detailed glyph-images."
1643 '(long-name "Han'you-Denshi/HG glyph-images"
1649 registry "HanyoDenshi\\.HG-0$"
1650 mother =hanyo-denshi/hg))
1653 "JT (Juuki Touitsu Moji) detailed glyph-images."
1654 '(long-name "Han'you-Denshi/JT glyph-images"
1660 registry "HanyoDenshi\\.JT-0$"
1661 mother =hanyo-denshi/jt))
1664 "KoSeki-touitsu-moji detailed glyph-images."
1665 '(long-name "Han'you-Denshi/KS glyph-images"
1671 mother =hanyo-denshi/ks))
1674 '=hanyo-denshi/ks/mf
1675 "font encoding for KS (KoSeki) characters"
1676 `(long-name "Han'you-Denshi/KS font encoding"
1682 registry "HanyoDenshi\\.KSMF-0$"
1683 min-code ,(lsh #x6403 16)
1684 max-code ,(+ (lsh #x6403 16) #xFFFF)
1685 code-offset ,(lsh #x6403 16)))
1687 (define-charset-alias '=>>>hanyo-denshi/ja '=hanyo-denshi/ja)
1689 ;; '=>>>hanyo-denshi/ja
1690 ;; "Han'you-Denshi/JA abstract glyph-forms"
1691 ;; '(long-name "Han'you-Denshi/JA glyph-forms"
1697 ;; registry "HanyoDenshi\\.JA-0$"
1698 ;; mother =hanyo-denshi/ja))
1699 (define-charset-alias '=>>>hanyo-denshi/jb '=hanyo-denshi/jb)
1701 ;; '=>>>hanyo-denshi/jb
1702 ;; "Han'you-Denshi/JB abstract glyph-forms"
1703 ;; '(long-name "Han'you-Denshi/JB glyph-forms"
1709 ;; registry "HanyoDenshi\\.JB-0$"
1710 ;; mother =hanyo-denshi/jb))
1711 (define-charset-alias '=>>>hanyo-denshi/jc '=hanyo-denshi/jc)
1713 ;; '=>>>hanyo-denshi/jc
1714 ;; "Han'you-Denshi/JC abstract glyph-forms"
1715 ;; '(long-name "Han'you-Denshi/JC glyph-forms"
1721 ;; registry "HanyoDenshi\\.JC-0$"
1722 ;; mother =hanyo-denshi/jc))
1723 (define-charset-alias '=>>>hanyo-denshi/jd '=hanyo-denshi/jd)
1725 ;; '=>>>hanyo-denshi/jd
1726 ;; "Han'you-Denshi/JD abstract glyph-forms"
1727 ;; '(long-name "Han'you-Denshi/JD glyph-forms"
1733 ;; registry "HanyoDenshi\\.JD-0$"
1734 ;; mother =hanyo-denshi/jd))
1735 (define-charset-alias '=>>>hanyo-denshi/ft '=hanyo-denshi/ft)
1737 ;; '=>>>hanyo-denshi/ft
1738 ;; "Han'you-Denshi/FT abstract glyph-forms"
1739 ;; '(long-name "Han'you-Denshi/FT glyph-forms"
1745 ;; registry "HanyoDenshi\\.FT-0$"
1746 ;; mother =hanyo-denshi/ft))
1747 (define-charset-alias '=>>>hanyo-denshi/ib '=hanyo-denshi/ib)
1749 ;; '=>>>hanyo-denshi/ib
1750 ;; "Han'you-Denshi/IB abstract glyph-forms"
1751 ;; '(long-name "Han'you-Denshi/IB glyph-forms"
1757 ;; registry "HanyoDenshi\\.IB-0$"
1758 ;; mother =hanyo-denshi/ib))
1759 (define-charset-alias '=>>>hanyo-denshi/hg '=hanyo-denshi/hg)
1761 ;; '=>>>hanyo-denshi/hg
1762 ;; "Han'you-Denshi/HG abstract glyph-forms"
1763 ;; '(long-name "Han'you-Denshi/HG glyph-forms"
1769 ;; registry "HanyoDenshi\\.HG-0$"
1770 ;; mother =hanyo-denshi/hg))
1771 (define-charset-alias '=>>>hanyo-denshi/jt '=hanyo-denshi/jt)
1773 ;; '=>>>hanyo-denshi/jt
1774 ;; "JT (Juuki Touitsu Moji) abstract glyph-forms"
1775 ;; '(long-name "Han'you-Denshi/JT glyph-forms"
1781 ;; registry "HanyoDenshi\\.JT-0$"
1782 ;; mother =hanyo-denshi/jt))
1783 (define-charset-alias '=>>>hanyo-denshi/ks '=hanyo-denshi/ks)
1785 ;; '=>>>hanyo-denshi/ks
1786 ;; "KoSeki-touitsu-moji abstract glyph-forms"
1787 ;; '(long-name "Han'you-Denshi/KS glyph-forms"
1793 ;; mother =hanyo-denshi/ks))
1797 "Han'you-Denshi/JA abstract glyphs"
1798 '(long-name "Han'you-Denshi/JA glyphs"
1804 registry "HanyoDenshi\\.JA-0$"
1805 mother =>>>hanyo-denshi/ja))
1808 "Han'you-Denshi/JB abstract glyphs"
1809 '(long-name "Han'you-Denshi/JB glyphs"
1815 registry "HanyoDenshi\\.JB-0$"
1816 mother =>>>hanyo-denshi/jb))
1819 "Han'you-Denshi/JC abstract glyphs"
1820 '(long-name "Han'you-Denshi/JC glyphs"
1826 registry "HanyoDenshi\\.JC-0$"
1827 mother =>>>hanyo-denshi/jc))
1830 "Han'you-Denshi/JD abstract glyphs"
1831 '(long-name "Han'you-Denshi/JD glyphs"
1837 registry "HanyoDenshi\\.JD-0$"
1838 mother =>>>hanyo-denshi/jd))
1841 "Han'you-Denshi/FT abstract glyphs"
1842 '(long-name "Han'you-Denshi/FT glyphs"
1848 registry "HanyoDenshi\\.FT-0$"
1849 mother =>>>hanyo-denshi/ft))
1852 "Han'you-Denshi/IA abstract glyphs"
1853 '(long-name "Han'you-Denshi/IA glyphs"
1859 registry "HanyoDenshi\\.IA-0$"
1860 mother =hanyo-denshi/ia))
1863 "Han'you-Denshi/IB abstract glyphs"
1864 '(long-name "Han'you-Denshi/IB abstract glyphs"
1870 registry "HanyoDenshi\\.IB-0$"
1871 mother =>>>hanyo-denshi/ib))
1874 "Han'you-Denshi/HG abstract glyphs"
1875 '(long-name "Han'you-Denshi/HG abstract glyphs"
1881 registry "HanyoDenshi\\.HG-0$"
1882 mother =>>>hanyo-denshi/hg))
1885 "Han'you-Denshi/IP abstract glyphs"
1886 '(long-name "Han'you-Denshi/IP abstract glyphs"
1892 registry "HanyoDenshi\\.IP-0$"
1893 mother =hanyo-denshi/ip))
1896 "JT (Juuki Touitsu Moji) abstract glyphs"
1897 '(long-name "Han'you-Denshi/JT glyphs"
1903 registry "HanyoDenshi\\.JT-0$"
1904 mother =>>>hanyo-denshi/jt))
1907 "Han'you-Denshi/KS abstract glyphs"
1908 '(long-name "Han'you-Denshi/KS glyphs"
1914 mother =>>>hanyo-denshi/ks))
1925 min-code ,(lsh #x6100 16)
1926 max-code ,(+ (lsh #x6100 16) 67547)
1927 code-offset ,(lsh #x6100 16)))
1929 "GT 2000 detailed glyph-images."
1930 '(long-name "GT glyph-images"
1940 (define-charset-alias 'ideograph-gt '=gt)
1941 (define-charset-alias '=>>>gt '=gt)
1942 ;; (make-charset '=>>>gt
1943 ;; "GT 2000 abstract glyph-forms"
1944 ;; '(long-name "GT abstract glyph-forms"
1951 (make-charset '=>>gt
1952 "GT 2000 abstract glyphs"
1953 '(long-name "GT abstract glyphs"
1960 (define-charset-alias '<=>gt '=>>gt)
1961 (define-charset-alias '<==>gt '=>>gt)
1962 (make-charset '=+>gt
1963 "GT 2000 unified abstract glyphs"
1964 '(long-name "Unified abstract GT glyphs"
1972 "GT 2000 abstract characters"
1973 '(long-name "abstract GT characters"
1980 (make-charset '=gt-k
1981 "Ideographic components of GT"
1982 `(long-name "GT components"
1989 min-code ,(lsh #x6110 16)
1990 max-code ,(+ (lsh #x6110 16) 17090)
1991 code-offset ,(lsh #x6110 16)))
1992 (define-charset-alias 'ideograph-gt-k '=gt-k)
1993 (make-charset '==gt-k
1994 "Representative glyph-images of GT-K"
1995 '(long-name "GT-K glyph-images"
2002 (make-charset '=>>gt-k
2003 "abstract glyphs of GT-K"
2004 '(long-name "GT-K abstract glyphs"
2011 (make-charset '=>gt-k
2012 "GT-K abstract characters"
2013 '(long-name "GT-K abstract characters"
2023 (intern (format "=gt-pj-%d" i))
2024 (format "GT 2000 (pseudo JIS encoding) part %d" i)
2025 `(long-name ,(format "GT PJ %d" i)
2031 registry ,(format "\\(GTpj-%d\\|jisx0208\\.GT-%d\\)$" i i)))
2032 (define-charset-alias
2033 (intern (format "ideograph-gt-pj-%d" i))
2034 (intern (format "=gt-pj-%d" i)))
2038 "Ideographic parts of GT (pseudo JIS encoding) part 1"
2045 registry "\\(GTKpj-1\\|jisx0208\\.GTK-1\\)$"))
2046 (define-charset-alias 'ideograph-gt-pj-k1 '=gt-pj-k1)
2049 "Ideographic parts of GT (pseudo JIS encoding) part 2"
2056 registry "\\(GTKpj-2\\|jisx0208\\.GTK-2\\)$"))
2057 (define-charset-alias 'ideograph-gt-pj-k2 '=gt-pj-k2)
2059 (make-charset '=daikanwa
2060 "Daikanwa dictionary (unchanged part)"
2061 `(long-name "Daikanwa"
2067 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2069 max-code ,(+ #xE00000 50100)
2070 code-offset #xE00000))
2071 (define-charset-alias 'ideograph-daikanwa '=daikanwa)
2073 (make-charset '=daikanwa@rev1
2074 "Daikanwa dictionary (revised version)"
2075 '(long-name "Daikanwa Rev."
2081 registry "Daikanwa\\(\\.[0-9]+\\)?-2"
2083 (define-charset-alias 'ideograph-daikanwa-2 '=daikanwa@rev1)
2084 (define-charset-alias '=daikanwa-rev1 '=daikanwa@rev1)
2086 (make-charset '=daikanwa@rev2
2087 "Daikanwa dictionary (revised version 2)"
2088 '(long-name "Daikanwa"
2094 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2098 (define-charset-alias '=daikanwa-rev2 '=daikanwa@rev2)
2100 (make-charset '=daikanwa/+p
2101 "Daikanwa dictionary (ddddd')"
2102 '(long-name "Daikanwa ddddd'"
2108 (make-charset '=daikanwa/+2p
2109 "Daikanwa dictionary (ddddd'')"
2110 '(long-name "Daikanwa ddddd''"
2116 (make-charset '=daikanwa/ho
2117 "Daikanwa dictionary (Hokan)"
2118 '(long-name "Daikanwa-ho"
2125 (make-charset '==daikanwa
2126 "Daikanwa detailed glyph-images."
2127 '(long-name "Daikanwa detailed glyph-images"
2133 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2136 (make-charset '=>>daikanwa
2137 "Daikanwa abstract glyphs"
2138 '(long-name "Daikanwa glyphs"
2144 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2146 (make-charset '=>>daikanwa/+p
2147 "Daikanwa abstract glyphs (ddddd')"
2148 '(long-name "Daikanwa glyphs (ddddd')"
2154 mother =daikanwa/+p))
2155 (make-charset '=>>daikanwa/+2p
2156 "Daikanwa abstract glyphs (ddddd'')"
2157 '(long-name "Daikanwa glyphs (ddddd'')"
2163 mother =daikanwa/+2p))
2164 (make-charset '=>>daikanwa/ho
2165 "Daikanwa abstract glyphs (Hokan)"
2166 '(long-name "Daikanwa-ho glyph"
2172 mother =daikanwa/ho))
2174 (make-charset '=>daikanwa
2175 "Daikanwa abstract characters"
2176 '(long-name "abstract Daikanwa"
2182 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2183 mother =>>daikanwa))
2184 (make-charset '=>daikanwa/ho
2185 "Daikanwa abstract characters (Hokan)"
2186 '(long-name "abstract Daikanwa-ho"
2192 mother =>>daikanwa/ho))
2194 (make-charset '=shinjigen
2195 "Kadokawa ShinJigen dictionary (common parts)"
2196 `(long-name "Shinjigen common parts"
2202 registry "Shinjigen\\(\\.[0-9]+\\)?-*"))
2204 (make-charset '=shinjigen@1ed
2205 "Kadokawa ShinJigen dictionary (the first edition)"
2206 `(long-name "Shinjigen-1"
2213 registry "Shinjigen\\(\\.[0-9]+\\)?-1"))
2214 (define-charset-alias 'shinjigen-1 '=shinjigen@1ed)
2216 (make-charset '=shinjigen@1ed/24pr
2217 "Kadokawa ShinJigen dictionary (the 24th impression)"
2218 `(long-name "Shinjigen-1 24pr"
2224 mother =shinjigen@1ed))
2226 (make-charset '=shinjigen@rev
2227 "Kadokawa ShinJigen dictionary (the revised edition)"
2228 `(long-name "Shinjigen-2"
2235 registry "Shinjigen\\(\\.[0-9]+\\)?-2"))
2236 (define-charset-alias 'shinjigen-2 '=shinjigen@rev)
2237 (make-charset '=shinjigen/+p@rev
2238 "ShinJigen (the second edition) number with '"
2239 `(long-name "Shinjigen-2 with '"
2245 (define-charset-alias 'shinjigen-2-p '=shinjigen/+p@rev)
2247 (make-charset '==shinjigen
2248 "Kadokawa ShinJigen dictionary (common parts)"
2249 `(long-name "Shinjigen common parts"
2256 registry "Shinjigen\\(\\.[0-9]+\\)?-*"))
2258 (make-charset '=big5-pua
2259 "Big5 with private used area"
2260 '(long-name "Big5-PUA"
2267 registry "Big5\\.ETEN"))
2268 (define-charset-alias 'chinese-big5-pua '=big5-pua)
2271 (hzk-min (+ (lsh #x6200 16) 65536))
2272 (hzk-max (+ hzk-min 65535)))
2275 (intern (format "=hanziku-%d" i))
2276 (format "HANZIKU (pseudo BIG5 encoding) part %d" i)
2277 `(long-name ,(format "HANZIKU-%d" i)
2283 registry ,(format "hanziku-%d$" i i)
2286 code-offset ,hzk-min))
2287 (define-charset-alias
2288 (intern (format "ideograph-hanziku-%d" i))
2289 (intern (format "=hanziku-%d" i)))
2290 (setq hzk-min (1+ hzk-max)
2291 hzk-max (+ hzk-min 65535))
2294 (make-charset '=cbeta "CBETA private characters"
2295 '(long-name "CBETA PUA"
2302 code-offset #xE20000
2305 (define-charset-alias 'ideograph-cbeta '=cbeta)
2307 (make-charset '=>>cbeta "CBETA abstract glyphs"
2308 '(long-name "CBETA glyphs"
2317 (make-charset '=zinbun-oracle
2318 "Oracle Bones Script"
2319 `(long-name "Oracle Bones Script in Zinbun, Kyoto Univ."
2322 registry "zob1968-0"
2325 max-code ,(+ #xE70000 8192)
2326 code-offset #xE70000
2330 (make-charset '=>zinbun-oracle
2331 "Abstract Oracle Bones"
2332 '(long-name "Abstract characters of Zinbun Oracle Bones."
2335 mother =zinbun-oracle
2336 registry "zob1968-0"
2341 (make-charset '=jef-china3
2342 "JEF + CHINA3 private characters"
2343 '(long-name "JEF + CHINA3"
2349 registry "china3jef-0"
2352 code-offset #xE80000))
2353 (define-charset-alias 'china3-jef '=jef-china3)
2355 (make-charset '=ruimoku-v6
2356 "private characters used in RUIMOKU Version.6"
2365 min-code #xE90000 ; #xE000
2366 max-code #xE908FF ; #xE8FF
2367 code-offset ,(- #xE90000 #xE000)))
2368 (make-charset '=>>ruimoku-v6
2369 "RUIMOKU Version.6 glyphs"
2370 '(long-name "RUI6 glyphs"
2377 mother =ruimoku-v6))
2381 ;; "ZhongHua-ZiHai glyph-images"
2382 ;; '(long-name "ZhongHua-ZiHai (pppp-nn)"
2391 ;; "ZhongHua-ZiHai (pp.1700
\e$B!A
\e(B1781) glyph-images"
2392 ;; '(long-name "ZhongHua-ZiHai pp.17xx"
2398 ;; registry "zihai\\.cp-17$"))
2400 (make-charset '=big5-cdp-var-3
2401 "Big5-CDP-var-3 glyph-images of GlyphWiki"
2402 '(long-name "Big5-CDP-var-3"
2408 registry "cdp\\.var-3$"
2411 (make-charset '=big5-cdp-var-5
2412 "Big5-CDP-var-5 glyph-images of GlyphWiki"
2413 '(long-name "Big5-CDP-var-5"
2419 registry "cdp\\.var-5$"
2422 (make-charset '==>ucs@bucs
2423 "Basic Subset of Coded Character Sets (BUCS)"
2424 '(long-name "BUCS abstract characters"
2433 (make-charset '=>ucs@iso
2434 "Abstract characters of ISO/IEC 10646 representatives"
2435 '(long-name "UCS characters for ISO"
2443 (make-charset '=>ucs@unicode
2444 "Abstract characters of Unicode representatives"
2445 '(long-name "UCS characters for Unicode"
2453 (make-charset '=>ucs@jis
2454 "UCS representative characters for JIS X0208/0212/0213"
2455 '(long-name "UCS characters for JIS"
2462 mother =>ucs@unicode))
2463 (make-charset '=>ucs@ks
2464 "UCS representative characters for Korean Standards"
2465 '(long-name "UCS characters for KS"
2472 mother =>ucs@unicode))
2473 (make-charset '=>ucs@cns
2474 "UCS representatives characters for CNS 11643 sources"
2475 '(long-name "UCS characters for CNS 11643"
2482 mother =>ucs@unicode))
2484 (make-charset '=+>ucs@iso
2485 "UCS based on ISO/IEC 10646 representative glyphs"
2486 '(long-name "Unified abstract glyphs of UCS"
2494 (make-charset '=+>ucs@unicode
2495 "Unicode representative unified abstract glyphs"
2496 '(long-name "UCS unified abstract glyphs for Unicode"
2504 (make-charset '=+>ucs@jis
2505 "UCS based on Japanese usual unification"
2506 '(long-name "UCS unified abstract glyphs for JP"
2513 mother =+>ucs@unicode))
2514 (define-charset-alias '=>ucs@JP '=+>ucs@jis)
2515 (make-charset '=+>ucs@jis/1990
2516 "UCS representative characters for JIS X0208/0212:1990"
2517 '(long-name "UCS characters for JIS:1990"
2525 (define-charset-alias '=>ucs@jis/1990 '=+>ucs@jis/1990)
2526 (make-charset '=+>ucs@jis/2004
2527 "UCS representative characters for JIS X 0213:2004"
2528 '(long-name "UCS characters for JIS:2004"
2536 (make-charset '=+>ucs@ks
2537 "UCS representative unified abstract glyphs for Korean Standards"
2538 '(long-name "UCS unified abstract glyphs for KS"
2545 mother =+>ucs@unicode))
2546 (make-charset '=+>ucs@cns
2547 "UCS representatives unified abstract glyphs for CNS 11643 sources"
2548 '(long-name "UCS unified abstract glyphs for CNS"
2555 mother =+>ucs@unicode))
2557 (make-charset '=>>ucs@iso
2558 "Representative abstract-glyphs of ISO/IEC 10646"
2559 '(long-name "UCS abstract glyphs for UCS"
2567 (make-charset '=>>ucs@unicode
2568 "Representative abstract-glyphs of Unicode"
2569 '(long-name "Unicode abstract glyphs"
2577 (make-charset '=>>ucs@jis
2578 "UCS Representative abstract-glyphs for JIS X0208/0212/0213"
2579 '(long-name "UCS abstract glyphs for JIS"
2586 mother =>>ucs@unicode))
2587 (make-charset '=>>ucs@jis/1990
2588 "UCS Representative glyphs for JIS X 0208/0212:1990"
2589 '(long-name "UCS glyphs for JIS:1990"
2597 (make-charset '=>>ucs@jis/2000
2598 "UCS Representative glyphs for JIS X 0213:2000"
2599 '(long-name "UCS glyphs for JIS:2000"
2607 (make-charset '=>>ucs@jis/2004
2608 "UCS Representative glyphs for JIS X 0213:2004"
2609 '(long-name "UCS glyphs for JIS:2004"
2617 (make-charset '=>>ucs@JP
2618 "UCS abstract-glyphs based on Japanese style glyphs"
2619 '(long-name "UCS glyphs for JP"
2626 mother =>>ucs@jis/2004))
2627 (make-charset '=>>ucs@ks
2628 "UCS Representative glyphs for Korean Standards"
2629 '(long-name "UCS glyphs for KS"
2636 mother =>>ucs@unicode))
2637 (make-charset '=>>ucs@cns
2638 "UCS Representative glyphs for CNS 11643 sources"
2639 '(long-name "UCS glyphs for CNS"
2646 mother =>>ucs@unicode))
2648 (make-charset '=>>>ucs@iso
2649 "Representative glyph-forms of ISO/IEC 10646"
2650 '(long-name "UCS glyph-forms for UCS"
2658 (make-charset '=>>>ucs@unicode
2659 "Representative glyph-forms of Unicode"
2660 '(long-name "UCS glyph-forms for Unicode"
2667 mother =>>>ucs@iso))
2668 (make-charset '=>>>ucs@jis
2669 "UCS Representative glyph-forms for JIS X0208/0212/0213"
2670 '(long-name "UCS glyph-forms for JIS"
2677 mother =>>>ucs@unicode))
2678 ;; (make-charset '=>>>ucs@jis/1990
2679 ;; "UCS Representative glyph-forms for JIS X 0208/0212:1990"
2680 ;; '(long-name "UCS glyph-forms for JIS:1990"
2687 ;; mother =>>>ucs@jis))
2688 ;; (make-charset '=>>>ucs@jis/2000
2689 ;; "UCS Representative glyph-forms for JIS X 0213:2000"
2690 ;; '(long-name "UCS glyph-forms for JIS:2000"
2697 ;; mother =>>>ucs@jis))
2698 ;; (make-charset '=>>>ucs@jis/2004
2699 ;; "UCS Representative glyph-forms for JIS X 0213:2004"
2700 ;; '(long-name "UCS glyph-forms for JIS:2004"
2707 ;; mother =>>>ucs@jis))
2708 ;; (make-charset '=>>>ucs@ks
2709 ;; "UCS Representative glyph-forms for Korean Standards"
2710 ;; '(long-name "UCS glyph-forms for KS"
2717 ;; mother =>>>ucs@unicode))
2718 ;; (make-charset '=>>>ucs@cns
2719 ;; "UCS Representative glyph-forms for CNS 11643 sources"
2720 ;; '(long-name "UCS glyph-forms for CNS"
2727 ;; mother =>>>ucs@unicode))
2729 (make-charset '=ucs@iso
2730 "ISO/IEC 10646 for its representative glyphs"
2731 '(long-name "UCS for ISO"
2738 mother =>>>ucs@iso))
2739 (make-charset '=ucs@unicode
2740 "Unicode for its representative glyphs"
2741 '(long-name "UCS for Unicode"
2749 (make-charset '=ucs@gb
2750 "ISO/IEC 10646 for GB"
2751 '(long-name "UCS for GB"
2758 mother =ucs@unicode))
2759 (define-charset-alias 'ucs-gb '=ucs@gb)
2760 (make-charset '=ucs@gb/fw
2761 "ISO/IEC 10646 for GB with fullwidth"
2762 '(long-name "UCS for GB-fullwidth"
2770 (make-charset '=ucs-bmp@gb
2771 "ISO/IEC 10646 BMP for GB"
2772 '(long-name "BMP for GB"
2781 (make-charset '=ucs@cns
2782 "ISO/IEC 10646 for CNS 11643"
2783 '(long-name "UCS for CNS"
2790 mother =ucs@unicode))
2791 (define-charset-alias 'ucs-cns '=ucs@cns)
2792 (define-charset-alias '=>>>ucs@cns '=ucs@cns)
2793 (make-charset '=ucs@cns/fw
2794 "ISO/IEC 10646 for CNS 11643 with fullwidth"
2795 '(long-name "UCS for CNS-fullwidth"
2803 (make-charset '=ucs-bmp@cns
2804 "ISO/IEC 10646 BMP for CNS"
2805 '(long-name "BMP for CNS"
2814 (make-charset '=ucs@jis
2815 "ISO/IEC 10646 for JIS X0208/0212/0213"
2816 '(long-name "UCS for JIS"
2823 mother =ucs@unicode))
2824 (define-charset-alias 'ucs-jis '=ucs@jis)
2825 (make-charset '=ucs@jis/fw
2826 "ISO/IEC 10646 for JIS X0208/0212/0213 with fullwidth"
2827 '(long-name "UCS for JIS-fullwidth"
2835 (make-charset '=ucs-bmp@jis
2836 "ISO/IEC 10646 BMP for JIS"
2837 '(long-name "BMP for JIS"
2846 ;; (make-charset '=ucs@jis/1983
2847 ;; "ISO/IEC 10646 for JIS X 0208:1983"
2848 ;; '(long-name "UCS for JIS:1983"
2855 ;; mother =ucs@jis))
2856 (make-charset '=ucs@jis/1990
2857 "ISO/IEC 10646 for JIS X 0208/0212:1990"
2858 '(long-name "UCS for JIS:1990"
2866 (define-charset-alias '=ucs@jis-1990 '=ucs@jis/1990)
2867 (define-charset-alias '=ucs-jis-1990 '=ucs@jis/1990)
2868 (define-charset-alias '=>>>ucs@jis/1990 '=ucs@jis/1990)
2869 (make-charset '=ucs@jis/2000
2870 "ISO/IEC 10646 for JIS X 0213:2000"
2871 '(long-name "UCS for JIS:2000"
2879 (define-charset-alias '=ucs@jis-2000 '=ucs@jis/2000)
2880 (define-charset-alias '=ucs-jis-2000 '=ucs@jis/2000)
2881 (define-charset-alias '=>>>ucs@jis/2000 '=ucs@jis/2000)
2882 (make-charset '=ucs@jis/2004
2883 "ISO/IEC 10646 for JIS X 0213:2004"
2884 '(long-name "UCS for JIS:2004"
2892 (define-charset-alias '=>>>ucs@jis/2004 '=ucs@jis/2004)
2893 (make-charset '=ucs@JP
2894 "UCS for common glyphs used in Japan"
2895 '(long-name "UCS for Japan"
2902 mother =ucs@jis/2004))
2903 (define-charset-alias '=ucs@jp '=ucs@JP)
2904 (make-charset '=ucs@JP/hanazono
2905 "Japanese glyph-images of Hanazono Mincho"
2906 '(long-name "UCS for Hana-Min"
2914 (make-charset '=ucs@ks
2915 "ISO/IEC 10646 for Korean Standards"
2916 '(long-name "UCS for KS"
2923 mother =ucs@unicode))
2924 (define-charset-alias 'ucs-ks '=ucs@ks)
2925 (define-charset-alias '=>>>ucs@ks '=ucs@ks)
2926 (make-charset '=ucs-bmp@ks
2927 "ISO/IEC 10646 BMP for KS"
2928 '(long-name "BMP for KS"
2937 (make-charset '=ucs@cns11643
2938 "ISO/IEC 10646 for CNS based on www.cns11643.gov.tw"
2939 '(long-name "UCS for CNS11643"
2947 (make-charset '=ucs@big5
2948 "ISO/IEC 10646 for Big5"
2949 '(long-name "UCS for Big5"
2957 (define-charset-alias 'ucs-big5 '=ucs@big5)
2958 (make-charset '=ucs@big5/cns11643
2959 "ISO/IEC 10646 for Big5 based on www.cns11643.gov.tw"
2960 '(long-name "UCS for Big5@CNS11643"
2969 (make-charset '==ucs@iso
2970 "ISO/IEC 10646 for its representative glyph-images."
2971 '(long-name "ISO rep-image for UCS"
2979 (make-charset '==ucs@unicode
2980 "Unicode for its representative glyph-images."
2981 '(long-name "UCS for Unicode"
2989 (make-charset '==ucs@gb
2990 "ISO/IEC 10646 for GB"
2991 '(long-name "UCS for GB"
2998 mother ==ucs@unicode))
2999 (make-charset '==ucs-bmp@gb
3000 "ISO/IEC 10646 BMP for GB"
3001 '(long-name "BMP for GB"
3010 (make-charset '==ucs@cns
3011 "ISO/IEC 10646 for CNS 11643"
3012 '(long-name "UCS for CNS"
3019 mother ==ucs@unicode))
3020 (make-charset '==ucs-bmp@cns
3021 "ISO/IEC 10646 BMP for CNS"
3022 '(long-name "BMP for CNS"
3031 (make-charset '==ucs@jis
3032 "ISO/IEC 10646 for JIS X0208/0212/0213"
3033 '(long-name "UCS for JIS"
3040 mother ==ucs@unicode))
3041 (make-charset '==ucs@jis/1990
3042 "ISO/IEC 10646 for JIS X 0208/0212:1990"
3043 '(long-name "UCS for JIS:1990"
3051 (make-charset '==ucs@jis/2000
3052 "ISO/IEC 10646 for JIS X 0213:2000"
3053 '(long-name "UCS for JIS:2000"
3061 (make-charset '==ucs@jis/2004
3062 "ISO/IEC 10646 for JIS X 0213:2004"
3063 '(long-name "UCS for JIS:2004"
3071 (make-charset '==ucs@JP
3072 "UCS for common glyph-images used in Japan."
3073 '(long-name "UCS for Japan"
3080 mother ==ucs@jis/2004))
3081 (make-charset '==ucs@JP/hanazono
3082 "Japanese glyph-images of Hanazono Mincho."
3083 '(long-name "UCS for Hana-Min"
3091 (make-charset '==ucs@ks
3092 "ISO/IEC 10646 for Korean Standards."
3093 '(long-name "UCS for KS"
3100 mother ==ucs@unicode))
3101 (make-charset '==ucs-bmp@ks
3102 "ISO/IEC 10646 BMP for KS."
3103 '(long-name "BMP for KS"
3112 (make-charset '==ucs@cns11643
3113 "ISO/IEC 10646 for CNS based on www.cns11643.gov.tw."
3114 '(long-name "UCS for CNS11643"
3123 (make-charset '=ucs-itaiji-084
3124 "uXXXX-itaiji-084 glyph-images of GlyphWiki"
3125 '(long-name "UCS-itaiji-084"
3133 (make-charset '=ucs-bmp-itaiji-084
3134 "uXXXX-itaiji-084 glyph-images in BMP"
3135 '(long-name "UCS-BMP-itaiji-084"
3142 mother =ucs-itaiji-084
3145 registry "ucs\\.itaiji084-0"))
3149 "CJK Radicals of UCS"
3150 '(long-name "UCS-Radicals"
3156 registry "-zhRadicals-.*-ucs-0"
3158 min-code #x2E00 max-code #x2FFF))
3160 '=ucs-radicals@unicode
3161 "CJK Radicals of UCS"
3162 '(long-name "UCS-Radicals"
3168 registry "-zhRadicals-.*-ucs-0"
3170 min-code #x2E00 max-code #x2FFF))
3173 "Hangul Syllables of UCS"
3174 '(long-name "UCS-Hangul-Syllables"
3180 registry "-Hangul-.*-ucs-0"
3182 min-code #xAC00 max-code #xD7AF))
3185 "CJK Characters in BMP of UCS"
3186 '(long-name "UCS-BMP-CJK"
3192 registry "-zh-.*-ucs-0"
3200 "CJK Characters in BMP with GB representative glyph-images."
3201 '(long-name "CJK in BMP@GB"
3207 registry "-zh-.*-ucs-0"
3215 "CJK Characters in BMP with GB representative glyph-images."
3216 '(long-name "CJK in BMP@GB"
3222 registry "-zh-.*-ucs-0"
3230 "CJK Characters in BMP with JIS representative glyphs"
3231 '(long-name "CJK in BMP@JP"
3237 registry "-ja-.*-ucs-0"
3244 '=ucs-bmp-cjk@JP/hanazono
3245 "CJK Characters in BMP with Hanazono font"
3246 '(long-name "CJK in BMP@JP/Hanazono"
3252 registry "-ja-.*-ucs-0"
3253 mother =ucs@JP/hanazono
3259 '==ucs-bmp-cjk@JP/hanazono
3260 "CJK Characters in BMP with Hanazono font"
3261 '(long-name "CJK in BMP@JP/Hanazono"
3267 registry "-ja-.*-ucs-0"
3268 mother ==ucs@JP/hanazono
3274 '=+>ucs-bmp-cjk@unicode
3275 "Unicode representative characters of CJK Unified Ideographs in BMP"
3276 '(long-name "Unicode-BMP-CJK unified abstract glyphs"
3282 registry "-zh-.*-ucs-0"
3283 mother =+>ucs@unicode
3289 '=>ucs-bmp-cjk@unicode
3290 "Unicode representative characters of CJK Unified Ideographs in BMP"
3291 '(long-name "Unicode-BMP-CJK"
3297 registry "-zh-.*-ucs-0"
3298 mother =>ucs@unicode
3304 '==>ucs-bmp-cjk@bucs
3305 "CJK Characters in BMP of BUCS"
3306 '(long-name "BUCS-BMP-CJK"
3312 registry "-zh-.*-ucs-0"
3319 '=ucs-bmp-cjk-compat
3320 "CJK Compatibility Ideographs in BMP of UCS"
3321 '(long-name "CJK Compatibility Ideographs"
3327 registry "-ja-.*-ucs-0"
3333 '=ucs-bmp-cjk-compat@unicode
3334 "CJK Compatibility Ideographs of Unicode representatives"
3335 '(long-name "CJK Compatibility Ideographs of Unicode"
3341 registry "-ja-.*-ucs-0"
3347 '=+>ucs-bmp-cjk-compat@jis
3348 "CJK Compatibility Ideographs of JIS representatives unified glyphs"
3349 '(long-name "JIS unified glyphs for CJK Compat chars"
3355 registry "-ja-.*-ucs-0"
3362 "CJK Ideographs Extension B"
3363 '(long-name "UCS CJK Ext-B"
3369 registry "\\(iso10646\\|ucs02\\)-2$"
3371 min-code #x20000 max-code #x2A6D6
3372 code-offset #x20000))
3375 "CJK Ideographs Extension B (ISO/IEC 10646-2)"
3376 '(long-name "UCS CJK Ext-B"
3382 registry "\\(iso10646\\|ucs02\\)-2$"
3384 min-code #x20000 max-code #x2A6D6
3385 code-offset #x20000))
3387 '==ucs-sip-ext-b@iso
3388 "CJK Ideographs Extension B (ISO/IEC 10646-2)"
3389 '(long-name "UCS CJK Ext-B"
3395 registry "\\(iso10646\\|ucs02\\)-2$"
3397 min-code #x20000 max-code #x2A6D6
3398 code-offset #x20000))
3401 ;;; mule-conf.el ends here