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, 2014 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 "Han'you-Denshi/IP detailed glyph-images."
1654 '(long-name "Han'you-Denshi/IP glyph-images"
1660 registry "HanyoDenshi\\.IP-0$"
1661 mother =hanyo-denshi/ip))
1664 "JT (Juuki Touitsu Moji) detailed glyph-images."
1665 '(long-name "Han'you-Denshi/JT glyph-images"
1671 registry "HanyoDenshi\\.JT-0$"
1672 mother =hanyo-denshi/jt))
1675 "KoSeki-touitsu-moji detailed glyph-images."
1676 '(long-name "Han'you-Denshi/KS glyph-images"
1682 mother =hanyo-denshi/ks))
1685 '=hanyo-denshi/ks/mf
1686 "font encoding for KS (KoSeki) characters"
1687 `(long-name "Han'you-Denshi/KS font encoding"
1693 registry "HanyoDenshi\\.KSMF-0$"
1694 min-code ,(lsh #x6403 16)
1695 max-code ,(+ (lsh #x6403 16) #xFFFF)
1696 code-offset ,(lsh #x6403 16)))
1700 "Representative glyph-images of KoSeki-touitsu-moji."
1701 '(long-name "KoSeki-touitsu-moji"
1707 mother =hanyo-denshi/ks))
1709 (define-charset-alias '=>>>hanyo-denshi/ja '=hanyo-denshi/ja)
1711 ;; '=>>>hanyo-denshi/ja
1712 ;; "Han'you-Denshi/JA abstract glyph-forms"
1713 ;; '(long-name "Han'you-Denshi/JA glyph-forms"
1719 ;; registry "HanyoDenshi\\.JA-0$"
1720 ;; mother =hanyo-denshi/ja))
1721 (define-charset-alias '=>>>hanyo-denshi/jb '=hanyo-denshi/jb)
1723 ;; '=>>>hanyo-denshi/jb
1724 ;; "Han'you-Denshi/JB abstract glyph-forms"
1725 ;; '(long-name "Han'you-Denshi/JB glyph-forms"
1731 ;; registry "HanyoDenshi\\.JB-0$"
1732 ;; mother =hanyo-denshi/jb))
1733 (define-charset-alias '=>>>hanyo-denshi/jc '=hanyo-denshi/jc)
1735 ;; '=>>>hanyo-denshi/jc
1736 ;; "Han'you-Denshi/JC abstract glyph-forms"
1737 ;; '(long-name "Han'you-Denshi/JC glyph-forms"
1743 ;; registry "HanyoDenshi\\.JC-0$"
1744 ;; mother =hanyo-denshi/jc))
1745 (define-charset-alias '=>>>hanyo-denshi/jd '=hanyo-denshi/jd)
1747 ;; '=>>>hanyo-denshi/jd
1748 ;; "Han'you-Denshi/JD abstract glyph-forms"
1749 ;; '(long-name "Han'you-Denshi/JD glyph-forms"
1755 ;; registry "HanyoDenshi\\.JD-0$"
1756 ;; mother =hanyo-denshi/jd))
1757 (define-charset-alias '=>>>hanyo-denshi/ft '=hanyo-denshi/ft)
1759 ;; '=>>>hanyo-denshi/ft
1760 ;; "Han'you-Denshi/FT abstract glyph-forms"
1761 ;; '(long-name "Han'you-Denshi/FT glyph-forms"
1767 ;; registry "HanyoDenshi\\.FT-0$"
1768 ;; mother =hanyo-denshi/ft))
1769 (define-charset-alias '=>>>hanyo-denshi/ib '=hanyo-denshi/ib)
1771 ;; '=>>>hanyo-denshi/ib
1772 ;; "Han'you-Denshi/IB abstract glyph-forms"
1773 ;; '(long-name "Han'you-Denshi/IB glyph-forms"
1779 ;; registry "HanyoDenshi\\.IB-0$"
1780 ;; mother =hanyo-denshi/ib))
1781 (define-charset-alias '=>>>hanyo-denshi/hg '=hanyo-denshi/hg)
1783 ;; '=>>>hanyo-denshi/hg
1784 ;; "Han'you-Denshi/HG abstract glyph-forms"
1785 ;; '(long-name "Han'you-Denshi/HG glyph-forms"
1791 ;; registry "HanyoDenshi\\.HG-0$"
1792 ;; mother =hanyo-denshi/hg))
1793 (define-charset-alias '=>>>hanyo-denshi/jt '=hanyo-denshi/jt)
1795 ;; '=>>>hanyo-denshi/jt
1796 ;; "JT (Juuki Touitsu Moji) abstract glyph-forms"
1797 ;; '(long-name "Han'you-Denshi/JT glyph-forms"
1803 ;; registry "HanyoDenshi\\.JT-0$"
1804 ;; mother =hanyo-denshi/jt))
1805 (define-charset-alias '=>>>hanyo-denshi/ks '=hanyo-denshi/ks)
1807 ;; '=>>>hanyo-denshi/ks
1808 ;; "KoSeki-touitsu-moji abstract glyph-forms"
1809 ;; '(long-name "Han'you-Denshi/KS glyph-forms"
1815 ;; mother =hanyo-denshi/ks))
1819 "Han'you-Denshi/JA abstract glyphs"
1820 '(long-name "Han'you-Denshi/JA glyphs"
1826 registry "HanyoDenshi\\.JA-0$"
1827 mother =>>>hanyo-denshi/ja))
1830 "Han'you-Denshi/JB abstract glyphs"
1831 '(long-name "Han'you-Denshi/JB glyphs"
1837 registry "HanyoDenshi\\.JB-0$"
1838 mother =>>>hanyo-denshi/jb))
1841 "Han'you-Denshi/JC abstract glyphs"
1842 '(long-name "Han'you-Denshi/JC glyphs"
1848 registry "HanyoDenshi\\.JC-0$"
1849 mother =>>>hanyo-denshi/jc))
1852 "Han'you-Denshi/JD abstract glyphs"
1853 '(long-name "Han'you-Denshi/JD glyphs"
1859 registry "HanyoDenshi\\.JD-0$"
1860 mother =>>>hanyo-denshi/jd))
1863 "Han'you-Denshi/FT abstract glyphs"
1864 '(long-name "Han'you-Denshi/FT glyphs"
1870 registry "HanyoDenshi\\.FT-0$"
1871 mother =>>>hanyo-denshi/ft))
1874 "Han'you-Denshi/IA abstract glyphs"
1875 '(long-name "Han'you-Denshi/IA glyphs"
1881 registry "HanyoDenshi\\.IA-0$"
1882 mother =hanyo-denshi/ia))
1885 "Han'you-Denshi/IB abstract glyphs"
1886 '(long-name "Han'you-Denshi/IB abstract glyphs"
1892 registry "HanyoDenshi\\.IB-0$"
1893 mother =>>>hanyo-denshi/ib))
1896 "Han'you-Denshi/HG abstract glyphs"
1897 '(long-name "Han'you-Denshi/HG abstract glyphs"
1903 registry "HanyoDenshi\\.HG-0$"
1904 mother =>>>hanyo-denshi/hg))
1907 "Han'you-Denshi/IP abstract glyphs"
1908 '(long-name "Han'you-Denshi/IP abstract glyphs"
1914 registry "HanyoDenshi\\.IP-0$"
1915 mother =hanyo-denshi/ip))
1918 "JT (Juuki Touitsu Moji) abstract glyphs"
1919 '(long-name "Han'you-Denshi/JT glyphs"
1925 registry "HanyoDenshi\\.JT-0$"
1926 mother =>>>hanyo-denshi/jt))
1929 "Han'you-Denshi/KS abstract glyphs"
1930 '(long-name "Han'you-Denshi/KS glyphs"
1936 mother =>>>hanyo-denshi/ks))
1947 min-code ,(lsh #x6100 16)
1948 max-code ,(+ (lsh #x6100 16) 67547)
1949 code-offset ,(lsh #x6100 16)))
1951 "GT 2000 detailed glyph-images."
1952 '(long-name "GT glyph-images"
1962 (define-charset-alias 'ideograph-gt '=gt)
1963 (define-charset-alias '=>>>gt '=gt)
1964 ;; (make-charset '=>>>gt
1965 ;; "GT 2000 abstract glyph-forms"
1966 ;; '(long-name "GT abstract glyph-forms"
1973 (make-charset '=>>gt
1974 "GT 2000 abstract glyphs"
1975 '(long-name "GT abstract glyphs"
1982 (define-charset-alias '<=>gt '=>>gt)
1983 (define-charset-alias '<==>gt '=>>gt)
1984 (make-charset '=+>gt
1985 "GT 2000 unified abstract glyphs"
1986 '(long-name "Unified abstract GT glyphs"
1994 "GT 2000 abstract characters"
1995 '(long-name "abstract GT characters"
2002 (make-charset '=gt-k
2003 "Ideographic components of GT"
2004 `(long-name "GT components"
2011 min-code ,(lsh #x6110 16)
2012 max-code ,(+ (lsh #x6110 16) 17090)
2013 code-offset ,(lsh #x6110 16)))
2014 (define-charset-alias 'ideograph-gt-k '=gt-k)
2015 (make-charset '==gt-k
2016 "Representative glyph-images of GT-K"
2017 '(long-name "GT-K glyph-images"
2024 (make-charset '=>>gt-k
2025 "abstract glyphs of GT-K"
2026 '(long-name "GT-K abstract glyphs"
2033 (make-charset '=>gt-k
2034 "GT-K abstract characters"
2035 '(long-name "GT-K abstract characters"
2045 (intern (format "=gt-pj-%d" i))
2046 (format "GT 2000 (pseudo JIS encoding) part %d" i)
2047 `(long-name ,(format "GT PJ %d" i)
2053 registry ,(format "\\(GTpj-%d\\|jisx0208\\.GT-%d\\)$" i i)))
2054 (define-charset-alias
2055 (intern (format "ideograph-gt-pj-%d" i))
2056 (intern (format "=gt-pj-%d" i)))
2060 "Ideographic parts of GT (pseudo JIS encoding) part 1"
2067 registry "\\(GTKpj-1\\|jisx0208\\.GTK-1\\)$"))
2068 (define-charset-alias 'ideograph-gt-pj-k1 '=gt-pj-k1)
2071 "Ideographic parts of GT (pseudo JIS encoding) part 2"
2078 registry "\\(GTKpj-2\\|jisx0208\\.GTK-2\\)$"))
2079 (define-charset-alias 'ideograph-gt-pj-k2 '=gt-pj-k2)
2081 (make-charset '=daikanwa
2082 "Daikanwa dictionary (unchanged part)"
2083 `(long-name "Daikanwa"
2089 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2091 max-code ,(+ #xE00000 50100)
2092 code-offset #xE00000))
2093 (define-charset-alias 'ideograph-daikanwa '=daikanwa)
2095 (make-charset '=daikanwa@rev1
2096 "Daikanwa dictionary (revised version)"
2097 '(long-name "Daikanwa Rev."
2103 registry "Daikanwa\\(\\.[0-9]+\\)?-2"
2105 (define-charset-alias 'ideograph-daikanwa-2 '=daikanwa@rev1)
2106 (define-charset-alias '=daikanwa-rev1 '=daikanwa@rev1)
2108 (make-charset '=daikanwa@rev2
2109 "Daikanwa dictionary (revised version 2)"
2110 '(long-name "Daikanwa"
2116 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2120 (define-charset-alias '=daikanwa-rev2 '=daikanwa@rev2)
2122 (make-charset '=daikanwa/+p
2123 "Daikanwa dictionary (ddddd')"
2124 '(long-name "Daikanwa ddddd'"
2130 (make-charset '=daikanwa/+2p
2131 "Daikanwa dictionary (ddddd'')"
2132 '(long-name "Daikanwa ddddd''"
2138 (make-charset '=daikanwa/ho
2139 "Daikanwa dictionary (Hokan)"
2140 '(long-name "Daikanwa-ho"
2147 (make-charset '==daikanwa
2148 "Daikanwa detailed glyph-images."
2149 '(long-name "Daikanwa detailed glyph-images"
2155 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2157 (make-charset '==daikanwa/+p
2158 "Daikanwa detailed glyph-images (ddddd')"
2159 '(long-name "Daikanwa detailed glyphs-images (ddddd')"
2165 mother =daikanwa/+p))
2166 (make-charset '==daikanwa/ho
2167 "Daikanwa detailed glyph-images (Hokan)"
2168 '(long-name "Daikanwa-ho detailed glyph-images"
2174 mother =daikanwa/ho))
2176 (make-charset '=>>daikanwa
2177 "Daikanwa abstract glyphs"
2178 '(long-name "Daikanwa glyphs"
2184 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2186 (make-charset '=>>daikanwa/+p
2187 "Daikanwa abstract glyphs (ddddd')"
2188 '(long-name "Daikanwa glyphs (ddddd')"
2194 mother =daikanwa/+p))
2195 (make-charset '=>>daikanwa/+2p
2196 "Daikanwa abstract glyphs (ddddd'')"
2197 '(long-name "Daikanwa glyphs (ddddd'')"
2203 mother =daikanwa/+2p))
2204 (make-charset '=>>daikanwa/ho
2205 "Daikanwa abstract glyphs (Hokan)"
2206 '(long-name "Daikanwa-ho glyph"
2212 mother =daikanwa/ho))
2214 (make-charset '=>daikanwa
2215 "Daikanwa abstract characters"
2216 '(long-name "abstract Daikanwa"
2222 registry "Daikanwa\\(\\.[0-9]+\\)?-3"
2223 mother =>>daikanwa))
2224 (make-charset '=>daikanwa/ho
2225 "Daikanwa abstract characters (Hokan)"
2226 '(long-name "abstract Daikanwa-ho"
2232 mother =>>daikanwa/ho))
2234 (make-charset '=shinjigen
2235 "Kadokawa ShinJigen dictionary (common parts)"
2236 `(long-name "Shinjigen common parts"
2242 registry "Shinjigen\\(\\.[0-9]+\\)?-*"))
2244 (make-charset '=shinjigen@1ed
2245 "Kadokawa ShinJigen dictionary (the first edition)"
2246 `(long-name "Shinjigen-1"
2253 registry "Shinjigen\\(\\.[0-9]+\\)?-1"))
2254 (define-charset-alias 'shinjigen-1 '=shinjigen@1ed)
2256 (make-charset '=shinjigen@1ed/24pr
2257 "Kadokawa ShinJigen dictionary (the 24th impression)"
2258 `(long-name "Shinjigen-1 24pr"
2264 mother =shinjigen@1ed))
2266 (make-charset '=shinjigen@rev
2267 "Kadokawa ShinJigen dictionary (the revised edition)"
2268 `(long-name "Shinjigen-2"
2275 registry "Shinjigen\\(\\.[0-9]+\\)?-2"))
2276 (define-charset-alias 'shinjigen-2 '=shinjigen@rev)
2277 (make-charset '=shinjigen/+p@rev
2278 "ShinJigen (the second edition) number with '"
2279 `(long-name "Shinjigen-2 with '"
2285 (define-charset-alias 'shinjigen-2-p '=shinjigen/+p@rev)
2287 (make-charset '==shinjigen
2288 "Detailed glyph-images of ShinJigen (common parts)"
2289 '(long-name "Shinjigen common parts"
2296 registry "Shinjigen\\(\\.[0-9]+\\)?-*"))
2297 (make-charset '==shinjigen@1ed
2298 "Detailed glyph-images of ShinJigen (the first edition)"
2299 '(long-name "Detailed glyph-images of Shinjigen-1"
2306 registry "Shinjigen\\(\\.[0-9]+\\)?-1"))
2307 (make-charset '==shinjigen@rev
2308 "Detailed glyph-images of ShinJigen (the revised edition)"
2309 '(long-name "Detailed glyph-images of Shinjigen-2"
2316 registry "Shinjigen\\(\\.[0-9]+\\)?-2"))
2319 "Detailed glyph-images of ShinJigen (the second edition) number with '"
2320 '(long-name "Detailed glyph-images of Shinjigen-2 with '"
2321 mother =shinjigen/+p@rev
2328 (make-charset '=big5-pua
2329 "Big5 with private used area"
2330 '(long-name "Big5-PUA"
2337 registry "Big5\\.ETEN"))
2338 (define-charset-alias 'chinese-big5-pua '=big5-pua)
2341 (hzk-min (+ (lsh #x6200 16) 65536))
2342 (hzk-max (+ hzk-min 65535)))
2345 (intern (format "=hanziku-%d" i))
2346 (format "HANZIKU (pseudo BIG5 encoding) part %d" i)
2347 `(long-name ,(format "HANZIKU-%d" i)
2353 registry ,(format "hanziku-%d$" i i)
2356 code-offset ,hzk-min))
2357 (define-charset-alias
2358 (intern (format "ideograph-hanziku-%d" i))
2359 (intern (format "=hanziku-%d" i)))
2360 (setq hzk-min (1+ hzk-max)
2361 hzk-max (+ hzk-min 65535))
2364 (make-charset '=cbeta "CBETA private characters"
2365 '(long-name "CBETA PUA"
2372 code-offset #xE20000
2375 (define-charset-alias 'ideograph-cbeta '=cbeta)
2377 (make-charset '=>>cbeta "CBETA abstract glyphs"
2378 '(long-name "CBETA glyphs"
2387 (make-charset '=zinbun-oracle
2388 "Oracle Bones Script"
2389 `(long-name "Oracle Bones Script in Zinbun, Kyoto Univ."
2392 registry "zob1968-0"
2395 max-code ,(+ #xE70000 8192)
2396 code-offset #xE70000
2400 (make-charset '=>zinbun-oracle
2401 "Abstract Oracle Bones"
2402 '(long-name "Abstract characters of Zinbun Oracle Bones."
2405 mother =zinbun-oracle
2406 registry "zob1968-0"
2411 (make-charset '=jef-china3
2412 "JEF + CHINA3 private characters"
2413 '(long-name "JEF + CHINA3"
2419 registry "china3jef-0"
2422 code-offset #xE80000))
2423 (define-charset-alias 'china3-jef '=jef-china3)
2425 (make-charset '=ruimoku-v6
2426 "private characters used in RUIMOKU Version.6"
2435 min-code #xE90000 ; #xE000
2436 max-code #xE908FF ; #xE8FF
2437 code-offset ,(- #xE90000 #xE000)))
2438 (make-charset '=>>ruimoku-v6
2439 "RUIMOKU Version.6 glyphs"
2440 '(long-name "RUI6 glyphs"
2447 mother =ruimoku-v6))
2451 ;; "ZhongHua-ZiHai glyph-images"
2452 ;; '(long-name "ZhongHua-ZiHai (pppp-nn)"
2461 ;; "ZhongHua-ZiHai (pp.1700
\e$B!A
\e(B1781) glyph-images"
2462 ;; '(long-name "ZhongHua-ZiHai pp.17xx"
2468 ;; registry "zihai\\.cp-17$"))
2470 (make-charset '=big5-cdp-var-3
2471 "Big5-CDP-var-3 glyph-images of GlyphWiki"
2472 '(long-name "Big5-CDP-var-3"
2478 registry "cdp\\.var-3$"
2481 (make-charset '=big5-cdp-var-5
2482 "Big5-CDP-var-5 glyph-images of GlyphWiki"
2483 '(long-name "Big5-CDP-var-5"
2489 registry "cdp\\.var-5$"
2492 (make-charset '==>ucs@bucs
2493 "Basic Subset of Coded Character Sets (BUCS)"
2494 '(long-name "BUCS abstract characters"
2503 (make-charset '=>ucs@hanyo-denshi
2504 "UCS abstract characters based on Han'you-Denshi collection."
2505 '(long-name "UCS base characters of Han'you-Denshi"
2514 (make-charset '=>ucs@iso
2515 "Abstract characters of ISO/IEC 10646 representatives"
2516 '(long-name "UCS characters for ISO"
2524 (make-charset '=>ucs@unicode
2525 "Abstract characters of Unicode representatives"
2526 '(long-name "UCS characters for Unicode"
2534 (make-charset '=>ucs@jis
2535 "UCS representative characters for JIS X0208/0212/0213"
2536 '(long-name "UCS characters for JIS"
2543 mother =>ucs@unicode))
2544 (make-charset '=>ucs@ks
2545 "UCS representative characters for Korean Standards"
2546 '(long-name "UCS characters for KS"
2553 mother =>ucs@unicode))
2554 (make-charset '=>ucs@cns
2555 "UCS representatives characters for CNS 11643 sources"
2556 '(long-name "UCS characters for CNS 11643"
2563 mother =>ucs@unicode))
2565 (make-charset '=+>ucs@iso
2566 "UCS based on ISO/IEC 10646 representative glyphs"
2567 '(long-name "Unified abstract glyphs of UCS"
2575 (make-charset '=+>ucs@unicode
2576 "Unicode representative unified abstract glyphs"
2577 '(long-name "UCS unified abstract glyphs for Unicode"
2585 (make-charset '=+>ucs@jis
2586 "UCS based on Japanese usual unification"
2587 '(long-name "UCS unified abstract glyphs for JP"
2594 mother =+>ucs@unicode))
2595 (define-charset-alias '=>ucs@JP '=+>ucs@jis)
2596 (make-charset '=+>ucs@jis/1990
2597 "UCS representative characters for JIS X0208/0212:1990"
2598 '(long-name "UCS characters for JIS:1990"
2606 (define-charset-alias '=>ucs@jis/1990 '=+>ucs@jis/1990)
2607 (make-charset '=+>ucs@jis/2004
2608 "UCS representative characters for JIS X 0213:2004"
2609 '(long-name "UCS characters for JIS:2004"
2617 (make-charset '=+>ucs@ks
2618 "UCS representative unified abstract glyphs for Korean Standards"
2619 '(long-name "UCS unified abstract glyphs for KS"
2626 mother =+>ucs@unicode))
2627 (make-charset '=+>ucs@cns
2628 "UCS representatives unified abstract glyphs for CNS 11643 sources"
2629 '(long-name "UCS unified abstract glyphs for CNS"
2636 mother =+>ucs@unicode))
2638 (make-charset '=>>ucs@iso
2639 "Representative abstract-glyphs of ISO/IEC 10646"
2640 '(long-name "UCS abstract glyphs for UCS"
2648 (make-charset '=>>ucs@unicode
2649 "Representative abstract-glyphs of Unicode"
2650 '(long-name "Unicode abstract glyphs"
2658 (make-charset '=>>ucs@jis
2659 "UCS Representative abstract-glyphs for JIS X0208/0212/0213"
2660 '(long-name "UCS abstract glyphs for JIS"
2667 mother =>>ucs@unicode))
2668 (make-charset '=>>ucs@jis/1990
2669 "UCS Representative glyphs for JIS X 0208/0212:1990"
2670 '(long-name "UCS glyphs for JIS:1990"
2678 (make-charset '=>>ucs@jis/2000
2679 "UCS Representative glyphs for JIS X 0213:2000"
2680 '(long-name "UCS glyphs for JIS:2000"
2688 (make-charset '=>>ucs@jis/2004
2689 "UCS Representative glyphs for JIS X 0213:2004"
2690 '(long-name "UCS glyphs for JIS:2004"
2698 (make-charset '=>>ucs@JP
2699 "UCS abstract-glyphs based on Japanese style glyphs"
2700 '(long-name "UCS glyphs for JP"
2707 mother =>>ucs@jis/2004))
2708 (make-charset '=>>ucs@ks
2709 "UCS Representative glyphs for Korean Standards"
2710 '(long-name "UCS glyphs for KS"
2717 mother =>>ucs@unicode))
2718 (make-charset '=>>ucs@cns
2719 "UCS Representative glyphs for CNS 11643 sources"
2720 '(long-name "UCS glyphs for CNS"
2727 mother =>>ucs@unicode))
2729 ;; (make-charset '=>>>ucs@iso
2730 ;; "Representative glyph-forms of ISO/IEC 10646"
2731 ;; '(long-name "UCS glyph-forms for UCS"
2738 ;; mother =>>ucs@iso))
2739 ;; (make-charset '=>>>ucs@unicode
2740 ;; "Representative glyph-forms of Unicode"
2741 ;; '(long-name "UCS glyph-forms for Unicode"
2748 ;; mother =>>>ucs@iso))
2749 ;; (make-charset '=>>>ucs@jis
2750 ;; "UCS Representative glyph-forms for JIS X0208/0212/0213"
2751 ;; '(long-name "UCS glyph-forms for JIS"
2758 ;; mother =>>>ucs@unicode))
2759 ;; (make-charset '=>>>ucs@jis/1990
2760 ;; "UCS Representative glyph-forms for JIS X 0208/0212:1990"
2761 ;; '(long-name "UCS glyph-forms for JIS:1990"
2768 ;; mother =>>>ucs@jis))
2769 ;; (make-charset '=>>>ucs@jis/2000
2770 ;; "UCS Representative glyph-forms for JIS X 0213:2000"
2771 ;; '(long-name "UCS glyph-forms for JIS:2000"
2778 ;; mother =>>>ucs@jis))
2779 ;; (make-charset '=>>>ucs@jis/2004
2780 ;; "UCS Representative glyph-forms for JIS X 0213:2004"
2781 ;; '(long-name "UCS glyph-forms for JIS:2004"
2788 ;; mother =>>>ucs@jis))
2789 ;; (make-charset '=>>>ucs@ks
2790 ;; "UCS Representative glyph-forms for Korean Standards"
2791 ;; '(long-name "UCS glyph-forms for KS"
2798 ;; mother =>>>ucs@unicode))
2799 ;; (make-charset '=>>>ucs@cns
2800 ;; "UCS Representative glyph-forms for CNS 11643 sources"
2801 ;; '(long-name "UCS glyph-forms for CNS"
2808 ;; mother =>>>ucs@unicode))
2810 (make-charset '=ucs@iso
2811 "ISO/IEC 10646 for its representative glyphs"
2812 '(long-name "UCS for ISO"
2820 ;; mother =>>>ucs@iso
2822 (define-charset-alias '=>>>ucs@iso '=ucs@iso)
2823 (make-charset '=ucs@unicode
2824 "Unicode for its representative glyphs"
2825 '(long-name "UCS for Unicode"
2833 (define-charset-alias '=>>>ucs@unicode '=ucs@unicode)
2834 (make-charset '=ucs@gb
2835 "ISO/IEC 10646 for GB"
2836 '(long-name "UCS for GB"
2843 mother =ucs@unicode))
2844 (define-charset-alias 'ucs-gb '=ucs@gb)
2845 (make-charset '=ucs@gb/fw
2846 "ISO/IEC 10646 for GB with fullwidth"
2847 '(long-name "UCS for GB-fullwidth"
2855 (make-charset '=ucs-bmp@gb
2856 "ISO/IEC 10646 BMP for GB"
2857 '(long-name "BMP for GB"
2866 (make-charset '=ucs@cns
2867 "ISO/IEC 10646 for CNS 11643"
2868 '(long-name "UCS for CNS"
2875 mother =ucs@unicode))
2876 (define-charset-alias 'ucs-cns '=ucs@cns)
2877 (define-charset-alias '=>>>ucs@cns '=ucs@cns)
2878 (make-charset '=ucs@cns/fw
2879 "ISO/IEC 10646 for CNS 11643 with fullwidth"
2880 '(long-name "UCS for CNS-fullwidth"
2888 (make-charset '=ucs-bmp@cns
2889 "ISO/IEC 10646 BMP for CNS"
2890 '(long-name "BMP for CNS"
2899 (make-charset '=ucs@jis
2900 "ISO/IEC 10646 for JIS X0208/0212/0213"
2901 '(long-name "UCS for JIS"
2908 mother =ucs@unicode))
2909 (define-charset-alias 'ucs-jis '=ucs@jis)
2910 (define-charset-alias '=>>>ucs@jis '=ucs@jis)
2911 (make-charset '=ucs@jis/fw
2912 "ISO/IEC 10646 for JIS X0208/0212/0213 with fullwidth"
2913 '(long-name "UCS for JIS-fullwidth"
2921 (make-charset '=ucs-bmp@jis
2922 "ISO/IEC 10646 BMP for JIS"
2923 '(long-name "BMP for JIS"
2932 ;; (make-charset '=ucs@jis/1983
2933 ;; "ISO/IEC 10646 for JIS X 0208:1983"
2934 ;; '(long-name "UCS for JIS:1983"
2941 ;; mother =ucs@jis))
2942 (make-charset '=ucs@jis/1990
2943 "ISO/IEC 10646 for JIS X 0208/0212:1990"
2944 '(long-name "UCS for JIS:1990"
2952 (define-charset-alias '=ucs@jis-1990 '=ucs@jis/1990)
2953 (define-charset-alias '=ucs-jis-1990 '=ucs@jis/1990)
2954 (define-charset-alias '=>>>ucs@jis/1990 '=ucs@jis/1990)
2955 (make-charset '=ucs@jis/2000
2956 "ISO/IEC 10646 for JIS X 0213:2000"
2957 '(long-name "UCS for JIS:2000"
2965 (define-charset-alias '=ucs@jis-2000 '=ucs@jis/2000)
2966 (define-charset-alias '=ucs-jis-2000 '=ucs@jis/2000)
2967 (define-charset-alias '=>>>ucs@jis/2000 '=ucs@jis/2000)
2968 (make-charset '=ucs@jis/2004
2969 "ISO/IEC 10646 for JIS X 0213:2004"
2970 '(long-name "UCS for JIS:2004"
2978 (define-charset-alias '=>>>ucs@jis/2004 '=ucs@jis/2004)
2979 (make-charset '=ucs@JP
2980 "UCS for common glyphs used in Japan"
2981 '(long-name "UCS for Japan"
2988 mother =ucs@jis/2004))
2989 (define-charset-alias '=ucs@jp '=ucs@JP)
2990 (make-charset '=ucs@JP/hanazono
2991 "Japanese glyph-images of Hanazono Mincho"
2992 '(long-name "UCS for Hana-Min"
3000 (make-charset '=ucs@ks
3001 "ISO/IEC 10646 for Korean Standards"
3002 '(long-name "UCS for KS"
3009 mother =ucs@unicode))
3010 (define-charset-alias 'ucs-ks '=ucs@ks)
3011 (define-charset-alias '=>>>ucs@ks '=ucs@ks)
3012 (make-charset '=ucs@ks/2012
3013 "Mapping for Korean Standards in ISO/IEC 10646:2012"
3014 '(long-name "UCS:2012 for KS"
3022 (make-charset '=ucs-bmp@ks
3023 "ISO/IEC 10646 BMP for KS"
3024 '(long-name "BMP for KS"
3033 (make-charset '=ucs@cns11643
3034 "ISO/IEC 10646 for CNS based on www.cns11643.gov.tw"
3035 '(long-name "UCS for CNS11643"
3043 (make-charset '=ucs@big5
3044 "ISO/IEC 10646 for Big5"
3045 '(long-name "UCS for Big5"
3053 (define-charset-alias 'ucs-big5 '=ucs@big5)
3054 (make-charset '=ucs@big5/cns11643
3055 "ISO/IEC 10646 for Big5 based on www.cns11643.gov.tw"
3056 '(long-name "UCS for Big5@CNS11643"
3065 (make-charset '==ucs@iso
3066 "ISO/IEC 10646 for its representative glyph-images."
3067 '(long-name "ISO rep-image for UCS"
3075 (make-charset '==ucs@unicode
3076 "Unicode for its representative glyph-images."
3077 '(long-name "UCS for Unicode"
3085 (make-charset '==ucs@gb
3086 "ISO/IEC 10646 for GB"
3087 '(long-name "UCS for GB"
3094 mother ==ucs@unicode))
3095 (make-charset '==ucs-bmp@gb
3096 "ISO/IEC 10646 BMP for GB"
3097 '(long-name "BMP for GB"
3106 (make-charset '==ucs@cns
3107 "ISO/IEC 10646 for CNS 11643"
3108 '(long-name "UCS for CNS"
3115 mother ==ucs@unicode))
3116 (make-charset '==ucs-bmp@cns
3117 "ISO/IEC 10646 BMP for CNS"
3118 '(long-name "BMP for CNS"
3127 (make-charset '==ucs@jis
3128 "ISO/IEC 10646 for JIS X0208/0212/0213"
3129 '(long-name "UCS for JIS"
3136 mother ==ucs@unicode))
3137 (make-charset '==ucs@jis/1990
3138 "ISO/IEC 10646 for JIS X 0208/0212:1990"
3139 '(long-name "UCS for JIS:1990"
3147 (make-charset '==ucs@jis/2000
3148 "ISO/IEC 10646 for JIS X 0213:2000"
3149 '(long-name "UCS for JIS:2000"
3157 (make-charset '==ucs@jis/2004
3158 "ISO/IEC 10646 for JIS X 0213:2004"
3159 '(long-name "UCS for JIS:2004"
3167 (make-charset '==ucs@JP
3168 "UCS for common glyph-images used in Japan."
3169 '(long-name "UCS for Japan"
3176 mother ==ucs@jis/2004))
3177 (make-charset '==ucs@JP/hanazono
3178 "Japanese glyph-images of Hanazono Mincho."
3179 '(long-name "UCS for Hana-Min"
3187 (make-charset '==ucs@ks
3188 "ISO/IEC 10646 for Korean Standards."
3189 '(long-name "UCS for KS"
3196 mother ==ucs@unicode))
3197 (make-charset '==ucs-bmp@ks
3198 "ISO/IEC 10646 BMP for KS."
3199 '(long-name "BMP for KS"
3208 (make-charset '==ucs@cns11643
3209 "ISO/IEC 10646 for CNS based on www.cns11643.gov.tw."
3210 '(long-name "UCS for CNS11643"
3219 (make-charset '=ucs-itaiji-084
3220 "uXXXX-itaiji-084 glyph-images of GlyphWiki"
3221 '(long-name "UCS-itaiji-084"
3229 (make-charset '=ucs-bmp-itaiji-084
3230 "uXXXX-itaiji-084 glyph-images in BMP"
3231 '(long-name "UCS-BMP-itaiji-084"
3238 mother =ucs-itaiji-084
3241 registry "ucs\\.itaiji084-0"))
3245 "CJK Radicals of UCS"
3246 '(long-name "UCS-Radicals"
3252 registry "-zhRadicals-.*-ucs-0"
3254 min-code #x2E00 max-code #x2FFF))
3256 '=ucs-radicals@unicode
3257 "CJK Radicals of UCS"
3258 '(long-name "UCS-Radicals"
3264 registry "-zhRadicals-.*-ucs-0"
3266 min-code #x2E00 max-code #x2FFF))
3269 "Hangul Syllables of UCS"
3270 '(long-name "UCS-Hangul-Syllables"
3276 registry "-Hangul-.*-ucs-0"
3278 min-code #xAC00 max-code #xD7AF))
3281 "CJK Characters in BMP of UCS"
3282 '(long-name "UCS-BMP-CJK"
3288 registry "-zh-.*-ucs-0"
3296 "CJK Characters in BMP with GB representative glyph-images."
3297 '(long-name "CJK in BMP@GB"
3303 registry "-zh-.*-ucs-0"
3311 "CJK Characters in BMP with GB representative glyph-images."
3312 '(long-name "CJK in BMP@GB"
3318 registry "-zh-.*-ucs-0"
3326 "CJK Characters in BMP with JIS representative glyphs"
3327 '(long-name "CJK in BMP@JP"
3333 registry "-ja-.*-ucs-0"
3340 '=ucs-bmp-cjk@JP/hanazono
3341 "CJK Characters in BMP with Hanazono font"
3342 '(long-name "CJK in BMP@JP/Hanazono"
3348 registry "-ja-.*-ucs-0"
3349 mother =ucs@JP/hanazono
3355 '==ucs-bmp-cjk@JP/hanazono
3356 "CJK Characters in BMP with Hanazono font"
3357 '(long-name "CJK in BMP@JP/Hanazono"
3363 registry "-ja-.*-ucs-0"
3364 mother ==ucs@JP/hanazono
3370 '=+>ucs-bmp-cjk@unicode
3371 "Unicode representative characters of CJK Unified Ideographs in BMP"
3372 '(long-name "Unicode-BMP-CJK unified abstract glyphs"
3378 registry "-zh-.*-ucs-0"
3379 mother =+>ucs@unicode
3385 '=>ucs-bmp-cjk@unicode
3386 "Unicode representative characters of CJK Unified Ideographs in BMP"
3387 '(long-name "Unicode-BMP-CJK"
3393 registry "-zh-.*-ucs-0"
3394 mother =>ucs@unicode
3400 '==>ucs-bmp-cjk@bucs
3401 "CJK Characters in BMP of BUCS"
3402 '(long-name "BUCS-BMP-CJK"
3408 registry "-zh-.*-ucs-0"
3415 '=ucs-bmp-cjk-compat
3416 "CJK Compatibility Ideographs in BMP of UCS"
3417 '(long-name "CJK Compatibility Ideographs"
3423 registry "-ja-.*-ucs-0"
3429 '=ucs-bmp-cjk-compat@unicode
3430 "CJK Compatibility Ideographs of Unicode representatives"
3431 '(long-name "CJK Compatibility Ideographs of Unicode"
3437 registry "-ja-.*-ucs-0"
3443 '=+>ucs-bmp-cjk-compat@jis
3444 "CJK Compatibility Ideographs of JIS representatives unified glyphs"
3445 '(long-name "JIS unified glyphs for CJK Compat chars"
3451 registry "-ja-.*-ucs-0"
3458 "CJK Ideographs Extension B"
3459 '(long-name "UCS CJK Ext-B"
3465 registry "\\(iso10646\\|ucs02\\)-2$"
3467 min-code #x20000 max-code #x2A6D6
3468 code-offset #x20000))
3471 "CJK Ideographs Extension B (ISO/IEC 10646-2)"
3472 '(long-name "UCS CJK Ext-B"
3478 registry "\\(iso10646\\|ucs02\\)-2$"
3480 min-code #x20000 max-code #x2A6D6
3481 code-offset #x20000))
3483 '==ucs-sip-ext-b@iso
3484 "CJK Ideographs Extension B (ISO/IEC 10646-2)"
3485 '(long-name "UCS CJK Ext-B"
3491 registry "\\(iso10646\\|ucs02\\)-2$"
3493 min-code #x20000 max-code #x2A6D6
3494 code-offset #x20000))
3497 ;;; mule-conf.el ends here