MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 18.117.158.174
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/international/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/international/fontset.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:12:51 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/international/fontset.el
;;; in Emacs version 24.3
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\304\305\306\"\307\310\311\304\207" [font-encoding-alist font-encoding-charset-alist script-representative-chars otf-script-alist mapcar #[(arg) "\301@!AB\207" [arg purecopy] 2] (("iso8859-1$" . iso-8859-1) ("iso8859-2$" . iso-8859-2) ("iso8859-3$" . iso-8859-3) ("iso8859-4$" . iso-8859-4) ("iso8859-5$" . iso-8859-5) ("iso8859-6$" . iso-8859-6) ("iso8859-7$" . iso-8859-7) ("iso8859-8$" . iso-8859-8) ("iso8859-9$" . iso-8859-9) ("iso8859-10$" . iso-8859-10) ("iso8859-11$" . iso-8859-11) ("iso8859-13$" . iso-8859-13) ("iso8859-14$" . iso-8859-14) ("iso8859-15$" . iso-8859-15) ("iso8859-16$" . iso-8859-16) ("ascii-0$" . ascii) ("gb2312.1980" . chinese-gb2312) ("gbk" . chinese-gbk) ("gb18030" unicode) ("jisx0208.1978" . japanese-jisx0208-1978) ("jisx0208" . japanese-jisx0208) ("jisx0201" . jisx0201) ("jisx0212" . japanese-jisx0212) ("ksx1001" . korean-ksc5601) ("ksc5601.1987" . korean-ksc5601) ("cns11643.1992.*1" . chinese-cns11643-1) ("cns11643.1992.*2" . chinese-cns11643-2) ("cns11643.1992.*3" . chinese-cns11643-3) ("cns11643.1992.*4" . chinese-cns11643-4) ("cns11643.1992.*5" . chinese-cns11643-5) ("cns11643.1992.*6" . chinese-cns11643-6) ("cns11643.1992.*7" . chinese-cns11643-7) ("cns11643.92p1-0" . chinese-cns11643-1) ("cns11643.92p2-0" . chinese-cns11643-2) ("cns11643.92p3-0" . chinese-cns11643-3) ("cns11643.92p4-0" . chinese-cns11643-4) ("cns11643.92p5-0" . chinese-cns11643-5) ("cns11643.92p6-0" . chinese-cns11643-6) ("cns11643.92p7-0" . chinese-cns11643-7) ("big5" . big5) ("viscii" . viscii) ("tis620" . tis620-2533) ("microsoft-cp1251" . windows-1251) ("koi8-r" . koi8-r) ("jisx0213.2000-1" . japanese-jisx0213-1) ("jisx0213.2000-2" . japanese-jisx0213-2) ("jisx0213.2004-1" . japanese-jisx0213\.2004-1) ("iso10646-1$" unicode-bmp) ("iso10646.indian-1" unicode-bmp) ("unicode-bmp" unicode-bmp) ("abobe-symbol" . symbol) ("sisheng_cwnn" . chinese-sisheng) ("mulearabic-0" . arabic-digit) ("mulearabic-1" . arabic-1-column) ("mulearabic-2" . arabic-2-column) ("muleipa" . ipa) ("ethiopic-unicode" unicode-bmp . ethiopic) ("is13194-devanagari" . indian-is13194) ("Devanagari-CDAC" . devanagari-cdac) ("Sanskrit-CDAC" . sanskrit-cdac) ("Bengali-CDAC" . bengali-cdac) ("Assamese-CDAC" . assamese-cdac) ("Punjabi-CDAC" . punjabi-cdac) ("Gujarati-CDAC" . gujarati-cdac) ("Oriya-CDAC" . oriya-cdac) ("Tamil-CDAC" . tamil-cdac) ("Telugu-CDAC" . telugu-cdac) ("Kannada-CDAC" . kannada-cdac) ("Malayalam-CDAC" . malayalam-cdac) ("Devanagari-Akruti" . devanagari-akruti) ("Bengali-Akruti" . bengali-akruti) ("Punjabi-Akruti" . punjabi-akruti) ("Gujarati-Akruti" . gujarati-akruti) ("Oriya-Akruti" . oriya-akruti) ("Tamil-Akruti" . tamil-akruti) ("Telugu-Akruti" . telugu-akruti) ("Kannada-Akruti" . kannada-akruti) ("Malayalam-Akruti" . malayalam-akruti) ("muleindian-2" . indian-2-column) ("muleindian-1" . indian-1-column) ("mulelao-1" . mule-lao) ("muletibetan-2" . tibetan) ("muletibetan-0" . tibetan) ("muletibetan-1" . tibetan-1-column)) ((latin-iso8859-1 . iso-8859-1) (latin-iso8859-2 . iso-8859-2) (latin-iso8859-3 . iso-8859-3) (latin-iso8859-4 . iso-8859-4) (latin-iso8859-9 . iso-8859-9) (latin-iso8859-10 . iso-8859-10) (latin-iso8859-13 . iso-8859-13) (latin-iso8859-14 . iso-8859-14) (latin-iso8859-15 . iso-8859-15) (latin-iso8859-16 . iso-8859-16) (cyrillic-iso8859-5 . iso-8859-5) (greek-iso8859-7 . iso-8859-7) (arabic-iso8859-6 . iso-8859-6) (thai-tis620 . tis620-2533) (latin-jisx0201 . jisx0201) (katakana-jisx0201 . jisx0201) (chinese-big5-1 . big5) (chinese-big5-2 . big5) (vietnamese-viscii-lower . viscii) (vietnamese-viscii-upper . viscii) (tibetan . unicode-bmp)) ((latin 65 90 97 122 192 256 384 7680) (phonetic 592 643) (greek 937) (coptic 994) (cyrillic 1071) (armenian 1329) (hebrew 1488) (arabic 1576) (syriac 1808) (thaana 1932) (devanagari 2325) (bengali 2453) (gurmukhi 2581) (gujarati 2709) (oriya 2837) (tamil 2965) (telugu 3093) (kannada 3221) (malayalam 3349) (sinhala 3477) (thai 3607) (lao 3749) (tibetan 3904) (burmese 4096) (georgian 4307) (ethiopic 4616) (cherokee 5046) (canadian-aboriginal 5312) (ogham 5775) (runic 5792) (khmer 6016) (mongolian 6182) (symbol . [8220 8704 9472]) (braille 10240) (ideographic-description 12272) (cjk-misc 12302) (kana 12363) (bopomofo 12549) (kanbun 12701) (han 23383) (yi 41608) (cham 43520) (tai-viet 43648) (hangul 44032) (linear-b 65536) (aegean-number 65792) (ancient-greek-number 65856) (ancient-symbol 65936) (phaistos-disc 66000) (lycian 66176) (carian 66208) (olt-italic 66304) (ugaritic 66432) (old-persian 66464) (deseret 66560) (shavian 66640) (osmanya 66688) (cypriot-syllabary 67584) (phoenician 67840) (lydian 67872) (kharoshthi 68096) (cuneiform 73728) (cuneiform-numbers-and-punctuation 74752) (byzantine-musical-symbol 118784) (musical-symbol 119040) (ancient-greek-musical-notation 119296) (tai-xuan-jing-symbol 119552) (counting-rod-numeral 119648) (mahjong-tile 126976) (domino-tile 127024)) ((arab . arabic) (armn . armenian) (bali . balinese) (beng . bengali) (bopo . bopomofo) (brai . braille) (bugi . buginese) (buhd . buhid) (byzm . byzantine-musical-symbol) (cans . canadian-aboriginal) (cher . cherokee) (copt . coptic) (xsux . cuneiform) (cyrl . cyrillic) (cprt . cypriot) (dsrt . deseret) (deva . devanagari) (ethi . ethiopic) (geor . georgian) (glag . glagolitic) (goth . gothic) (grek . greek) (gujr . gujarati) (guru . gurmukhi) (hani . han) (hang . hangul) (hano . hanunoo) (hebr . hebrew) (kana . kana) (knda . kannada) (khar . kharoshthi) (khmr . khmer) (lao\  . lao) (latn . latin) (limb . limbu) (linb . linear_b) (mlym . malayalam) (math . mathematical) (mong . mongolian) (musc . musical-symbol) (mymr . burmese) (nko\  . nko) (ogam . ogham) (ital . old_italic) (xpeo . old_persian) (orya . oriya) (osma . osmanya) (phag . phags-pa) (phnx . phoenician) (runr . runic) (shaw . shavian) (sinh . sinhala) (sylo . syloti_nagri) (syrc . syriac) (tglg . tagalog) (tagb . tagbanwa) (taml . tamil) (tale . tai_le) (telu . telugu) (thaa . thaana) (thai . thai) (tibt . tibetan) (tfng . tifinagh) (ugar . ugaritic) (yi\ \  . yi))] 3)
#@28 Setup the default fontset.
(defalias 'setup-default-fontset #[nil "\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\310$\257
\330\324\325\326\331\332$\324\325\326\327\330$\333BBB\334\324\325\326\331\335$\336BB\337\324\325\326\331\340$D\341\324\325\326\331\342$D\343\324\325\326\331\344$D\345\324\325\326\331\346$D\347\324\325\326\331\350$D\351\324\325\326\331\352$D\353\324\325\326\331\354$D\355\324\325\326\331\356$D\357\324\325\326\331\360$D\361\324\325\326\331\362$\324\325\326\327\361$E\363\324\325\326\331\364$\324\325\326\327\363$\365BBB\366\367\324\325\326\327\367$\370BB\371\324\325\326\327\371$\372BB\373\324\325\326\331\374$\375BB\376\324\325\326\327\376$\377BB\201H\324\325\326\331\201I$D\201J\201K\201L\201M\201N\201O\201P\324\325\326\327\201J$\257\201Q\324\325\326\327\201Q$\201RBB\201S\201T\201U\201V\201W\201X\201Y\201Z\201[\201\\\201]\201^\201_\201`\201a\201b\201c\201d\324\325\326\201e\201f$\324\325\326\201e\201g$\257\201h\201i\201j\201k\201l\201m\201n\201o\201p\201q\201r\201s\201t\201u\201v\201w\201x\324\325\326\201e\201f$\324\325\326\201e\201g$\257\201y\201z\324\325\326\201e\201{$E\201|BBBBBBBBBBBBBBBBBBBBBBBBB\"\210\201}\201~\211\203\351	@\201\307\324\325\326\327$\201~\201\200%\210	A\211\204\314*\201\201\201~\211\203^	@\201\202\n8\236\211\2032\201\203\fA!\203 \f\201\204\fA\201\205\n@!\"\241\210\202@\f\201\205\f\211A@)\n@\"\241\210\202@\201\202\n8\n@D\fC\244\210)\201\307\n@\nA@B\324\325\326\327\201\202\n8$#\210	A\211\204\366*\201\206\211@@A@A\201~B\211\203		@\211B@BACDC\250\203\324AG\201\207EFEFW\203\320\201\210C\201\211\201\212E\"\"\201\207V\203\307\201\307D\201~AEHB\201~\201\200%\210ET\211E\202\224*\202C\201~G\211\203	@G\201\307D\201\213\324G\"\201~\201\200%\210	A\211\204\340**	A\211\204u,\201\307\201~\201\214\201~\201\215%\210\201\307\201~\201\216\201~\201\215%\210\201\307\201~\201\217\201~\201\215%\210\201\307\201\220\201\221#\210\201\307\201\222\201\223#\210\201\307\201\224\201~\211\201\200%\207" [script --dolist-tail-- math-subgroup script-representative-chars slot x new-fontset "fontset-default" latin (nil . "ISO8859-1") (nil . "ISO8859-2") (nil . "ISO8859-3") (nil . "ISO8859-4") (nil . "ISO8859-9") (nil . "ISO8859-10") (nil . "ISO8859-13") (nil . "ISO8859-14") (nil . "ISO8859-15") (nil . "ISO8859-16") (nil . "VISCII1.1-1") font-spec :registry "iso10646-1" :script thai :otf (thai nil nil (mark)) ((nil . "TIS620*") (nil . "ISO8859-11")) devanagari (deva nil (rphf)) ((nil . "iso10646.indian-1")) bengali (beng nil (rphf)) gurmukhi (guru nil (blwf)) gujarati (gujr nil (rphf)) oriya (orya nil (rphf)) tamil (taml nil (akhn)) telugu (telu nil (blwf)) kannada (knda nil (rphf)) sinhala (sinh nil (akhn)) malayalam (mlym nil (akhn)) burmese (mymr nil nil) lao (lao\  nil nil (mark)) ((nil . "MuleLao-1")) (tai-viet ("TaiViet" . "iso10646-1")) greek ((nil . "ISO8859-7")) cyrillic ((nil . "ISO8859-5") (nil . "microsoft-cp1251") (nil . "koi8-r")) arabic (arab nil (init medi fina liga)) ((nil . "MuleArabic-0") (nil . "MuleArabic-1") (nil . "MuleArabic-2") (nil . "ISO8859-6")) hebrew ((nil . "ISO8859-8")) data registries target-spec spec target i --dotimes-limit-- args khmer (khmr nil (pres)) kana (nil . "JISX0208*") (nil . "GB2312.1980-0") (nil . "KSC5601.1987*") (nil . "JISX0201*") (nil . "JISX0213.2000-1") (nil . "JISX0213.2004-1") bopomofo ((nil . "sisheng_cwnn-0")) han (nil . "GB2312.1980-0") (nil . "JISX0208*") (nil . "JISX0212*") (nil . "big5*") (nil . "KSC5601.1987*") (nil . "CNS11643.1992-1") (nil . "CNS11643.1992-2") (nil . "CNS11643.1992-3") (nil . "CNS11643.1992-4") (nil . "CNS11643.1992-5") (nil . "CNS11643.1992-6") (nil . "CNS11643.1992-7") (nil . "gbk-0") (nil . "gb18030") (nil . "JISX0213.2000-1") (nil . "JISX0213.2000-2") (nil . "JISX0213.2004-1") :lang ja zh cjk-misc (nil . "GB2312.1980-0") (nil . "JISX0208*") (nil . "JISX0212*") (nil . "big5*") (nil . "KSC5601.1987*") (nil . "CNS11643.1992-1") (nil . "CNS11643.1992-2") (nil . "CNS11643.1992-3") (nil . "CNS11643.1992-4") (nil . "CNS11643.1992-5") (nil . "CNS11643.1992-6") (nil . "CNS11643.1992-7") (nil . "gbk-0") (nil . "gb18030") (nil . "JISX0213.2000-1") (nil . "JISX0213.2000-2") hangul (nil . "KSC5601.1987-0") ko ((ascii (nil . "ISO8859-1")) (arabic-digit ("*" . "MuleArabic-0")) (arabic-1-column ("*" . "MuleArabic-1")) (arabic-2-column ("*" . "MuleArabic-2")) (indian-is13194 (nil . "is13194-devanagari")) (indian-1-column ("*" . "muleindian-2")) (devanagari-cdac (nil . "Devanagari-CDAC")) (sanskrit-cdac (nil . "Sanskrit-CDAC")) (bengali-cdac (nil . "Bengali-CDAC")) (assamese-cdac (nil . "Assamese-CDAC")) (punjabi-cdac (nil . "Punjabi-CDAC")) (gujarati-cdac (nil . "Gujarati-CDAC")) (oriya-cdac (nil . "Oriya-CDAC")) (tamil-cdac (nil . "Tamil-CDAC")) (telugu-cdac (nil . "Telugu-CDAC")) (kannada-cdac (nil . "Kannada-CDAC")) (malayalam-cdac (nil . "Malayalam-CDAC")) (devanagari-akruti (nil . "Devanagari-Akruti")) (bengali-akruti (nil . "Bengali-Akruti")) (punjabi-akruti (nil . "Punjabi-Akruti")) (gujarati-akruti (nil . "Gujarati-Akruti")) (oriya-akruti (nil . "Oriya-Akruti")) (tamil-akruti (nil . "Tamil-Akruti")) (telugu-akruti (nil . "Telugu-Akruti")) (kannada-akruti (nil . "Kannada-Akruti")) (malayalam-akruti (nil . "Malayalam-Akruti")) (nil (nil . "gb2312.1980") (nil . "gbk-0") (nil . "gb18030") (nil . "jisx0208") (nil . "ksc5601.1987") (nil . "CNS11643.1992-1") (nil . "CNS11643.1992-2") (nil . "CNS11643.1992-3") (nil . "CNS11643.1992-4") (nil . "CNS11643.1992-5") (nil . "CNS11643.1992-6") (nil . "CNS11643.1992-7") (nil . "big5") (nil . "jisx0213.2000-1") (nil . "jisx0213.2004-1") (nil . "jisx0212"))) (phonetic armenian syriac thaana georgian cherokee canadian-aboriginal ogham runic symbol braille yi aegean-number ancient-greek-number ancient-symbol phaistos-disc lycian carian olt-italic ugaritic old-persian deseret shavian osmanya cypriot-syllabary phoenician lydian kharoshthi cuneiform cuneiform-numbers-and-punctuation byzantine-musical-symbol musical-symbol ancient-greek-musical-notation tai-xuan-jing-symbol counting-rod-numeral mahjong-tile domino-tile) nil set-fontset-font append ((119808 119859 mathematical-bold) (119860 119911 mathematical-italic) (119912 119963 mathematical-bold-italic) (119964 120015 mathematical-script) (120016 120067 mathematical-bold-script) (120068 120119 mathematical-fraktur) (120120 120171 mathematical-double-struck) (120172 120223 mathematical-bold-fraktur) (120224 120275 mathematical-sans-serif) (120276 120327 mathematical-sans-serif-bold) (120328 120379 mathematical-sans-serif-italic) (120380 120431 mathematical-sans-serif-bold-italic) (120432 120483 mathematical-monospace) (120484 120485 mathematical-italic) (120488 120545 mathematical-bold) (120546 120603 mathematical-italic) (120604 120661 mathematical-bold-italic) (120662 120719 mathematical-sans-serif-bold) (120720 120777 mathematical-sans-serif-bold-italic) (120778 120791 mathematical-bold) (120792 120801 mathematical-double-struck) (120802 120811 mathematical-sans-serif) (120812 120821 mathematical-sans-serif-bold) (120822 120831 mathematical-monospace)) 2 vectorp vconcat vector (["JISX0208.1983-0" "GB2312.1980-0" "BIG5-0" "CNS11643.1992-1" "KSC5601.1987-0"] (161 . 16) ((162 . 163) . 1) (164 . 18) (167 . 31) (168 . 19) (170 . 16) (172 . 1) ((173 . 174) . 16) (175 . 4) ((176 . 177) . 31) ((178 . 179) . 16) (180 . 17) (182 . 17) (183 . 28) ((184 . 186) . 16) ((188 . 191) . 16) (198 . 16) (208 . 16) (215 . 31) (216 . 16) ((222 . 223) . 16) ((224 . 225) . 2) (230 . 16) ((232 . 234) . 2) ((236 . 237) . 2) (240 . 16) ((242 . 243) . 2) (247 . 31) (248 . 16) ((249 . 250) . 2) (252 . 2) (254 . 16) (257 . 2) (273 . 16) (275 . 2) (283 . 2) ((294 . 295) . 16) (299 . 2) ((305 . 307) . 16) (312 . 16) ((319 . 322) . 16) ((329 . 331) . 16) (333 . 2) ((338 . 339) . 16) ((358 . 359) . 16) (363 . 2) (462 . 2) (464 . 2) (466 . 2) (468 . 2) (470 . 2) (472 . 2) (474 . 2) (476 . 2) (711 . 30) (713 . 14) ((714 . 715) . 12) (717 . 4) (720 . 16) (728 . 16) (729 . 28) ((730 . 731) . 16) (733 . 16) ((913 . 929) . 31) ((931 . 937) . 31) ((945 . 961) . 31) ((963 . 969) . 31) (1025 . 19) ((1040 . 1103) . 19) (1105 . 19) (8208 . 1) (8211 . 12) (8212 . 13) (8213 . 18) (8214 . 11) ((8216 . 8217) . 31) ((8220 . 8221) . 31) ((8224 . 8225) . 17) (8229 . 29) (8230 . 31) (8231 . 4) (8240 . 19) (8242 . 31) (8243 . 19) (8245 . 12) (8251 . 31) (8254 . 8) (8308 . 16) (8319 . 16) ((8321 . 8324) . 16) (8364 . 20) (8451 . 31) (8453 . 12) (8457 . 28) (8467 . 16) (8470 . 18) ((8481 . 8482) . 16) (8486 . 16) (8491 . 17) ((8531 . 8532) . 16) ((8539 . 8542) . 16) ((8544 . 8553) . 30) ((8554 . 8555) . 2) ((8560 . 8569) . 24) ((8592 . 8595) . 31) ((8596 . 8597) . 16) ((8598 . 8601) . 28) (8658 . 17) (8660 . 17) (8704 . 17) ((8706 . 8707) . 17) (8711 . 17) (8712 . 19) (8715 . 17) (8719 . 18) (8721 . 18) (8722 . 1) (8725 . 12) (8730 . 31) (8733 . 19) (8734 . 31) (8735 . 12) (8736 . 31) (8739 . 4) (8741 . 22) ((8743 . 8744) . 19) ((8745 . 8747) . 31) (8748 . 17) (8750 . 30) ((8756 . 8757) . 31) ((8758 . 8759) . 2) (8764 . 24) (8765 . 19) (8776 . 2) (8780 . 2) (8786 . 29) ((8800 . 8801) . 31) ((8804 . 8805) . 18) ((8806 . 8807) . 13) ((8810 . 8811) . 17) ((8814 . 8815) . 2) ((8834 . 8835) . 17) ((8838 . 8839) . 17) (8853 . 4) (8857 . 22) (8869 . 31) (8895 . 12) (8978 . 19) ((9216 . 9247) . 8) (9249 . 8) ((9312 . 9321) . 26) ((9322 . 9326) . 16) ((9332 . 9341) . 26) ((9342 . 9346) . 18) ((9347 . 9371) . 2) ((9372 . 9397) . 16) ((9424 . 9449) . 16) (9472 . 31) (9473 . 19) (9474 . 31) (9475 . 19) ((9476 . 9483) . 2) (9484 . 31) ((9485 . 9486) . 18) (9487 . 19) (9488 . 31) ((9489 . 9490) . 18) (9491 . 19) (9492 . 31) ((9493 . 9494) . 18) (9495 . 19) (9496 . 31) ((9497 . 9498) . 18) (9499 . 19) (9500 . 31) (9501 . 19) ((9502 . 9503) . 18) (9504 . 19) ((9505 . 9506) . 18) (9507 . 19) (9508 . 31) (9509 . 19) ((9510 . 9511) . 18) (9512 . 19) ((9513 . 9514) . 18) (9515 . 19) (9516 . 31) ((9517 . 9518) . 18) ((9519 . 9520) . 19) ((9521 . 9522) . 18) (9523 . 19) (9524 . 31) ((9525 . 9526) . 18) ((9527 . 9528) . 19) ((9529 . 9530) . 18) (9531 . 19) (9532 . 31) ((9533 . 9534) . 18) (9535 . 19) ((9536 . 9537) . 18) (9538 . 19) ((9539 . 9546) . 18) (9547 . 19) (9552 . 12) (9566 . 12) (9569 . 12) (9578 . 12) ((9581 . 9587) . 12) (9588 . 4) ((9601 . 9615) . 12) (9618 . 16) ((9620 . 9621) . 12) ((9632 . 9633) . 31) ((9635 . 9641) . 16) ((9650 . 9651) . 31) ((9654 . 9655) . 16) ((9660 . 9661) . 29) ((9664 . 9665) . 16) ((9670 . 9671) . 31) (9672 . 16) (9675 . 31) ((9678 . 9679) . 31) ((9680 . 9681) . 16) ((9698 . 9701) . 12) (9711 . 1) ((9733 . 9734) . 31) (9737 . 8) ((9742 . 9743) . 16) (9756 . 16) (9758 . 16) (9792 . 31) (9793 . 8) (9794 . 31) ((9824 . 9825) . 16) ((9827 . 9829) . 16) ((9831 . 9833) . 16) (9834 . 17) (9836 . 16) (9837 . 17) (9839 . 1) ((12549 . 12585) . 14) ((65104 . 65106) . 12) ((65108 . 65111) . 12) ((65113 . 65126) . 12) ((65128 . 65131) . 12) ((1638400 . 1638869) . #1=((:registry "iso10646-1" :otf (tibt nil (ccmp blws abvs))) (:family "mtib" :registry "iso10646-1") (:registry "muletibetan-2"))) ((3840 . 4095) . #1#) ((43776 . 43823) . #2=((:registry "iso10646-1" :script ethiopic) (:registry "ethiopic-unicode"))) ((11648 . 11743) . #2#) ((4608 . 5023) . #2#) ((7424 . 7615) . #3=((:registry "iso10646-1" :script phonetic) (:registry "MuleIPA-1") (:registry "iso10646-1"))) ((592 . 687) . #3#)) 0 logand lsh 1 apply (nil . "iso10646-1") prepend ("gnu-unifont" . "iso10646-1") ("mutt-clearlyu" . "iso10646-1") (131072 . 196607) (nil . "unicode-sip") (57344 . 63743) (nil . "iso10646-1") (57344 . 63743)] 49 (#$ . 6641)])
#@83 Create the default fontset.
Internal use only.  Should be called at startup time.
(defalias 'create-default-fontset #[nil "\300\301\302\217\207" [err (setup-default-fontset) ((error (byte-code "\301\302\303\304\"\305#\207" [err display-warning initialization format "Creation of the default fontsets failed: %s" :error] 5)))] 3 (#$ . 18400)])
#@53 Set arguments in `font-encoding-alist' (which see).
(defalias 'set-font-encoding #[(pattern charset) "\304	\"\211\203\n\241\202B	B\211)\207" [pattern font-encoding-alist slot charset assoc] 4 (#$ . 18750)])
(byte-code "\303\304!\303\305!\303\306!\307BC\303\207" [x-pixel-size-width-font-regexp vertical-centering-font-regexp face-font-rescale-alist purecopy "gb2312\\|gbk\\|gb18030\\|jisx0208\\|ksc5601\\|cns11643\\|big5" "gb2312\\|gbk\\|gb18030\\|jisx0208\\|jisx0212\\|ksc5601\\|cns11643\\|big5" "-cdac$" 1.3] 2)
#@74 This variable has no meaning now.  Just kept for backward compatibility.
(defvar x-font-name-charset-alist nil (#$ . 19283))
(defconst xlfd-regexp-family-subnum 0)
(defconst xlfd-regexp-weight-subnum 1)
(defconst xlfd-regexp-slant-subnum 2)
(defconst xlfd-regexp-swidth-subnum 3)
(defconst xlfd-regexp-adstyle-subnum 4)
(defconst xlfd-regexp-pixelsize-subnum 5)
(defconst xlfd-regexp-pointsize-subnum 6)
(defconst xlfd-regexp-resx-subnum 7)
(defconst xlfd-regexp-resy-subnum 8)
(defconst xlfd-regexp-spacing-subnum 8)
(defconst xlfd-regexp-avgwidth-subnum 10)
(defconst xlfd-regexp-registry-subnum 11)
(defconst xlfd-tight-regexp "^-\\([^-]*-[^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*-[^-]*\\)$")
(defconst xlfd-style-regexp "^-\\([^-]*-[^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-\\([^-]*\\)-.*-\\([^-]*-[^-]*\\)$")
(defconst xlfd-regexp-numeric-subnums (list xlfd-regexp-pixelsize-subnum xlfd-regexp-pointsize-subnum xlfd-regexp-resx-subnum xlfd-regexp-resy-subnum xlfd-regexp-avgwidth-subnum))
#@341 Decompose PATTERN into XLFD fields and return a vector of the fields.
The length of the vector is 12.
The FOUNDRY and FAMILY fields are concatenated and stored in the first
element of the vector.
The REGISTRY and ENCODING fields are concatenated and stored in the last
element of the vector.

Return nil if PATTERN doesn't conform to XLFD.
(defalias 'x-decompose-font-name #[(pattern) "\305	\"\205I\306\307\310\"\307\311\fW\203&\n\312T	\"I\210T\211\202*\307\311\fW\203F\305\313\nH\"\203?\n\310I\210T\211\202,*\n)\207" [xlfd-tight-regexp pattern xlfd-fields i --dotimes-limit-- string-match make-vector 12 nil 0 match-string "^[*-]+$"] 6 (#$ . 20383)])
#@223 Compose X fontname from FIELDS.
FIELDS is a vector of XLFD fields, of length 12.
If a field is nil, wild-card letter `*' is embedded.
Optional argument REDUCE exists just for backward compatibility,
and is always ignored.
(defalias 'x-compose-font-name #[(fields &optional reduce) "\301\302\303\301#P\207" [fields "-" mapconcat #[(x) "\206\301\207" [x "*"] 1]] 5 (#$ . 21065)])
#@290 Like `x-resolve-font-name', but always return a font name.
XLFD-FIELDS is a vector of XLFD (X Logical Font Description) fields.
If no font matching XLFD-FIELDS is available, successively replace
parts of the font name pattern with "*" until some font is found.
Value is name of that font.
(defalias 'x-must-resolve-font-name #[(xlfd-fields) "\305\306	\204\nX\203\307!\305\310\311\217\210)\202	\204#\312\313!\210	*\207" [index ascii-font xlfd-regexp-registry-subnum xlfd-fields pattern nil 0 x-compose-font-name (byte-code "\302!\302\207" [pattern ascii-font x-resolve-font-name] 2) ((error (byte-code "\303\304\"\210	\n\305I\210\nT\303\207" [pattern xlfd-fields index message "Warning: no fonts matching `%s' available" "*"] 3))) error "No fonts found"] 3 (#$ . 21454)])
#@284 Complement elements of FONTLIST based on DEFAULT-SPEC.
DEFAULT-SPEC is a font-spec object providing default font properties.
FONTLIST is an alist of script names vs the corresponding font names.

The font names are parsed and unspecified font properties are
given from DEFAULT-SPEC.
(defalias 'x-complement-fontset-spec #[(default-spec fontlist) "\306	\307\211\203Q@\310\311\n\211A@)\"\307\f\211\203C@\f\312
\f\"\211
\204;\313
\f\312\f\"#\210)A\211\204 *\nA
\240\210)A\211\204\n*	)\207" [prop-list fontlist elt --dolist-tail-- x spec (:foundry :family :weight :slant :width :adstyle :size) nil font-spec :name font-get font-put prop val default-spec] 7 (#$ . 22248)])
#@172 Return non-nil if FONTSET is valid as fontset name.
A valid fontset name should conform to XLFD (X Logical Font Description)
with "fontset" in `<CHARSET_REGISTRY>' field.
(defalias 'fontset-name-p #[(fontset) "\303	\"\205\304\nT	\"\305\230\207" [xlfd-tight-regexp fontset xlfd-regexp-registry-subnum string-match match-string "fontset"] 3 (#$ . 22950)])
#@91 Return list to be appended to `x-fixed-font-alist'.
Done when `mouse-set-font' is called.
(defalias 'generate-fontset-menu #[nil "\303\304 \303\211\203+\n@\305\306	\"\204$\305\307	\"\204$\310	!	DB\nA\211\204*\311\312\313\")B\207" [l fontset --dolist-tail-- nil fontset-list string-match "fontset-default$" "fontset-auto[0-9]+$" fontset-plain-name "Fontset" sort #[(x y) "@	@\231\207" [x y] 2]] 5 (#$ . 23313)])
#@49 Return a plain and descriptive name of FONTSET.
(defalias 'fontset-plain-name #[(fontset) "\306!\211\204
\307\310\"\210\311!\211\203\344	\nH	H	\fH	
H	H	 H\312!\"#$%&'\313\314\"\"\204G'\"\202N\315\316\"\"\"#\203h\317#!\320V\203h\321\322\"##!\202l\"!&\203\223\313\323&\"\203\203!\324\325Q!\202\223\313\326&\"\203\223!\324&Q!%\203\335\313\327%\"\203\252!\324\330Q!\202\335\313\331%\"\203\274!\324\332Q!\202\335\313\333%\"\203\316!\324\334Q!\202\335\313\335%\"\203\335!\324\336Q!!.\202\345)\207" [fontset xlfd-fields xlfd-regexp-family-subnum xlfd-regexp-weight-subnum xlfd-regexp-slant-subnum xlfd-regexp-swidth-subnum query-fontset error "Invalid fontset: %s" x-decompose-font-name nil string-match "^fontset-\\(.*\\)$" match-string 1 string-to-number 0 format "%s: %s-dot" "^medium$" " " "medium" "^bold$\\|^demibold$" "^i$" "italic" "^o$" "slant" "^ri$" "reverse italic" "^ro$" "reverse slant" xlfd-regexp-pixelsize-subnum xlfd-regexp-registry-subnum name nickname size swidth slant weight family] 8 (#$ . 23744)])
#@165 Alist of charsets vs the corresponding most appropriate scripts.

This alist is used by the function `create-fontset-from-fontset-spec'
to map charsets to scripts.
(defvar charset-script-alist '((ascii . latin) (latin-iso8859-1 . latin) (latin-iso8859-2 . latin) (latin-iso8859-3 . latin) (latin-iso8859-4 . latin) (latin-iso8859-9 . latin) (latin-iso8859-10 . latin) (latin-iso8859-13 . latin) (latin-iso8859-14 . latin) (latin-iso8859-15 . latin) (latin-iso8859-16 . latin) (latin-jisx0201 . latin) (thai-tis620 . thai) (cyrillic-iso8859-5 . cyrillic) (arabic-iso8859-6 . arabic) (greek-iso8859-7 . latin) (hebrew-iso8859-8 . latin) (katakana-jisx0201 . kana) (chinese-gb2312 . han) (chinese-gbk . han) (gb18030-2-byte . han) (gb18030-4-byte-bmp . han) (gb18030-4-byte-ext-1 . han) (gb18030-4-byte-ext-2 . han) (gb18030-4-byte-smp . han) (chinese-big5-1 . han) (chinese-big5-2 . han) (chinese-cns11643-1 . han) (chinese-cns11643-2 . han) (chinese-cns11643-3 . han) (chinese-cns11643-4 . han) (chinese-cns11643-5 . han) (chinese-cns11643-6 . han) (chinese-cns11643-7 . han) (japanese-jisx0208 . han) (japanese-jisx0208-1978 . han) (japanese-jisx0212 . han) (japanese-jisx0213-1 . han) (japanese-jisx0213-2 . han) (korean-ksc5601 . hangul) (chinese-sisheng . bopomofo) (vietnamese-viscii-lower . latin) (vietnamese-viscii-upper . latin) (arabic-digit . arabic) (arabic-1-column . arabic) (arabic-2-column . arabic) (indian-is13194 . devanagari) (indian-glyph . devanagari) (indian-1-column . devanagari) (indian-2-column . devanagari) (tibetan-1-column . tibetan)) (#$ . 24838))
#@814 Create a fontset from fontset specification string FONTSET-SPEC.
FONTSET-SPEC is a string of the format:
	FONTSET-NAME,SCRIPT-NAME0:FONT-NAME0,SCRIPT-NAME1:FONT-NAME1, ...
Any number of SPACE, TAB, and NEWLINE can be put before and after commas.

When a frame uses the fontset as the `font' parameter, the frame's
default font name is derived from FONTSET-NAME by substituting
"iso8859-1" for the tail part "fontset-XXX".  But, if SCRIPT-NAMEn
is "ascii", use the corresponding FONT-NAMEn as the default font
name.

Optional 2nd and 3rd arguments exist just for backward compatibility,
and are ignored.

It returns a name of the created fontset.

For backward compatibility, SCRIPT-NAME may be a charset name, in
which case, the corresponding script is decided by the variable
`charset-script-alist' (which see).
(defalias 'create-fontset-from-fontset-spec #[(fontset-spec &optional style-variant noerror) "\306\307\"\204\f\310\311\"\210\312\225\313\312\"\314\211\211\211\306
\"\204*\310\315
\"\210\316\317
\"\306\320#\203\207\312\225\321\313\322\"!\211\323=\204S\324\312\">\203_\313\325\"D	B\202/\236A\211\203u\n\313\325\"D	B\202/\326!\203/\313\325\"D	B\202/\327\f	\"\330
	\237\".\207" [fontset-spec fontlist script target default-spec name string-match "^[^,]+" error "Invalid fontset spec: %s" 0 match-string nil "Fontset name \"%s\" not conforming to XLFD" font-spec :name "[, 	\n]*\\([^:]+\\):[ 	]*\\([^,]+\\)" intern 1 ascii char-table-extra-slot 2 charsetp x-complement-fontset-spec new-fontset idx xlfd-tight-regexp char-script-table charset-script-alist] 7 (#$ . 26424)])
#@453 Create a fontset from an ASCII font FONT.

Optional 2nd arg RESOLVED-FONT is a resolved name of FONT.
If omitted, `x-resolve-font-name' is called to get the resolved name.
At this time, if FONT is not available, an error is signaled.

Optional 3rd arg FONTSET-NAME is a string to be used in
`<CHARSET_ENCODING>' fields of a new fontset name.  If it is omitted,
an appropriate name is generated automatically.

It returns a name of the created fontset.
(defalias 'create-fontset-from-ascii-font #[(font &optional resolved-font fontset-name) "\227	\206\n\306!\227\307	!\310\f\203\f\227\2020\311\312!\203.\313\314\315
H\316$\2020\317
\320\321\f\"I\210\322!\311\n!\206H\323\n\324Q!*\207" [font resolved-font fontset xlfd fontset-name xlfd-regexp-registry-subnum x-resolve-font-name x-decompose-font-name nil query-fontset "fontset-startup" subst-char-in-string 45 95 t "startup" format "fontset-%s" x-compose-font-name create-fontset-from-fontset-spec ", ascii:"] 5 (#$ . 28060)])
#@240 String of fontset spec of the standard fontset.
You have the biggest chance to display international characters
with correct glyphs by using the standard fontset.
See the documentation of `create-fontset-from-fontset-spec' for the format.
(defvar standard-fontset-spec (purecopy "-*-fixed-medium-r-normal-*-16-*-*-*-*-*-fontset-standard") (#$ . 29065))
(defalias 'create-fontset-from-x-resource #[nil "\302\303\304\305\306	\"\305\307	\"\"\211\205\303\310\311\217\210	T\202*\207" [fontset-spec idx 0 nil x-get-resource format "fontset-%d" "Fontset-%d" (create-fontset-from-fontset-spec fontset-spec t) ((error (byte-code "\301\302\303\304\"\305#\207" [idx display-warning initialization format "Fontset-%d: invalid specification in X resource" :warning] 5)))] 5])
(provide 'fontset)

MMCT - 2023