Mercurial > emacs

comparison lisp/international/code-pages.el @ 64732:29c131ee3778

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add autoload cookies for all coding systems.
author Kenichi Handa <handa@m17n.org>
date Fri, 05 Aug 2005 01:14:08 +0000
parents 18a818a2ee7c
children ed770a0a7846
comparison
equal deleted inserted replaced
64731:b991ecaae196 64732:29c131ee3778
214 ;; exchanging the ?\� entries for nil. iconv was used instead in some 214 ;; exchanging the ?\� entries for nil. iconv was used instead in some
215 ;; cases. 215 ;; cases.
216 216
217 ;; Fixme: Do better for mode-line mnemonics? 217 ;; Fixme: Do better for mode-line mnemonics?
218 218
219 ;;;###autoload(autoload-coding-system 'cp437 '(require 'code-pages))
219 (cp-make-coding-system 220 (cp-make-coding-system
220 cp437 221 cp437
221 [?\Ç 222 [?\Ç
222 ?\ü 223 ?\ü
223 ?\é 224 ?\é
345 ?\ⁿ 346 ?\ⁿ
346 ?\² 347 ?\²
347 ?\■ 348 ?\■
348 ?\ ]) 349 ?\ ])
349 350
351 ;;;###autoload(autoload-coding-system 'cp737 '(require 'code-pages))
350 (cp-make-coding-system 352 (cp-make-coding-system
351 cp737 353 cp737
352 [?\Α 354 [?\Α
353 ?\Β 355 ?\Β
354 ?\Γ 356 ?\Γ
477 ?\² 479 ?\²
478 ?\■ 480 ?\■
479 ?\ ]) 481 ?\ ])
480 (coding-system-put 'cp737 'mime-charset nil) ; not in IANA list 482 (coding-system-put 'cp737 'mime-charset nil) ; not in IANA list
481 483
484 ;;;###autoload(autoload-coding-system 'cp775 '(require 'code-pages))
482 (cp-make-coding-system 485 (cp-make-coding-system
483 cp775 486 cp775
484 [?\Ć 487 [?\Ć
485 ?\ü 488 ?\ü
486 ?\é 489 ?\é
608 ?\³ 611 ?\³
609 ?\² 612 ?\²
610 ?\■ 613 ?\■
611 ?\ ]) 614 ?\ ])
612 615
616 ;;;###autoload(autoload-coding-system 'cp850 '(require 'code-pages))
613 (cp-make-coding-system 617 (cp-make-coding-system
614 cp850 618 cp850
615 [?\Ç 619 [?\Ç
616 ?\ü 620 ?\ü
617 ?\é 621 ?\é
739 ?\³ 743 ?\³
740 ?\² 744 ?\²
741 ?\■ 745 ?\■
742 ?\ ]) 746 ?\ ])
743 747
748 ;;;###autoload(autoload-coding-system 'cp851 '(require 'code-pages))
744 (cp-make-coding-system 749 (cp-make-coding-system
745 cp851 750 cp851
746 [?\Ç 751 [?\Ç
747 ?\ü 752 ?\ü
748 ?\é 753 ?\é
870 ?\ΰ 875 ?\ΰ
871 ?\ώ 876 ?\ώ
872 ?\■ 877 ?\■
873 ?\ ]) 878 ?\ ])
874 879
880 ;;;###autoload(autoload-coding-system 'cp852 '(require 'code-pages))
875 (cp-make-coding-system 881 (cp-make-coding-system
876 cp852 882 cp852
877 [?\Ç 883 [?\Ç
878 ?\ü 884 ?\ü
879 ?\é 885 ?\é
1001 ?\Ř 1007 ?\Ř
1002 ?\ř 1008 ?\ř
1003 ?\■ 1009 ?\■
1004 ?\ ]) 1010 ?\ ])
1005 1011
1012 ;;;###autoload(autoload-coding-system 'cp855 '(require 'code-pages))
1006 (cp-make-coding-system 1013 (cp-make-coding-system
1007 cp855 1014 cp855
1008 [?\ђ 1015 [?\ђ
1009 ?\Ђ 1016 ?\Ђ
1010 ?\ѓ 1017 ?\ѓ
1132 ?\Ч 1139 ?\Ч
1133 nil 1140 nil
1134 ?\■ 1141 ?\■
1135 ?\ ]) 1142 ?\ ])
1136 1143
1144 ;;;###autoload(autoload-coding-system 'cp857 '(require 'code-pages))
1137 (cp-make-coding-system 1145 (cp-make-coding-system
1138 cp857 1146 cp857
1139 [?\Ç 1147 [?\Ç
1140 ?\ü 1148 ?\ü
1141 ?\é 1149 ?\é
1263 ?\³ 1271 ?\³
1264 ?\² 1272 ?\²
1265 ?\■ 1273 ?\■
1266 ?\ ]) 1274 ?\ ])
1267 1275
1276 ;;;###autoload(autoload-coding-system 'cp860 '(require 'code-pages))
1268 (cp-make-coding-system 1277 (cp-make-coding-system
1269 cp860 1278 cp860
1270 [?\Ç 1279 [?\Ç
1271 ?\ü 1280 ?\ü
1272 ?\é 1281 ?\é
1394 ?\ⁿ 1403 ?\ⁿ
1395 ?\² 1404 ?\²
1396 ?\■ 1405 ?\■
1397 ?\ ]) 1406 ?\ ])
1398 1407
1408 ;;;###autoload(autoload-coding-system 'cp861 '(require 'code-pages))
1399 (cp-make-coding-system 1409 (cp-make-coding-system
1400 cp861 1410 cp861
1401 [?\Ç 1411 [?\Ç
1402 ?\ü 1412 ?\ü
1403 ?\é 1413 ?\é
1525 ?\ⁿ 1535 ?\ⁿ
1526 ?\² 1536 ?\²
1527 ?\■ 1537 ?\■
1528 ?\ ]) 1538 ?\ ])
1529 1539
1540 ;;;###autoload(autoload-coding-system 'cp862 '(require 'code-pages))
1530 (cp-make-coding-system 1541 (cp-make-coding-system
1531 cp862 1542 cp862
1532 [?\א 1543 [?\א
1533 ?\ב 1544 ?\ב
1534 ?\ג 1545 ?\ג
1656 ?\ⁿ 1667 ?\ⁿ
1657 ?\² 1668 ?\²
1658 ?\■ 1669 ?\■
1659 ?\ ]) 1670 ?\ ])
1660 1671
1672 ;;;###autoload(autoload-coding-system 'cp863 '(require 'code-pages))
1661 (cp-make-coding-system 1673 (cp-make-coding-system
1662 cp863 1674 cp863
1663 [?\Ç 1675 [?\Ç
1664 ?\ü 1676 ?\ü
1665 ?\é 1677 ?\é
1787 ?\ⁿ 1799 ?\ⁿ
1788 ?\² 1800 ?\²
1789 ?\■ 1801 ?\■
1790 ?\ ]) 1802 ?\ ])
1791 1803
1804 ;;;###autoload(autoload-coding-system 'cp864 '(require 'code-pages))
1792 (cp-make-coding-system 1805 (cp-make-coding-system
1793 cp864 1806 cp864
1794 [?\° 1807 [?\°
1795 ?\· 1808 ?\·
1796 ?\∘ 1809 ?\∘
1918 ?\ك 1931 ?\ك
1919 ?\ي 1932 ?\ي
1920 ?\■ 1933 ?\■
1921 ?\ ]) 1934 ?\ ])
1922 1935
1936 ;;;###autoload(autoload-coding-system 'cp865 '(require 'code-pages))
1923 (cp-make-coding-system 1937 (cp-make-coding-system
1924 cp865 1938 cp865
1925 [?\Ç 1939 [?\Ç
1926 ?\ü 1940 ?\ü
1927 ?\é 1941 ?\é
2049 ?\ⁿ 2063 ?\ⁿ
2050 ?\² 2064 ?\²
2051 ?\■ 2065 ?\■
2052 ?\ ]) 2066 ?\ ])
2053 2067
2068 ;;;###autoload(autoload-coding-system 'cp866 '(require 'code-pages))
2054 (cp-make-coding-system 2069 (cp-make-coding-system
2055 cp866 2070 cp866
2056 [?\А 2071 [?\А
2057 ?\Б 2072 ?\Б
2058 ?\В 2073 ?\В
2182 ?\■ 2197 ?\■
2183 ?\ ] 2198 ?\ ]
2184 "CP866 (Cyrillic)." 2199 "CP866 (Cyrillic)."
2185 ?A) 2200 ?A)
2186 2201
2202 ;;;###autoload(autoload-coding-system 'cp869 '(require 'code-pages))
2187 (cp-make-coding-system 2203 (cp-make-coding-system
2188 cp869 2204 cp869
2189 [nil 2205 [nil
2190 nil 2206 nil
2191 nil 2207 nil
2313 ?\ΰ 2329 ?\ΰ
2314 ?\ώ 2330 ?\ώ
2315 ?\■ 2331 ?\■
2316 ?\ ]) 2332 ?\ ])
2317 2333
2334 ;;;###autoload(autoload-coding-system 'cp874 '(require 'code-pages))
2318 (cp-make-coding-system 2335 (cp-make-coding-system
2319 cp874 2336 cp874
2320 [?\€ 2337 [?\€
2321 nil 2338 nil
2322 nil 2339 nil
3372 ?\ü 3389 ?\ü
3373 ?\ư 3390 ?\ư
3374 ?\₫ 3391 ?\₫
3375 ?\ÿ]) 3392 ?\ÿ])
3376 3393
3394 ;;;###autoload(autoload-coding-system 'next '(require 'code-pages))
3377 (cp-make-coding-system 3395 (cp-make-coding-system
3378 next 3396 next
3379 [?\  3397 [?\ 
3380 ?\À 3398 ?\À
3381 ?\Á 3399 ?\Á
3504 ?\ÿ 3522 ?\ÿ
3505 nil 3523 nil
3506 nil] 3524 nil]
3507 "NeXTstep encoding." ?N) 3525 "NeXTstep encoding." ?N)
3508 3526
3527 ;;;###autoload(autoload-coding-system 'koi8-t '(require 'code-pages))
3509 (cp-make-coding-system 3528 (cp-make-coding-system
3510 koi8-t ; used by glibc for tg_TJ 3529 koi8-t ; used by glibc for tg_TJ
3511 [?\қ 3530 [?\қ
3512 ?\ғ 3531 ?\ғ
3513 ?\‚ 3532 ?\‚
3772 (define-coding-system-alias 'iso-8859-16 'iso-latin-10) 3791 (define-coding-system-alias 'iso-8859-16 'iso-latin-10)
3773 (define-coding-system-alias 'latin-10 'iso-latin-10) 3792 (define-coding-system-alias 'latin-10 'iso-latin-10)
3774 3793
3775 ;; Unicode-based alternative which has the possible advantage of 3794 ;; Unicode-based alternative which has the possible advantage of
3776 ;; having its relative sparseness specified. 3795 ;; having its relative sparseness specified.
3796 ;;;###autoload(autoload-coding-system 'iso-8859-6 '(require 'code-pages))
3777 (cp-make-coding-system 3797 (cp-make-coding-system
3778 ;; The base system uses arabic-iso-8bit, but that's not a MIME charset. 3798 ;; The base system uses arabic-iso-8bit, but that's not a MIME charset.
3779 iso-8859-6 3799 iso-8859-6
3780 [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil 3800 [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3781 nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil 3801 nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
4187 ?\þ 4207 ?\þ
4188 ?\ÿ] 4208 ?\ÿ]
4189 nil ?G) 4209 nil ?G)
4190 (coding-system-put 'georgian-ps 'mime-charset nil) ; not in IANA list 4210 (coding-system-put 'georgian-ps 'mime-charset nil) ; not in IANA list
4191 4211
4212 ;;;###autoload(autoload-coding-system 'cp720 '(require 'code-pages))
4192 ;; From http://www.microsoft.com/globaldev/reference/oem/720.htm 4213 ;; From http://www.microsoft.com/globaldev/reference/oem/720.htm
4193 (cp-make-coding-system 4214 (cp-make-coding-system
4194 cp720 4215 cp720
4195 [nil 4216 [nil
4196 nil 4217 nil
4320 ?\² 4341 ?\²
4321 ?\■ 4342 ?\■
4322 ?\ ]) 4343 ?\ ])
4323 (coding-system-put 'cp720 'mime-charset nil) ; not in IANA list 4344 (coding-system-put 'cp720 'mime-charset nil) ; not in IANA list
4324 4345
4346 ;;;###autoload(autoload-coding-system 'cp1125 '(require 'code-pages))
4325 ;; http://oss.software.ibm.com/cvs/icu/charset/data/ucm/ibm-1125_P100-2000.ucm 4347 ;; http://oss.software.ibm.com/cvs/icu/charset/data/ucm/ibm-1125_P100-2000.ucm
4326 (cp-make-coding-system 4348 (cp-make-coding-system
4327 cp1125 4349 cp1125
4328 [?\А 4350 [?\А
4329 ?\Б 4351 ?\Б
4459 (coding-system-put 'cp1125 'mime-charset nil) 4481 (coding-system-put 'cp1125 'mime-charset nil)
4460 4482
4461 ;; Suggested by Anton Zinoviev <anton@lml.bas.bg>: Bulgarian DOS 4483 ;; Suggested by Anton Zinoviev <anton@lml.bas.bg>: Bulgarian DOS
4462 ;; codepage. Table at 4484 ;; codepage. Table at
4463 ;; <URL:http://czyborra.com/charsets/bulgarian-mik.txt.gz>. 4485 ;; <URL:http://czyborra.com/charsets/bulgarian-mik.txt.gz>.
4486 ;;;###autoload(autoload-coding-system 'mik '(require 'code-pages))
4464 (cp-make-coding-system 4487 (cp-make-coding-system
4465 mik 4488 mik
4466 [?А ?Б ?В ?Г ?Д ?Е ?Ж ?З ?И ?Й ?К ?Л ?М ?Н ?О ?П ?Р ?С ?Т ?У ?Ф ?Х ?Ц 4489 [?А ?Б ?В ?Г ?Д ?Е ?Ж ?З ?И ?Й ?К ?Л ?М ?Н ?О ?П ?Р ?С ?Т ?У ?Ф ?Х ?Ц
4467 ?Ч ?Ш ?Щ ?Ъ ?Ы ?Ь ?Э ?Ю ?Я ?а ?б ?в ?г ?д ?е ?ж ?з ?и ?й ?к ?л ?м ?н 4490 ?Ч ?Ш ?Щ ?Ъ ?Ы ?Ь ?Э ?Ю ?Я ?а ?б ?в ?г ?д ?е ?ж ?з ?и ?й ?к ?л ?м ?н
4468 ?о ?п ?р ?с ?т ?у ?ф ?х ?ц ?ч ?ш ?щ ?ъ ?ы ?ь ?э ?ю ?я ?└ ?┴ ?┬ ?├ ?─ 4491 ?о ?п ?р ?с ?т ?у ?ф ?х ?ц ?ч ?ш ?щ ?ъ ?ы ?ь ?э ?ю ?я ?└ ?┴ ?┬ ?├ ?─