lisp/international/code-pages.el

   1 ;;; code-pages.el --- coding systems for assorted codepages  -*-coding: utf-8;-*-
   2
   3 ;; Copyright (C) 2001, 2002, 2003, 2004, 2005  Free Software Foundation, Inc.
   4 ;; Copyright (C) 2004, 2005
   5 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
   6 ;;   Registration Number H14PRO021
   7
   8 ;; Author: Dave Love <fx@gnu.org>
   9 ;; Keywords: i18n
  10
  11 ;; This file is part of GNU Emacs.
  12
  13 ;; GNU Emacs is free software; you can redistribute it and/or modify
  14 ;; it under the terms of the GNU General Public License as published by
  15 ;; the Free Software Foundation; either version 2, or (at your option)
  16 ;; any later version.
  17
  18 ;; GNU Emacs is distributed in the hope that it will be useful,
  19 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  20 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21 ;; GNU General Public License for more details.
  22
  23 ;; You should have received a copy of the GNU General Public License
  24 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
  25 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  26 ;; Boston, MA 02110-1301, USA.
  27
  28 ;;; Commentary:
  29
  30 ;; Definitions of miscellaneous 8-bit coding systems based on ASCII
  31 ;; (we can't cope properly with EBCDIC, for instance), mainly for PC
  32 ;; `code pages'.  They are decoded into Latin-1 and mule-unicode
  33 ;; charsets rather than (lossily) into single iso8859 charsets à la
  34 ;; codepage.el.  The utility `cp-make-coding-system' derives them from
  35 ;; simple tables.
  36
  37 ;; Those covered are: cp437, cp737, cp720, cp775, cp850, cp851, cp852,
  38 ;; cp855, cp857, cp860, cp861, cp862, cp863, cp864, cp865, cp866,
  39 ;; cp869, cp874, cp1125, windows-1250, windows-1253, windows-1254,
  40 ;; windows-1255, windows-1256, windows-1257, windows-1258, next,
  41 ;; iso-8859-6, iso-8859-10, iso-8859-11, iso-8859-16, koi8-t,
  42 ;; georgian-ps.  This is meant to include all the single-byte ones
  43 ;; relevant to GNU (used in glibc-defined locales); we don't yet get
  44 ;; all the multibyte ones in base Emacs.
  45
  46 ;; Note that various of these can clash with definitions in
  47 ;; codepage.el; we try to avoid damage from that.  A few CPs from
  48 ;; codepage.el (770, 773, 774) aren't covered (in the absence of
  49 ;; translation tables to Unicode).
  50
  51 ;; Compile this, to avoid loading `ccl' at runtime.
  52
  53 ;; Although the tables used here aren't very big, it might be worth
  54 ;; splitting the file and autoloading the coding systems if/when my
  55 ;; (or similar) autoloading code is installed.
  56
  57 ;;; Code:
  58
  59 ;; The defsubsts here are just so that language files can use
  60 ;; `cp-make-coding-system' and not require functions from this file
  61 ;; at runtime.
  62
  63 (defsubst cp-make-translation-table (v)
  64   "Return a translation table made from 128-long vector V.
  65 V comprises characters encodable by mule-utf-8."
  66   (let ((encoding-vector (make-vector 256 0)))
  67     (dotimes (i 128)
  68       (aset encoding-vector i i))
  69     (dotimes (i 128)
  70       (aset encoding-vector (+ i 128) (aref v i)))
  71     ;; Add equivalent characters to the encoder so that we can unify
  72     ;; on encoding.
  73     (let* ((tab (make-translation-table-from-vector encoding-vector))
  74            ;; Translation table used for encoding:
  75            (encode-table (char-table-extra-slot tab 0)))
  76       (map-char-table (lambda (c v)
  77                         (if v
  78                             (let ((c1 (aref encode-table v)))
  79                               (if c1    ; we encode that unicode
  80                                   (aset encode-table c c1)))))
  81                       ucs-mule-to-mule-unicode)
  82       tab)))
  83
  84 (defsubst cp-valid-codes (v)
  85   "Derive a valid-codes list for translation vector V.
  86 See `make-coding-system'."
  87   (let (pairs
  88         (i 128)                         ; index into v
  89         (start 0)                       ; start of a valid range
  90         (end 127))                      ; end of a valid range
  91     (while (< i 256)
  92       (if (aref v (- i 128))            ; start or extend range
  93           (progn
  94             (setq end i)
  95             (unless start (setq start i)))
  96         (if start
  97             (push (cons start end) pairs))
  98         (setq start nil))
  99       (setq i (1+ i)))
 100     (if start (push (cons start end) pairs))
 101     (nreverse pairs)))
 102
 103 ;; Fix things that have been, or might be, done by codepage.el.
 104 (eval-after-load "codepage"
 105   '(progn
 106
 107 ;; Semi-dummy version for the stuff in codepage.el which we don't
 108 ;; define here.  (Used by mule-diag.)
 109 (defun cp-supported-codepages ()
 110   "Return an alist of supported codepages.
 111
 112 Each association in the alist has the form (NNN . CHARSET), where NNN is the
 113 codepage number, and CHARSET is the MULE charset which is the closest match
 114 for the character set supported by that codepage.
 115
 116 A codepage NNN is supported if a variable called `cpNNN-decode-table' exists,
 117 is a vector, and has a charset property."
 118   '(("774" . latin-iso8859-4) ("770" . latin-iso8859-4)
 119     ("773" . latin-iso8859-4)))
 120
 121 ;; A version which doesn't override the coding systems set up by this
 122 ;; file.  It could still be used for the few missing ones from
 123 ;; codepage.el.
 124 (defun codepage-setup (codepage)
 125   "Create a coding system cpCODEPAGE to support the IBM codepage CODEPAGE.
 126
 127 These coding systems are meant for encoding and decoding 8-bit non-ASCII
 128 characters used by the IBM codepages, typically in conjunction with files
 129 read/written by MS-DOS software, or for display on the MS-DOS terminal."
 130   (interactive
 131    (let ((completion-ignore-case t)
 132          (candidates (cp-supported-codepages)))
 133      (list (completing-read "Setup DOS Codepage (default 437): " candidates
 134                             nil t nil nil "437"))))
 135   (let ((cp (format "cp%s" codepage)))
 136     (unless (coding-system-p (intern cp))
 137       (cp-make-coding-systems-for-codepage
 138        cp (cp-charset-for-codepage cp) (cp-offset-for-codepage cp))))))
 139 )                                       ; eval-after-load
 140
 141 ;; Macro to allow ccl compilation at byte-compile time, avoiding
 142 ;; loading ccl.
 143 ;;;###autoload
 144 (defmacro cp-make-coding-system (name v &optional doc-string mnemonic)
 145   "Make coding system NAME for and 8-bit, extended-ASCII character set.
 146 V is a 128-long vector of characters to translate the upper half of
 147 the character set.  DOC-STRING and MNEMONIC are used as the
 148 corresponding args of `make-coding-system'.  If MNEMONIC isn't given,
 149 ?* is used.
 150 Return an updated `non-iso-charset-alist'."
 151   (let* ((encoder (intern (format "encode-%s" name)))
 152          (decoder (intern (format "decode-%s" name)))
 153          (ccl-decoder
 154           (ccl-compile
 155            `(4
 156              ((loop
 157                (read r1)
 158                (if (r1 < 128) ;; ASCII
 159                    (r0 = ,(charset-id 'ascii))
 160                  (if (r1 < 160)
 161                      (r0 = ,(charset-id 'eight-bit-control))
 162                    (r0 = ,(charset-id 'eight-bit-graphic))))
 163                (translate-character ,decoder r0 r1)
 164                ;; Allow fragmentation on decoding -- relevant for
 165                ;; Cyrillic, Greek and, possibly Arabic and Hebrew.
 166                (translate-character utf-translation-table-for-decode r0 r1)
 167                (write-multibyte-character r0 r1)
 168                (repeat))))))
 169          (ccl-encoder
 170           (ccl-compile
 171            `(1
 172              ((loop
 173                (read-multibyte-character r0 r1)
 174                (translate-character ,encoder r0 r1)
 175                (if (r0 != ,(charset-id 'ascii))
 176                    (if (r0 != ,(charset-id 'eight-bit-graphic))
 177                        (if (r0 != ,(charset-id 'eight-bit-control))
 178                            (r1 = ??))))
 179                (write-repeat r1)))))))
 180     `(let ((translation-table (cp-make-translation-table ,v))
 181            (codes (cp-valid-codes ,v)))
 182        (define-translation-table ',decoder translation-table)
 183        (define-translation-table ',encoder
 184          (char-table-extra-slot translation-table 0))
 185        (make-coding-system
 186         ',name 4 ,(or mnemonic ?*)
 187         (or ,doc-string (format "%s encoding" ',name))
 188         (cons ,ccl-decoder ,ccl-encoder)
 189         (list (cons 'safe-chars (get ',encoder 'translation-table))
 190               (cons 'valid-codes codes)
 191               (cons 'mime-charset ',name)
 192               ;; For Quail translation.  Fixme: this should really be
 193               ;; a separate table that only translates the coding
 194               ;; system's safe-chars.
 195               (cons 'translation-table-for-input 'ucs-mule-to-mule-unicode)))
 196        (let ((slot (assq ',name non-iso-charset-alist))
 197              (elt (list nil                     ; charset list
 198                         ',decoder
 199                         (let (l)                ; code range
 200                           (dolist (elt (reverse codes))
 201                             (push (cdr elt) l)
 202                             (push (car elt) l))
 203                           (list l)))))
 204          (if (not slot)
 205              (push (cons ',name elt) non-iso-charset-alist)
 206            (setcdr slot elt)
 207            non-iso-charset-alist)))))
 208
 209 (eval-when-compile (defvar non-iso-charset-alist))
 210
 211 ;; These tables were mostly derived by running somthing like
 212 ;; `recode -f cpxxx/..utf-8' on a binary file filled by
 213 ;; `(dotimes (i 128) (insert ?? ?\\ (+ 128 i) ?\n))' and then
 214 ;; exchanging the ?\� entries for nil.  iconv was used instead in some
 215 ;; cases.
 216
 217 ;; Fixme: Do better for mode-line mnemonics?
 218
 219 ;;;###autoload(autoload-coding-system 'cp437 '(require 'code-pages))
 220 (cp-make-coding-system
 221  cp437
 222  [?\Ç
 223   ?\ü
 224   ?\é
 225   ?\â
 226   ?\ä
 227   ?\à
 228   ?\å
 229   ?\ç
 230   ?\ê
 231   ?\ë
 232   ?\è
 233   ?\ï
 234   ?\î
 235   ?\ì
 236   ?\Ä
 237   ?\Å
 238   ?\É
 239   ?\æ
 240   ?\Æ
 241   ?\ô
 242   ?\ö
 243   ?\ò
 244   ?\û
 245   ?\ù
 246   ?\ÿ
 247   ?\Ö
 248   ?\Ü
 249   ?\¢
 250   ?\£
 251   ?\¥
 252   ?\₧
 253   ?\ƒ
 254   ?\á
 255   ?\í
 256   ?\ó
 257   ?\ú
 258   ?\ñ
 259   ?\Ñ
 260   ?\ª
 261   ?\º
 262   ?\¿
 263   ?\⌐
 264   ?\¬
 265   ?\½
 266   ?\¼
 267   ?\¡
 268   ?\«
 269   ?\»
 270   ?\░
 271   ?\▒
 272   ?\▓
 273   ?\│
 274   ?\┤
 275   ?\╡
 276   ?\╢
 277   ?\╖
 278   ?\╕
 279   ?\╣
 280   ?\║
 281   ?\╗
 282   ?\╝
 283   ?\╜
 284   ?\╛
 285   ?\┐
 286   ?\└
 287   ?\┴
 288   ?\┬
 289   ?\├
 290   ?\─
 291   ?\┼
 292   ?\╞
 293   ?\╟
 294   ?\╚
 295   ?\╔
 296   ?\╩
 297   ?\╦
 298   ?\╠
 299   ?\═
 300   ?\╬
 301   ?\╧
 302   ?\╨
 303   ?\╤
 304   ?\╥
 305   ?\╙
 306   ?\╘
 307   ?\╒
 308   ?\╓
 309   ?\╫
 310   ?\╪
 311   ?\┘
 312   ?\┌
 313   ?\█
 314   ?\▄
 315   ?\▌
 316   ?\▐
 317   ?\▀
 318   ?\α
 319   ?\ß
 320   ?\Γ
 321   ?\π
 322   ?\Σ
 323   ?\σ
 324   ?\µ
 325   ?\τ
 326   ?\Φ
 327   ?\Θ
 328   ?\Ω
 329   ?\δ
 330   ?\∞
 331   ?\φ
 332   ?\ε
 333   ?\∩
 334   ?\≡
 335   ?\±
 336   ?\≥
 337   ?\≤
 338   ?\⌠
 339   ?\⌡
 340   ?\÷
 341   ?\≈
 342   ?\°
 343   ?\·
 344   ?\•
 345   ?\√
 346   ?\ⁿ
 347   ?\²
 348   ?\■
 349   ?\ ])
 350
 351 ;;;###autoload(autoload-coding-system 'cp737 '(require 'code-pages))
 352 (cp-make-coding-system
 353  cp737
 354  [?\Α
 355   ?\Β
 356   ?\Γ
 357   ?\Δ
 358   ?\Ε
 359   ?\Ζ
 360   ?\Η
 361   ?\Θ
 362   ?\Ι
 363   ?\Κ
 364   ?\Λ
 365   ?\Μ
 366   ?\Ν
 367   ?\Ξ
 368   ?\Ο
 369   ?\Π
 370   ?\Ρ
 371   ?\Σ
 372   ?\Τ
 373   ?\Υ
 374   ?\Φ
 375   ?\Χ
 376   ?\Ψ
 377   ?\Ω
 378   ?\α
 379   ?\β
 380   ?\γ
 381   ?\δ
 382   ?\ε
 383   ?\ζ
 384   ?\η
 385   ?\θ
 386   ?\ι
 387   ?\κ
 388   ?\λ
 389   ?\μ
 390   ?\ν
 391   ?\ξ
 392   ?\ο
 393   ?\π
 394   ?\ρ
 395   ?\σ
 396   ?\ς
 397   ?\τ
 398   ?\υ
 399   ?\φ
 400   ?\χ
 401   ?\ψ
 402   ?\░
 403   ?\▒
 404   ?\▓
 405   ?\│
 406   ?\┤
 407   ?\╡
 408   ?\╢
 409   ?\╖
 410   ?\╕
 411   ?\╣
 412   ?\║
 413   ?\╗
 414   ?\╝
 415   ?\╜
 416   ?\╛
 417   ?\┐
 418   ?\└
 419   ?\┴
 420   ?\┬
 421   ?\├
 422   ?\─
 423   ?\┼
 424   ?\╞
 425   ?\╟
 426   ?\╚
 427   ?\╔
 428   ?\╩
 429   ?\╦
 430   ?\╠
 431   ?\═
 432   ?\╬
 433   ?\╧
 434   ?\╨
 435   ?\╤
 436   ?\╥
 437   ?\╙
 438   ?\╘
 439   ?\╒
 440   ?\╓
 441   ?\╫
 442   ?\╪
 443   ?\┘
 444   ?\┌
 445   ?\█
 446   ?\▄
 447   ?\▌
 448   ?\▐
 449   ?\▀
 450   ?\ω
 451   ?\ά
 452   ?\έ
 453   ?\ή
 454   ?\ϊ
 455   ?\ί
 456   ?\ό
 457   ?\ύ
 458   ?\ϋ
 459   ?\ώ
 460   ?\Ά
 461   ?\Έ
 462   ?\Ή
 463   ?\Ί
 464   ?\Ό
 465   ?\Ύ
 466   ?\Ώ
 467   ?\±
 468   ?\≥
 469   ?\≤
 470   ?\Ϊ
 471   ?\Ϋ
 472   ?\÷
 473   ?\≈
 474   ?\°
 475   ?\∙
 476   ?\·
 477   ?\√
 478   ?\ⁿ
 479   ?\²
 480   ?\■
 481   ?\ ])
 482 (coding-system-put 'cp737 'mime-charset nil) ; not in IANA list
 483
 484 ;;;###autoload(autoload-coding-system 'cp775 '(require 'code-pages))
 485 (cp-make-coding-system
 486  cp775
 487  [?\Ć
 488   ?\ü
 489   ?\é
 490   ?\ā
 491   ?\ä
 492   ?\ģ
 493   ?\å
 494   ?\ć
 495   ?\ł
 496   ?\ē
 497   ?\Ŗ
 498   ?\ŗ
 499   ?\ī
 500   ?\Ź
 501   ?\Ä
 502   ?\Å
 503   ?\É
 504   ?\æ
 505   ?\Æ
 506   ?\ō
 507   ?\ö
 508   ?\Ģ
 509   ?\¢
 510   ?\Ś
 511   ?\ś
 512   ?\Ö
 513   ?\Ü
 514   ?\ø
 515   ?\£
 516   ?\Ø
 517   ?\×
 518   ?\¤
 519   ?\Ā
 520   ?\Ī
 521   ?\ó
 522   ?\Ż
 523   ?\ż
 524   ?\ź
 525   ?\”
 526   ?\¦
 527   ?\©
 528   ?\®
 529   ?\¬
 530   ?\½
 531   ?\¼
 532   ?\Ł
 533   ?\«
 534   ?\»
 535   ?\░
 536   ?\▒
 537   ?\▓
 538   ?\│
 539   ?\┤
 540   ?\Ą
 541   ?\Č
 542   ?\Ę
 543   ?\Ė
 544   ?\╣
 545   ?\║
 546   ?\╗
 547   ?\╝
 548   ?\Į
 549   ?\Š
 550   ?\┐
 551   ?\└
 552   ?\┴
 553   ?\┬
 554   ?\├
 555   ?\─
 556   ?\┼
 557   ?\Ų
 558   ?\Ū
 559   ?\╚
 560   ?\╔
 561   ?\╩
 562   ?\╦
 563   ?\╠
 564   ?\═
 565   ?\╬
 566   ?\Ž
 567   ?\ą
 568   ?\č
 569   ?\ę
 570   ?\ė
 571   ?\į
 572   ?\š
 573   ?\ų
 574   ?\ū
 575   ?\ž
 576   ?\┘
 577   ?\┌
 578   ?\█
 579   ?\▄
 580   ?\▌
 581   ?\▐
 582   ?\▀
 583   ?\Ó
 584   ?\ß
 585   ?\Ō
 586   ?\Ń
 587   ?\õ
 588   ?\Õ
 589   ?\µ
 590   ?\ń
 591   ?\Ķ
 592   ?\ķ
 593   ?\Ļ
 594   ?\ļ
 595   ?\ņ
 596   ?\Ē
 597   ?\Ņ
 598   ?\’
 599   ?\
 600   ?\±
 601   ?\“
 602   ?\¾
 603   ?\¶
 604   ?\§
 605   ?\÷
 606   ?\„
 607   ?\°
 608   ?\∙
 609   ?\·
 610   ?\¹
 611   ?\³
 612   ?\²
 613   ?\■
 614   ?\ ])
 615
 616 ;;;###autoload(autoload-coding-system 'cp850 '(require 'code-pages))
 617 (cp-make-coding-system
 618  cp850
 619  [?\Ç
 620   ?\ü
 621   ?\é
 622   ?\â
 623   ?\ä
 624   ?\à
 625   ?\å
 626   ?\ç
 627   ?\ê
 628   ?\ë
 629   ?\è
 630   ?\ï
 631   ?\î
 632   ?\ì
 633   ?\Ä
 634   ?\Å
 635   ?\É
 636   ?\æ
 637   ?\Æ
 638   ?\ô
 639   ?\ö
 640   ?\ò
 641   ?\û
 642   ?\ù
 643   ?\ÿ
 644   ?\Ö
 645   ?\Ü
 646   ?\ø
 647   ?\£
 648   ?\Ø
 649   ?\×
 650   ?\ƒ
 651   ?\á
 652   ?\í
 653   ?\ó
 654   ?\ú
 655   ?\ñ
 656   ?\Ñ
 657   ?\ª
 658   ?\º
 659   ?\¿
 660   ?\®
 661   ?\¬
 662   ?\½
 663   ?\¼
 664   ?\¡
 665   ?\«
 666   ?\»
 667   ?\░
 668   ?\▒
 669   ?\▓
 670   ?\│
 671   ?\┤
 672   ?\Á
 673   ?\Â
 674   ?\À
 675   ?\©
 676   ?\╣
 677   ?\║
 678   ?\╗
 679   ?\╝
 680   ?\¢
 681   ?\¥
 682   ?\┐
 683   ?\└
 684   ?\┴
 685   ?\┬
 686   ?\├
 687   ?\─
 688   ?\┼
 689   ?\ã
 690   ?\Ã
 691   ?\╚
 692   ?\╔
 693   ?\╩
 694   ?\╦
 695   ?\╠
 696   ?\═
 697   ?\╬
 698   ?\¤
 699   ?\ð
 700   ?\Ð
 701   ?\Ê
 702   ?\Ë
 703   ?\È
 704   ?\ı
 705   ?\Í
 706   ?\Î
 707   ?\Ï
 708   ?\┘
 709   ?\┌
 710   ?\█
 711   ?\▄
 712   ?\¦
 713   ?\Ì
 714   ?\▀
 715   ?\Ó
 716   ?\ß
 717   ?\Ô
 718   ?\Ò
 719   ?\õ
 720   ?\Õ
 721   ?\µ
 722   ?\þ
 723   ?\Þ
 724   ?\Ú
 725   ?\Û
 726   ?\Ù
 727   ?\ý
 728   ?\Ý
 729   ?\¯
 730   ?\´
 731   ?\
 732   ?\±
 733   ?\‗
 734   ?\¾
 735   ?\¶
 736   ?\§
 737   ?\÷
 738   ?\¸
 739   ?\°
 740   ?\¨
 741   ?\·
 742   ?\¹
 743   ?\³
 744   ?\²
 745   ?\■
 746   ?\ ])
 747
 748 ;;;###autoload(autoload-coding-system 'cp851 '(require 'code-pages))
 749 (cp-make-coding-system
 750  cp851
 751  [?\Ç
 752   ?\ü
 753   ?\é
 754   ?\â
 755   ?\ä
 756   ?\à
 757   ?\Ά
 758   ?\ç
 759   ?\ê
 760   ?\ë
 761   ?\è
 762   ?\ï
 763   ?\î
 764   ?\Έ
 765   ?\Ä
 766   ?\Ή
 767   ?\Ί
 768   nil
 769   ?\Ό
 770   ?\ô
 771   ?\ö
 772   ?\Ύ
 773   ?\û
 774   ?\ù
 775   ?\Ώ
 776   ?\Ö
 777   ?\Ü
 778   ?\ά
 779   ?\£
 780   ?\έ
 781   ?\ή
 782   ?\ί
 783   ?\ϊ
 784   ?\ΐ
 785   ?\ό
 786   ?\ύ
 787   ?\Α
 788   ?\Β
 789   ?\Γ
 790   ?\Δ
 791   ?\Ε
 792   ?\Ζ
 793   ?\Η
 794   ?\½
 795   ?\Θ
 796   ?\Ι
 797   ?\«
 798   ?\»
 799   ?\░
 800   ?\▒
 801   ?\▓
 802   ?\│
 803   ?\┤
 804   ?\Κ
 805   ?\Λ
 806   ?\Ν
 807   ?\Μ
 808   ?\╣
 809   ?\║
 810   ?\╗
 811   ?\╝
 812   ?\Ξ
 813   ?\Ο
 814   ?\┐
 815   ?\└
 816   ?\┴
 817   ?\┬
 818   ?\├
 819   ?\─
 820   ?\┼
 821   ?\Π
 822   ?\Ρ
 823   ?\╚
 824   ?\╔
 825   ?\╩
 826   ?\╦
 827   ?\╠
 828   ?\═
 829   ?\╬
 830   ?\Σ
 831   ?\Τ
 832   ?\Υ
 833   ?\Φ
 834   ?\Χ
 835   ?\Ψ
 836   ?\Ω
 837   ?\α
 838   ?\β
 839   ?\γ
 840   ?\┘
 841   ?\┌
 842   ?\█
 843   ?\▄
 844   ?\δ
 845   ?\ε
 846   ?\▀
 847   ?\ζ
 848   ?\η
 849   ?\θ
 850   ?\ι
 851   ?\κ
 852   ?\λ
 853   ?\μ
 854   ?\ν
 855   ?\ξ
 856   ?\ο
 857   ?\π
 858   ?\ρ
 859   ?\σ
 860   ?\ς
 861   ?\τ
 862   ?\´
 863   ?\
 864   ?\±
 865   ?\υ
 866   ?\φ
 867   ?\χ
 868   ?\§
 869   ?\ψ
 870   ?\˛
 871   ?\°
 872   ?\¨
 873   ?\ω
 874   ?\ϋ
 875   ?\ΰ
 876   ?\ώ
 877   ?\■
 878   ?\ ])
 879
 880 ;;;###autoload(autoload-coding-system 'cp852 '(require 'code-pages))
 881 (cp-make-coding-system
 882  cp852
 883  [?\Ç
 884   ?\ü
 885   ?\é
 886   ?\â
 887   ?\ä
 888   ?\ů
 889   ?\ć
 890   ?\ç
 891   ?\ł
 892   ?\ë
 893   ?\Ő
 894   ?\ő
 895   ?\î
 896   ?\Ź
 897   ?\Ä
 898   ?\Ć
 899   ?\É
 900   ?\Ĺ
 901   ?\ĺ
 902   ?\ô
 903   ?\ö
 904   ?\Ľ
 905   ?\ľ
 906   ?\Ś
 907   ?\ś
 908   ?\Ö
 909   ?\Ü
 910   ?\Ť
 911   ?\ť
 912   ?\Ł
 913   ?\×
 914   ?\č
 915   ?\á
 916   ?\í
 917   ?\ó
 918   ?\ú
 919   ?\Ą
 920   ?\ą
 921   ?\Ž
 922   ?\ž
 923   ?\Ę
 924   ?\ę
 925   ?\¬
 926   ?\ź
 927   ?\Č
 928   ?\ş
 929   ?\«
 930   ?\»
 931   ?\░
 932   ?\▒
 933   ?\▓
 934   ?\│
 935   ?\┤
 936   ?\Á
 937   ?\Â
 938   ?\Ě
 939   ?\Ş
 940   ?\╣
 941   ?\║
 942   ?\╗
 943   ?\╝
 944   ?\Ż
 945   ?\ż
 946   ?\┐
 947   ?\└
 948   ?\┴
 949   ?\┬
 950   ?\├
 951   ?\─
 952   ?\┼
 953   ?\Ă
 954   ?\ă
 955   ?\╚
 956   ?\╔
 957   ?\╩
 958   ?\╦
 959   ?\╠
 960   ?\═
 961   ?\╬
 962   ?\¤
 963   ?\đ
 964   ?\Đ
 965   ?\Ď
 966   ?\Ë
 967   ?\ď
 968   ?\Ň
 969   ?\Í
 970   ?\Î
 971   ?\ě
 972   ?\┘
 973   ?\┌
 974   ?\█
 975   ?\▄
 976   ?\Ţ
 977   ?\Ů
 978   ?\▀
 979   ?\Ó
 980   ?\ß
 981   ?\Ô
 982   ?\Ń
 983   ?\ń
 984   ?\ň
 985   ?\Š
 986   ?\š
 987   ?\Ŕ
 988   ?\Ú
 989   ?\ŕ
 990   ?\Ű
 991   ?\ý
 992   ?\Ý
 993   ?\ţ
 994   ?\´
 995   ?\
 996   ?\˝
 997   ?\˛
 998   ?\ˇ
 999   ?\˘
1000   ?\§
1001   ?\÷
1002   ?\¸
1003   ?\°
1004   ?\¨
1005   ?\˙
1006   ?\ű
1007   ?\Ř
1008   ?\ř
1009   ?\■
1010   ?\ ])
1011
1012 ;;;###autoload(autoload-coding-system 'cp855 '(require 'code-pages))
1013 (cp-make-coding-system
1014  cp855
1015  [?\ђ
1016   ?\Ђ
1017   ?\ѓ
1018   ?\Ѓ
1019   ?\ё
1020   ?\Ё
1021   ?\є
1022   ?\Є
1023   ?\ѕ
1024   ?\Ѕ
1025   ?\і
1026   ?\І
1027   ?\ї
1028   ?\Ї
1029   ?\ј
1030   ?\Ј
1031   ?\љ
1032   ?\Љ
1033   ?\њ
1034   ?\Њ
1035   ?\ћ
1036   ?\Ћ
1037   ?\ќ
1038   ?\Ќ
1039   ?\ў
1040   ?\Ў
1041   ?\џ
1042   ?\Џ
1043   ?\ю
1044   ?\Ю
1045   ?\ъ
1046   ?\Ъ
1047   ?\а
1048   ?\А
1049   ?\б
1050   ?\Б
1051   ?\ц
1052   ?\Ц
1053   ?\д
1054   ?\Д
1055   ?\е
1056   ?\Е
1057   ?\ф
1058   ?\Ф
1059   ?\г
1060   ?\Г
1061   ?\«
1062   ?\»
1063   ?\░
1064   ?\▒
1065   ?\▓
1066   ?\│
1067   ?\┤
1068   ?\х
1069   ?\Х
1070   ?\и
1071   ?\И
1072   ?\╣
1073   ?\║
1074   ?\╗
1075   ?\╝
1076   ?\й
1077   ?\Й
1078   ?\┐
1079   ?\└
1080   ?\┴
1081   ?\┬
1082   ?\├
1083   ?\─
1084   ?\┼
1085   ?\к
1086   ?\К
1087   ?\╚
1088   ?\╔
1089   ?\╩
1090   ?\╦
1091   ?\╠
1092   ?\═
1093   ?\╬
1094   ?\¤
1095   ?\л
1096   ?\Л
1097   ?\м
1098   ?\М
1099   ?\н
1100   ?\Н
1101   ?\о
1102   ?\О
1103   ?\п
1104   ?\┘
1105   ?\┌
1106   ?\█
1107   ?\▄
1108   ?\П
1109   ?\я
1110   ?\▀
1111   ?\Я
1112   ?\р
1113   ?\Р
1114   ?\с
1115   ?\С
1116   ?\т
1117   ?\Т
1118   ?\у
1119   ?\У
1120   ?\ж
1121   ?\Ж
1122   ?\в
1123   ?\В
1124   ?\ь
1125   ?\Ь
1126   ?\´
1127   ?\
1128   ?\ы
1129   ?\Ы
1130   ?\з
1131   ?\З
1132   ?\ш
1133   ?\Ш
1134   ?\э
1135   ?\Э
1136   ?\щ
1137   ?\Щ
1138   ?\ч
1139   ?\Ч
1140   nil
1141   ?\■
1142   ?\ ])
1143
1144 ;;;###autoload(autoload-coding-system 'cp857 '(require 'code-pages))
1145 (cp-make-coding-system
1146  cp857
1147  [?\Ç
1148   ?\ü
1149   ?\é
1150   ?\â
1151   ?\ä
1152   ?\à
1153   ?\å
1154   ?\ç
1155   ?\ê
1156   ?\ë
1157   ?\è
1158   ?\ï
1159   ?\î
1160   ?\ı
1161   ?\Ä
1162   ?\Å
1163   ?\É
1164   ?\æ
1165   ?\Æ
1166   ?\ô
1167   ?\ö
1168   ?\ò
1169   ?\û
1170   ?\ù
1171   ?\İ
1172   ?\Ö
1173   ?\Ü
1174   ?\ø
1175   ?\£
1176   ?\Ø
1177   ?\Ş
1178   ?\ş
1179   ?\á
1180   ?\í
1181   ?\ó
1182   ?\ú
1183   ?\ñ
1184   ?\Ñ
1185   ?\Ğ
1186   ?\ğ
1187   ?\¿
1188   ?\®
1189   ?\¬
1190   ?\½
1191   ?\¼
1192   ?\¡
1193   ?\«
1194   ?\»
1195   ?\░
1196   ?\▒
1197   ?\▓
1198   ?\│
1199   ?\┤
1200   ?\Á
1201   ?\Â
1202   ?\À
1203   ?\©
1204   ?\╣
1205   ?\║
1206   ?\╗
1207   ?\╝
1208   ?\¢
1209   ?\¥
1210   ?\┐
1211   ?\└
1212   ?\┴
1213   ?\┬
1214   ?\├
1215   ?\─
1216   ?\┼
1217   ?\ã
1218   ?\Ã
1219   ?\╚
1220   ?\╔
1221   ?\╩
1222   ?\╦
1223   ?\╠
1224   ?\═
1225   ?\╬
1226   ?\¤
1227   ?\º
1228   ?\ª
1229   ?\Ê
1230   ?\Ë
1231   ?\È
1232   nil
1233   ?\Í
1234   ?\Î
1235   ?\Ï
1236   ?\┘
1237   ?\┌
1238   ?\█
1239   ?\▄
1240   ?\¦
1241   ?\Ì
1242   ?\▀
1243   ?\Ó
1244   ?\ß
1245   ?\Ô
1246   ?\Ò
1247   ?\õ
1248   ?\Õ
1249   ?\µ
1250   nil
1251   ?\×
1252   ?\Ú
1253   ?\Û
1254   ?\Ù
1255   ?\ì
1256   ?\ÿ
1257   ?\—
1258   ?\´
1259   ?\
1260   ?\±
1261   nil
1262   ?\¾
1263   ?\¶
1264   ?\§
1265   ?\÷
1266   ?\˛
1267   ?\°
1268   ?\¨
1269   ?\˙
1270   ?\¹
1271   ?\³
1272   ?\²
1273   ?\■
1274   ?\ ])
1275
1276 ;;;###autoload(autoload-coding-system 'cp860 '(require 'code-pages))
1277 (cp-make-coding-system
1278  cp860
1279  [?\Ç
1280   ?\ü
1281   ?\é
1282   ?\â
1283   ?\ã
1284   ?\à
1285   ?\Á
1286   ?\ç
1287   ?\ê
1288   ?\Ê
1289   ?\è
1290   ?\Î
1291   ?\Ô
1292   ?\ì
1293   ?\Ã
1294   ?\Â
1295   ?\É
1296   ?\À
1297   ?\È
1298   ?\ô
1299   ?\õ
1300   ?\ò
1301   ?\Ú
1302   ?\ù
1303   ?\Ì
1304   ?\Õ
1305   ?\Ü
1306   ?\¢
1307   ?\£
1308   ?\Ù
1309   ?\₧
1310   ?\Ò
1311   ?\á
1312   ?\í
1313   ?\ó
1314   ?\ú
1315   ?\ñ
1316   ?\Ñ
1317   ?\ª
1318   ?\º
1319   ?\¿
1320   ?\Ó
1321   ?\¬
1322   ?\½
1323   ?\¼
1324   ?\¡
1325   ?\«
1326   ?\»
1327   ?\░
1328   ?\▒
1329   ?\▓
1330   ?\│
1331   ?\┤
1332   ?\╡
1333   ?\╢
1334   ?\╖
1335   ?\╕
1336   ?\╣
1337   ?\║
1338   ?\╗
1339   ?\╝
1340   ?\╜
1341   ?\╛
1342   ?\┐
1343   ?\└
1344   ?\┴
1345   ?\┬
1346   ?\├
1347   ?\─
1348   ?\┼
1349   ?\╞
1350   ?\╟
1351   ?\╚
1352   ?\╔
1353   ?\╩
1354   ?\╦
1355   ?\╠
1356   ?\═
1357   ?\╬
1358   ?\╧
1359   ?\╨
1360   ?\╤
1361   ?\╥
1362   ?\╙
1363   ?\╘
1364   ?\╒
1365   ?\╓
1366   ?\╫
1367   ?\╪
1368   ?\┘
1369   ?\┌
1370   ?\█
1371   ?\▄
1372   ?\▌
1373   ?\▐
1374   ?\▀
1375   ?\α
1376   ?\ß
1377   ?\Γ
1378   ?\π
1379   ?\Σ
1380   ?\σ
1381   ?\µ
1382   ?\τ
1383   ?\Φ
1384   ?\Θ
1385   ?\Ω
1386   ?\δ
1387   ?\∞
1388   ?\φ
1389   ?\ε
1390   ?\∩
1391   ?\≡
1392   ?\±
1393   ?\≥
1394   ?\≤
1395   ?\⌠
1396   ?\⌡
1397   ?\÷
1398   ?\≈
1399   ?\°
1400   ?\·
1401   ?\•
1402   ?\√
1403   ?\ⁿ
1404   ?\²
1405   ?\■
1406   ?\ ])
1407
1408 ;;;###autoload(autoload-coding-system 'cp861 '(require 'code-pages))
1409 (cp-make-coding-system
1410  cp861
1411  [?\Ç
1412   ?\ü
1413   ?\é
1414   ?\â
1415   ?\ä
1416   ?\à
1417   ?\å
1418   ?\ç
1419   ?\ê
1420   ?\ë
1421   ?\è
1422   ?\Ð
1423   ?\ð
1424   ?\Þ
1425   ?\Ä
1426   ?\Å
1427   ?\É
1428   ?\æ
1429   ?\Æ
1430   ?\ô
1431   ?\ö
1432   ?\þ
1433   ?\û
1434   ?\Ý
1435   ?\ý
1436   ?\Ö
1437   ?\Ü
1438   ?\ø
1439   ?\£
1440   ?\Ø
1441   ?\₧
1442   ?\Ò
1443   ?\á
1444   ?\í
1445   ?\ó
1446   ?\ú
1447   ?\Á
1448   ?\Í
1449   ?\Ó
1450   ?\Ú
1451   ?\¿
1452   nil
1453   ?\¬
1454   ?\½
1455   ?\¼
1456   ?\¡
1457   ?\«
1458   ?\»
1459   ?\░
1460   ?\▒
1461   ?\▓
1462   ?\│
1463   ?\┤
1464   ?\╡
1465   ?\╢
1466   ?\╖
1467   ?\╕
1468   ?\╣
1469   ?\║
1470   ?\╗
1471   ?\╝
1472   ?\╜
1473   ?\╛
1474   ?\┐
1475   ?\└
1476   ?\┴
1477   ?\┬
1478   ?\├
1479   ?\─
1480   ?\┼
1481   ?\╞
1482   ?\╟
1483   ?\╚
1484   ?\╔
1485   ?\╩
1486   ?\╦
1487   ?\╠
1488   ?\═
1489   ?\╬
1490   ?\╧
1491   ?\╨
1492   ?\╤
1493   ?\╥
1494   ?\╙
1495   ?\╘
1496   ?\╒
1497   ?\╓
1498   ?\╫
1499   ?\╪
1500   ?\┘
1501   ?\┌
1502   ?\█
1503   ?\▄
1504   ?\▌
1505   ?\▐
1506   ?\▀
1507   ?\α
1508   ?\ß
1509   ?\Γ
1510   ?\π
1511   ?\Σ
1512   ?\σ
1513   ?\µ
1514   ?\τ
1515   ?\Φ
1516   ?\Θ
1517   ?\Ω
1518   ?\δ
1519   ?\∞
1520   ?\φ
1521   ?\ε
1522   ?\∩
1523   ?\≡
1524   ?\±
1525   ?\≥
1526   ?\≤
1527   ?\⌠
1528   ?\⌡
1529   ?\÷
1530   ?\≈
1531   ?\°
1532   ?\·
1533   ?\•
1534   ?\√
1535   ?\ⁿ
1536   ?\²
1537   ?\■
1538   ?\ ])
1539
1540 ;;;###autoload(autoload-coding-system 'cp862 '(require 'code-pages))
1541 (cp-make-coding-system
1542  cp862
1543  [?\א
1544   ?\ב
1545   ?\ג
1546   ?\ד
1547   ?\ה
1548   ?\ו
1549   ?\ז
1550   ?\ח
1551   ?\ט
1552   ?\י
1553   ?\ך
1554   ?\כ
1555   ?\ל
1556   ?\ם
1557   ?\מ
1558   ?\ן
1559   ?\נ
1560   ?\ס
1561   ?\ע
1562   ?\ף
1563   ?\פ
1564   ?\ץ
1565   ?\צ
1566   ?\ק
1567   ?\ר
1568   ?\ש
1569   ?\ת
1570   ?\¢
1571   ?\£
1572   ?\Ù
1573   ?\₧
1574   ?\Ò
1575   ?\á
1576   ?\í
1577   ?\ó
1578   ?\ú
1579   ?\ñ
1580   ?\Ñ
1581   ?\ª
1582   ?\º
1583   ?\¿
1584   nil
1585   ?\¬
1586   ?\½
1587   ?\¼
1588   ?\¡
1589   ?\«
1590   ?\»
1591   ?\░
1592   ?\▒
1593   ?\▓
1594   ?\│
1595   ?\┤
1596   ?\╡
1597   ?\╢
1598   ?\╖
1599   ?\╕
1600   ?\╣
1601   ?\║
1602   ?\╗
1603   ?\╝
1604   ?\╜
1605   ?\╛
1606   ?\┐
1607   ?\└
1608   ?\┴
1609   ?\┬
1610   ?\├
1611   ?\─
1612   ?\┼
1613   ?\╞
1614   ?\╟
1615   ?\╚
1616   ?\╔
1617   ?\╩
1618   ?\╦
1619   ?\╠
1620   ?\═
1621   ?\╬
1622   ?\╧
1623   ?\╨
1624   ?\╤
1625   ?\╥
1626   ?\╙
1627   ?\╘
1628   ?\╒
1629   ?\╓
1630   ?\╫
1631   ?\╪
1632   ?\┘
1633   ?\┌
1634   ?\█
1635   ?\▄
1636   ?\▌
1637   ?\▐
1638   ?\▀
1639   ?\α
1640   ?\ß
1641   ?\Γ
1642   ?\π
1643   ?\Σ
1644   ?\σ
1645   ?\µ
1646   ?\τ
1647   ?\Φ
1648   ?\Θ
1649   ?\Ω
1650   ?\δ
1651   ?\∞
1652   ?\φ
1653   ?\ε
1654   ?\∩
1655   ?\≡
1656   ?\±
1657   ?\≥
1658   ?\≤
1659   ?\⌠
1660   ?\⌡
1661   ?\÷
1662   ?\≈
1663   ?\°
1664   ?\·
1665   ?\•
1666   ?\√
1667   ?\ⁿ
1668   ?\²
1669   ?\■
1670   ?\ ])
1671
1672 ;;;###autoload(autoload-coding-system 'cp863 '(require 'code-pages))
1673 (cp-make-coding-system
1674  cp863
1675  [?\Ç
1676   ?\ü
1677   ?\é
1678   ?\â
1679   ?\Â
1680   ?\à
1681   ?\¶
1682   ?\ç
1683   ?\ê
1684   ?\ë
1685   ?\è
1686   ?\ï
1687   ?\î
1688   ?\ì
1689   ?\À
1690   ?\§
1691   ?\É
1692   ?\È
1693   ?\Ê
1694   ?\ô
1695   ?\Ë
1696   ?\Ï
1697   ?\û
1698   ?\ù
1699   ?\¤
1700   ?\Ô
1701   ?\Ü
1702   ?\¢
1703   ?\£
1704   ?\Ù
1705   ?\Û
1706   ?\ƒ
1707   ?\¦
1708   ?\´
1709   ?\ó
1710   ?\ú
1711   ?\¨
1712   ?\¸
1713   ?\³
1714   ?\¯
1715   ?\Î
1716   ?\⌐
1717   ?\¬
1718   ?\½
1719   ?\¼
1720   ?\¾
1721   ?\«
1722   ?\»
1723   ?\░
1724   ?\▒
1725   ?\▓
1726   ?\│
1727   ?\┤
1728   ?\╡
1729   ?\╢
1730   ?\╖
1731   ?\╕
1732   ?\╣
1733   ?\║
1734   ?\╗
1735   ?\╝
1736   ?\╜
1737   ?\╛
1738   ?\┐
1739   ?\└
1740   ?\┴
1741   ?\┬
1742   ?\├
1743   ?\─
1744   ?\┼
1745   ?\╞
1746   ?\╟
1747   ?\╚
1748   ?\╔
1749   ?\╩
1750   ?\╦
1751   ?\╠
1752   ?\═
1753   ?\╬
1754   ?\╧
1755   ?\╨
1756   ?\╤
1757   ?\╥
1758   ?\╙
1759   ?\╘
1760   ?\╒
1761   ?\╓
1762   ?\╫
1763   ?\╪
1764   ?\┘
1765   ?\┌
1766   ?\█
1767   ?\▄
1768   ?\▌
1769   ?\▐
1770   ?\▀
1771   ?\α
1772   ?\ß
1773   ?\Γ
1774   ?\π
1775   ?\Σ
1776   ?\σ
1777   ?\µ
1778   ?\τ
1779   ?\Φ
1780   ?\Θ
1781   ?\Ω
1782   ?\δ
1783   ?\∞
1784   ?\∅
1785   ?\ε
1786   ?\∩
1787   ?\≡
1788   ?\±
1789   ?\≥
1790   ?\≤
1791   ?\⌠
1792   ?\⌡
1793   ?\÷
1794   ?\≈
1795   ?\∘
1796   ?\·
1797   ?\•
1798   ?\√
1799   ?\ⁿ
1800   ?\²
1801   ?\■
1802   ?\ ])
1803
1804 ;;;###autoload(autoload-coding-system 'cp864 '(require 'code-pages))
1805 (cp-make-coding-system
1806  cp864
1807  [?\°
1808   ?\·
1809   ?\∘
1810   ?\√
1811   ?\▒
1812   ?\─
1813   ?\│
1814   ?\┼
1815   ?\┤
1816   ?\┬
1817   ?\├
1818   ?\┴
1819   ?\┐
1820   ?\┌
1821   ?\└
1822   ?\┘
1823   ?\ß
1824   ?\∞
1825   ?\ø
1826   ?\±
1827   ?\½
1828   ?\¼
1829   ?\≈
1830   ?\«
1831   ?\»
1832   ?\ﻷ
1833   ?\ﻸ
1834   nil
1835   nil
1836   ?\ﻻ
1837   ?\ﻼ
1838   ?\
1839   nil
1840   ?\
1841   ?\ﺂ
1842   ?\£
1843   ?\¤
1844   ?\ﺄ
1845   nil
1846   nil
1847   ?\ﺎ
1848   ?\ب
1849   ?\ت
1850   ?\ث
1851   ?\،
1852   ?\ج
1853   ?\ح
1854   ?\خ
1855   ?\٠
1856   ?\١
1857   ?\٢
1858   ?\٣
1859   ?\٤
1860   ?\٥
1861   ?\٦
1862   ?\٧
1863   ?\٨
1864   ?\٩
1865   ?\ڤ
1866   ?\؛
1867   ?\س
1868   ?\ش
1869   ?\ص
1870   ?\؟
1871   ?\¢
1872   ?\ء
1873   ?\آ
1874   ?\أ
1875   ?\ؤ
1876   ?\ﻊ
1877   ?\ئ
1878   ?\ا
1879   ?\ﺑ
1880   ?\ة
1881   ?\ﺗ
1882   ?\ﺛ
1883   ?\ﺟ
1884   ?\ﺣ
1885   ?\ﺧ
1886   ?\د
1887   ?\ذ
1888   ?\ر
1889   ?\ز
1890   ?\ﺳ
1891   ?\ﺷ
1892   ?\ﺻ
1893   ?\ﺿ
1894   ?\ط
1895   ?\ظ
1896   ?\ﻋ
1897   ?\ﻏ
1898   ?\¦
1899   ?\¬
1900   ?\÷
1901   ?\×
1902   ?\ع
1903   ?\ـ
1904   ?\ﻒ
1905   ?\ﻖ
1906   ?\ﻛ
1907   ?\ﻞ
1908   ?\ﻣ
1909   ?\ﻦ
1910   ?\ﻫ
1911   ?\و
1912   ?\ى
1913   ?\ﻳ
1914   ?\ض
1915   ?\ﻢ
1916   ?\ﻎ
1917   ?\غ
1918   ?\م
1919   ?\ﹽ
1920   ?\ّ
1921   ?\ن
1922   ?\ه
1923   ?\ﻬ
1924   ?\ﻰ
1925   ?\ﻲ
1926   ?\ف
1927   ?\ق
1928   ?\ﻵ
1929   ?\ﻶ
1930   ?\ل
1931   ?\ك
1932   ?\ي
1933   ?\■
1934   ?\ ])
1935
1936 ;;;###autoload(autoload-coding-system 'cp865 '(require 'code-pages))
1937 (cp-make-coding-system
1938  cp865
1939  [?\Ç
1940   ?\ü
1941   ?\é
1942   ?\â
1943   ?\ä
1944   ?\à
1945   ?\å
1946   ?\ç
1947   ?\ê
1948   ?\ë
1949   ?\è
1950   ?\ï
1951   ?\î
1952   ?\ì
1953   ?\Ä
1954   ?\Å
1955   ?\É
1956   ?\æ
1957   ?\Æ
1958   ?\ô
1959   ?\ö
1960   ?\ò
1961   ?\û
1962   ?\ù
1963   ?\ÿ
1964   ?\Ö
1965   ?\Ü
1966   ?\ø
1967   ?\£
1968   ?\Ø
1969   ?\₧
1970   ?\ƒ
1971   ?\á
1972   ?\í
1973   ?\ó
1974   ?\ú
1975   ?\ñ
1976   ?\Ñ
1977   ?\ª
1978   ?\º
1979   ?\¿
1980   ?\⌐
1981   ?\¬
1982   ?\½
1983   ?\¼
1984   ?\¡
1985   ?\«
1986   ?\»
1987   ?\░
1988   ?\▒
1989   ?\▓
1990   ?\│
1991   ?\┤
1992   ?\╡
1993   ?\╢
1994   ?\╖
1995   ?\╕
1996   ?\╣
1997   ?\║
1998   ?\╗
1999   ?\╝
2000   ?\╜
2001   ?\╛
2002   ?\┐
2003   ?\└
2004   ?\┴
2005   ?\┬
2006   ?\├
2007   ?\─
2008   ?\┼
2009   ?\╞
2010   ?\╟
2011   ?\╚
2012   ?\╔
2013   ?\╩
2014   ?\╦
2015   ?\╠
2016   ?\═
2017   ?\╬
2018   ?\╧
2019   ?\╨
2020   ?\╤
2021   ?\╥
2022   ?\╙
2023   ?\╘
2024   ?\╒
2025   ?\╓
2026   ?\╫
2027   ?\╪
2028   ?\┘
2029   ?\┌
2030   ?\█
2031   ?\▄
2032   ?\▌
2033   ?\▐
2034   ?\▀
2035   ?\α
2036   ?\ß
2037   ?\Γ
2038   ?\π
2039   ?\Σ
2040   ?\σ
2041   ?\µ
2042   ?\τ
2043   ?\Φ
2044   ?\Θ
2045   ?\Ω
2046   ?\δ
2047   ?\∞
2048   ?\∅
2049   ?\ε
2050   ?\∩
2051   ?\≡
2052   ?\±
2053   ?\≥
2054   ?\≤
2055   ?\⌠
2056   ?\⌡
2057   ?\÷
2058   ?\≈
2059   ?\∘
2060   ?\·
2061   ?\•
2062   ?\√
2063   ?\ⁿ
2064   ?\²
2065   ?\■
2066   ?\ ])
2067
2068 ;;;###autoload(autoload-coding-system 'cp866 '(require 'code-pages))
2069 (cp-make-coding-system
2070  cp866
2071  [?\А
2072   ?\Б
2073   ?\В
2074   ?\Г
2075   ?\Д
2076   ?\Е
2077   ?\Ж
2078   ?\З
2079   ?\И
2080   ?\Й
2081   ?\К
2082   ?\Л
2083   ?\М
2084   ?\Н
2085   ?\О
2086   ?\П
2087   ?\Р
2088   ?\С
2089   ?\Т
2090   ?\У
2091   ?\Ф
2092   ?\Х
2093   ?\Ц
2094   ?\Ч
2095   ?\Ш
2096   ?\Щ
2097   ?\Ъ
2098   ?\Ы
2099   ?\Ь
2100   ?\Э
2101   ?\Ю
2102   ?\Я
2103   ?\а
2104   ?\б
2105   ?\в
2106   ?\г
2107   ?\д
2108   ?\е
2109   ?\ж
2110   ?\з
2111   ?\и
2112   ?\й
2113   ?\к
2114   ?\л
2115   ?\м
2116   ?\н
2117   ?\о
2118   ?\п
2119   ?\░
2120   ?\▒
2121   ?\▓
2122   ?\│
2123   ?\┤
2124   ?\╡
2125   ?\╢
2126   ?\╖
2127   ?\╕
2128   ?\╣
2129   ?\║
2130   ?\╗
2131   ?\╝
2132   ?\╜
2133   ?\╛
2134   ?\┐
2135   ?\└
2136   ?\┴
2137   ?\┬
2138   ?\├
2139   ?\─
2140   ?\┼
2141   ?\╞
2142   ?\╟
2143   ?\╚
2144   ?\╔
2145   ?\╩
2146   ?\╦
2147   ?\╠
2148   ?\═
2149   ?\╬
2150   ?\╧
2151   ?\╨
2152   ?\╤
2153   ?\╥
2154   ?\╙
2155   ?\╘
2156   ?\╒
2157   ?\╓
2158   ?\╫
2159   ?\╪
2160   ?\┘
2161   ?\┌
2162   ?\█
2163   ?\▄
2164   ?\▌
2165   ?\▐
2166   ?\▀
2167   ?\р
2168   ?\с
2169   ?\т
2170   ?\у
2171   ?\ф
2172   ?\х
2173   ?\ц
2174   ?\ч
2175   ?\ш
2176   ?\щ
2177   ?\ъ
2178   ?\ы
2179   ?\ь
2180   ?\э
2181   ?\ю
2182   ?\я
2183   ?\Ё
2184   ?\ё
2185   ?\Є
2186   ?\є
2187   ?\Ї
2188   ?\ї
2189   ?\Ў
2190   ?\ў
2191   ?\°
2192   ?\∙
2193   ?\·
2194   ?\√
2195   ?\№
2196   ?\¤
2197   ?\■
2198   ?\ ]
2199  "CP866 (Cyrillic)."
2200  ?A)
2201
2202 ;;;###autoload(autoload-coding-system 'cp869 '(require 'code-pages))
2203 (cp-make-coding-system
2204  cp869
2205  [nil
2206   nil
2207   nil
2208   nil
2209   nil
2210   nil
2211   ?\Ά
2212   nil
2213   ?\·
2214   ?\¬
2215   ?\¦
2216   ?\‛
2217   ?\’
2218   ?\Έ
2219   ?\—
2220   ?\Ή
2221   ?\Ί
2222   ?\Ϊ
2223   ?\Ό
2224   nil
2225   nil
2226   ?\Ύ
2227   ?\Ϋ
2228   ?\©
2229   ?\Ώ
2230   ?\²
2231   ?\³
2232   ?\ά
2233   ?\£
2234   ?\έ
2235   ?\ή
2236   ?\ί
2237   ?\ϊ
2238   ?\ΐ
2239   ?\ό
2240   ?\ύ
2241   ?\Α
2242   ?\Β
2243   ?\Γ
2244   ?\Δ
2245   ?\Ε
2246   ?\Ζ
2247   ?\Η
2248   ?\½
2249   ?\Θ
2250   ?\Ι
2251   ?\«
2252   ?\»
2253   ?\░
2254   ?\▒
2255   ?\▓
2256   ?\│
2257   ?\┤
2258   ?\Κ
2259   ?\Λ
2260   ?\Μ
2261   ?\Ν
2262   ?\╣
2263   ?\║
2264   ?\╗
2265   ?\╝
2266   ?\Ξ
2267   ?\Ο
2268   ?\┐
2269   ?\└
2270   ?\┴
2271   ?\┬
2272   ?\├
2273   ?\─
2274   ?\┼
2275   ?\Π
2276   ?\Ρ
2277   ?\╚
2278   ?\╔
2279   ?\╩
2280   ?\╦
2281   ?\╠
2282   ?\═
2283   ?\╬
2284   ?\Σ
2285   ?\Τ
2286   ?\Υ
2287   ?\Φ
2288   ?\Χ
2289   ?\Ψ
2290   ?\Ω
2291   ?\α
2292   ?\β
2293   ?\γ
2294   ?\┘
2295   ?\┌
2296   ?\█
2297   ?\▄
2298   ?\δ
2299   ?\ε
2300   ?\▀
2301   ?\ζ
2302   ?\η
2303   ?\θ
2304   ?\ι
2305   ?\κ
2306   ?\λ
2307   ?\μ
2308   ?\ν
2309   ?\ξ
2310   ?\ο
2311   ?\π
2312   ?\ρ
2313   ?\σ
2314   ?\ς
2315   ?\τ
2316   ?\´
2317   ?\
2318   ?\±
2319   ?\υ
2320   ?\φ
2321   ?\χ
2322   ?\§
2323   ?\ψ
2324   ?\΅
2325   ?\°
2326   ?\¨
2327   ?\ω
2328   ?\ϋ
2329   ?\ΰ
2330   ?\ώ
2331   ?\■
2332   ?\ ])
2333
2334 ;;;###autoload(autoload-coding-system 'cp874 '(require 'code-pages))
2335 (cp-make-coding-system
2336  cp874
2337  [?\€
2338   nil
2339   nil
2340   nil
2341   nil
2342   ?\…
2343   nil
2344   nil
2345   nil
2346   nil
2347   nil
2348   nil
2349   nil
2350   nil
2351   nil
2352   nil
2353   nil
2354   ?\‘
2355   ?\’
2356   ?\“
2357   ?\”
2358   ?\•
2359   ?\–
2360   ?\—
2361   nil
2362   nil
2363   nil
2364   nil
2365   nil
2366   nil
2367   nil
2368   nil
2369   ?\
2370   ?\ก
2371   ?\ข
2372   ?\ฃ
2373   ?\ค
2374   ?\ฅ
2375   ?\ฆ
2376   ?\ง
2377   ?\จ
2378   ?\ฉ
2379   ?\ช
2380   ?\ซ
2381   ?\ฌ
2382   ?\ญ
2383   ?\ฎ
2384   ?\ฏ
2385   ?\ฐ
2386   ?\ฑ
2387   ?\ฒ
2388   ?\ณ
2389   ?\ด
2390   ?\ต
2391   ?\ถ
2392   ?\ท
2393   ?\ธ
2394   ?\น
2395   ?\บ
2396   ?\ป
2397   ?\ผ
2398   ?\ฝ
2399   ?\พ
2400   ?\ฟ
2401   ?\ภ
2402   ?\ม
2403   ?\ย
2404   ?\ร
2405   ?\ฤ
2406   ?\ล
2407   ?\ฦ
2408   ?\ว
2409   ?\ศ
2410   ?\ษ
2411   ?\ส
2412   ?\ห
2413   ?\ฬ
2414   ?\อ
2415   ?\ฮ
2416   ?\ฯ
2417   ?\ะ
2418   ?\ั
2419   ?\า
2420   ?\ำ
2421   ?\ิ
2422   ?\ี
2423   ?\ึ
2424   ?\ื
2425   ?\ุ
2426   ?\ู
2427   ?\ฺ
2428   nil
2429   nil
2430   nil
2431   nil
2432   ?\฿
2433   ?\เ
2434   ?\แ
2435   ?\โ
2436   ?\ใ
2437   ?\ไ
2438   ?\ๅ
2439   ?\ๆ
2440   ?\็
2441   ?\่
2442   ?\้
2443   ?\๊
2444   ?\๋
2445   ?\์
2446   ?\ํ
2447   ?\๎
2448   ?\๏
2449   ?\๐
2450   ?\๑
2451   ?\๒
2452   ?\๓
2453   ?\๔
2454   ?\๕
2455   ?\๖
2456   ?\๗
2457   ?\๘
2458   ?\๙
2459   ?\๚
2460   ?\๛
2461   nil
2462   nil
2463   nil
2464   nil])
2465
2466 ;;;###autoload(autoload-coding-system 'windows-1250 '(require 'code-pages))
2467 (cp-make-coding-system
2468  windows-1250
2469  [?\€
2470   nil
2471   ?\‚
2472   nil
2473   ?\„
2474   ?\…
2475   ?\†
2476   ?\‡
2477   nil
2478   ?\‰
2479   ?\Š
2480   ?\‹
2481   ?\Ś
2482   ?\Ť
2483   ?\Ž
2484   ?\Ź
2485   nil
2486   ?\‘
2487   ?\’
2488   ?\“
2489   ?\”
2490   ?\•
2491   ?\–
2492   ?\—
2493   nil
2494   ?\™
2495   ?\š
2496   ?\›
2497   ?\ś
2498   ?\ť
2499   ?\ž
2500   ?\ź
2501   ?\
2502   ?\ˇ
2503   ?\˘
2504   ?\Ł
2505   ?\¤
2506   ?\Ą
2507   ?\¦
2508   ?\§
2509   ?\¨
2510   ?\©
2511   ?\Ş
2512   ?\«
2513   ?\¬
2514   ?\
2515   ?\®
2516   ?\Ż
2517   ?\°
2518   ?\±
2519   ?\˛
2520   ?\ł
2521   ?\´
2522   ?\µ
2523   ?\¶
2524   ?\·
2525   ?\¸
2526   ?\ą
2527   ?\ş
2528   ?\»
2529   ?\Ľ
2530   ?\˝
2531   ?\ľ
2532   ?\ż
2533   ?\Ŕ
2534   ?\Á
2535   ?\Â
2536   ?\Ă
2537   ?\Ä
2538   ?\Ĺ
2539   ?\Ć
2540   ?\Ç
2541   ?\Č
2542   ?\É
2543   ?\Ę
2544   ?\Ë
2545   ?\Ě
2546   ?\Í
2547   ?\Î
2548   ?\Ď
2549   ?\Đ
2550   ?\Ń
2551   ?\Ň
2552   ?\Ó
2553   ?\Ô
2554   ?\Ő
2555   ?\Ö
2556   ?\×
2557   ?\Ř
2558   ?\Ů
2559   ?\Ú
2560   ?\Ű
2561   ?\Ü
2562   ?\Ý
2563   ?\Ţ
2564   ?\ß
2565   ?\ŕ
2566   ?\á
2567   ?\â
2568   ?\ă
2569   ?\ä
2570   ?\ĺ
2571   ?\ć
2572   ?\ç
2573   ?\č
2574   ?\é
2575   ?\ę
2576   ?\ë
2577   ?\ě
2578   ?\í
2579   ?\î
2580   ?\ď
2581   ?\đ
2582   ?\ń
2583   ?\ň
2584   ?\ó
2585   ?\ô
2586   ?\ő
2587   ?\ö
2588   ?\÷
2589   ?\ř
2590   ?\ů
2591   ?\ú
2592   ?\ű
2593   ?\ü
2594   ?\ý
2595   ?\ţ
2596   ?\˙])
2597
2598 ;;;###autoload(autoload-coding-system 'windows-1253 '(require 'code-pages))
2599 (cp-make-coding-system
2600  windows-1253
2601  [?\€
2602   nil
2603   ?\‚
2604   ?\ƒ
2605   ?\„
2606   ?\…
2607   ?\†
2608   ?\‡
2609   nil
2610   ?\‰
2611   nil
2612   ?\‹
2613   nil
2614   nil
2615   nil
2616   nil
2617   nil
2618   ?\‘
2619   ?\’
2620   ?\“
2621   ?\”
2622   ?\•
2623   ?\–
2624   ?\—
2625   nil
2626   ?\™
2627   nil
2628   ?\›
2629   nil
2630   nil
2631   nil
2632   nil
2633   ?\
2634   ?\΅
2635   ?\Ά
2636   ?\£
2637   ?\¤
2638   ?\¥
2639   ?\¦
2640   ?\§
2641   ?\¨
2642   ?\©
2643   nil
2644   ?\«
2645   ?\¬
2646   ?\
2647   ?\®
2648   ?\―
2649   ?\°
2650   ?\±
2651   ?\²
2652   ?\³
2653   ?\΄
2654   ?\µ
2655   ?\¶
2656   ?\·
2657   ?\Έ
2658   ?\Ή
2659   ?\Ί
2660   ?\»
2661   ?\Ό
2662   ?\½
2663   ?\Ύ
2664   ?\Ώ
2665   ?\ΐ
2666   ?\Α
2667   ?\Β
2668   ?\Γ
2669   ?\Δ
2670   ?\Ε
2671   ?\Ζ
2672   ?\Η
2673   ?\Θ
2674   ?\Ι
2675   ?\Κ
2676   ?\Λ
2677   ?\Μ
2678   ?\Ν
2679   ?\Ξ
2680   ?\Ο
2681   ?\Π
2682   ?\Ρ
2683   nil
2684   ?\Σ
2685   ?\Τ
2686   ?\Υ
2687   ?\Φ
2688   ?\Χ
2689   ?\Ψ
2690   ?\Ω
2691   ?\Ϊ
2692   ?\Ϋ
2693   ?\ά
2694   ?\έ
2695   ?\ή
2696   ?\ί
2697   ?\ΰ
2698   ?\α
2699   ?\β
2700   ?\γ
2701   ?\δ
2702   ?\ε
2703   ?\ζ
2704   ?\η
2705   ?\θ
2706   ?\ι
2707   ?\κ
2708   ?\λ
2709   ?\μ
2710   ?\ν
2711   ?\ξ
2712   ?\ο
2713   ?\π
2714   ?\ρ
2715   ?\ς
2716   ?\σ
2717   ?\τ
2718   ?\υ
2719   ?\φ
2720   ?\χ
2721   ?\ψ
2722   ?\ω
2723   ?\ϊ
2724   ?\ϋ
2725   ?\ό
2726   ?\ύ
2727   ?\ώ
2728   nil]
2729  nil ?g) ;; Greek
2730
2731 ;;;###autoload(autoload-coding-system 'windows-1254 '(require 'code-pages))
2732 (cp-make-coding-system
2733  windows-1254
2734  [?\€
2735   nil
2736   ?\‚
2737   ?\ƒ
2738   ?\„
2739   ?\…
2740   ?\†
2741   ?\‡
2742   ?\ˆ
2743   ?\‰
2744   ?\Š
2745   ?\‹
2746   ?\Œ
2747   nil
2748   nil
2749   nil
2750   nil
2751   ?\‘
2752   ?\’
2753   ?\“
2754   ?\”
2755   ?\•
2756   ?\–
2757   ?\—
2758   ?\˜
2759   ?\™
2760   ?\š
2761   ?\›
2762   ?\œ
2763   nil
2764   nil
2765   ?\Ÿ
2766   ?\
2767   ?\¡
2768   ?\¢
2769   ?\£
2770   ?\¤
2771   ?\¥
2772   ?\¦
2773   ?\§
2774   ?\¨
2775   ?\©
2776   ?\ª
2777   ?\«
2778   ?\¬
2779   ?\
2780   ?\®
2781   ?\¯
2782   ?\°
2783   ?\±
2784   ?\²
2785   ?\³
2786   ?\´
2787   ?\µ
2788   ?\¶
2789   ?\·
2790   ?\¸
2791   ?\¹
2792   ?\º
2793   ?\»
2794   ?\¼
2795   ?\½
2796   ?\¾
2797   ?\¿
2798   ?\À
2799   ?\Á
2800   ?\Â
2801   ?\Ã
2802   ?\Ä
2803   ?\Å
2804   ?\Æ
2805   ?\Ç
2806   ?\È
2807   ?\É
2808   ?\Ê
2809   ?\Ë
2810   ?\Ì
2811   ?\Í
2812   ?\Î
2813   ?\Ï
2814   ?\Ğ
2815   ?\Ñ
2816   ?\Ò
2817   ?\Ó
2818   ?\Ô
2819   ?\Õ
2820   ?\Ö
2821   ?\×
2822   ?\Ø
2823   ?\Ù
2824   ?\Ú
2825   ?\Û
2826   ?\Ü
2827   ?\İ
2828   ?\Ş
2829   ?\ß
2830   ?\à
2831   ?\á
2832   ?\â
2833   ?\ã
2834   ?\ä
2835   ?\å
2836   ?\æ
2837   ?\ç
2838   ?\è
2839   ?\é
2840   ?\ę
2841   ?\ë
2842   ?\ė
2843   ?\í
2844   ?\î
2845   ?\ī
2846   ?\ğ
2847   ?\ñ
2848   ?\ò
2849   ?\ó
2850   ?\ô
2851   ?\õ
2852   ?\ö
2853   ?\÷
2854   ?\ø
2855   ?\ù
2856   ?\ú
2857   ?\û
2858   ?\ü
2859   ?\ı
2860   ?\ş
2861   ?\ÿ])
2862
2863 ;; yi_US
2864 ;;;###autoload(autoload-coding-system 'windows-1255 '(require 'code-pages))
2865 (cp-make-coding-system
2866  windows-1255
2867  [?\€
2868   nil
2869   ?\‚
2870   ?\ƒ
2871   ?\„
2872   ?\…
2873   ?\†
2874   ?\‡
2875   ?\ˆ
2876   ?\‰
2877   nil
2878   ?\‹
2879   nil
2880   nil
2881   nil
2882   nil
2883   nil
2884   ?\‘
2885   ?\’
2886   ?\“
2887   ?\”
2888   ?\•
2889   ?\–
2890   ?\—
2891   ?\˜
2892   ?\™
2893   nil
2894   ?\›
2895   nil
2896   nil
2897   nil
2898   nil
2899   ?\
2900   ?\¡
2901   ?\¢
2902   ?\£
2903   ?\₪
2904   ?\¥
2905   ?\¦
2906   ?\§
2907   ?\¨
2908   ?\©
2909   ?\×
2910   ?\«
2911   ?\¬
2912   ?\
2913   ?\®
2914   ?\¯
2915   ?\°
2916   ?\±
2917   ?\²
2918   ?\³
2919   ?\´
2920   ?\µ
2921   ?\¶
2922   ?\·
2923   ?\¸
2924   ?\¹
2925   ?\÷
2926   ?\»
2927   ?\¼
2928   ?\½
2929   ?\¾
2930   ?\¿
2931   ?\ְ
2932   ?\ֱ
2933   ?\ֲ
2934   ?\ֳ
2935   ?\ִ
2936   ?\ֵ
2937   ?\ֶ
2938   ?\ַ
2939   ?\ָ
2940   ?\ֹ
2941   nil
2942   ?\ֻ
2943   ?\ּ
2944   ?\ֽ
2945   ?\־
2946   ?\ֿ
2947   ?\׀
2948   ?\ׁ
2949   ?\ׂ
2950   ?\׃
2951   ?\װ
2952   ?\ױ
2953   ?\ײ
2954   ?\׳
2955   ?\״
2956   nil
2957   nil
2958   nil
2959   nil
2960   nil
2961   nil
2962   nil
2963   ?\א
2964   ?\ב
2965   ?\ג
2966   ?\ד
2967   ?\ה
2968   ?\ו
2969   ?\ז
2970   ?\ח
2971   ?\ט
2972   ?\י
2973   ?\ך
2974   ?\כ
2975   ?\ל
2976   ?\ם
2977   ?\מ
2978   ?\ן
2979   ?\נ
2980   ?\ס
2981   ?\ע
2982   ?\ף
2983   ?\פ
2984   ?\ץ
2985   ?\צ
2986   ?\ק
2987   ?\ר
2988   ?\ש
2989   ?\ת
2990   nil
2991   nil
2992   ?\‎
2993   ?\‏
2994   nil]
2995  nil ?h) ;; Hebrew
2996
2997 ;;;###autoload(autoload-coding-system 'windows-1256 '(require 'code-pages))
2998 (cp-make-coding-system
2999  windows-1256
3000  [?\€
3001   ?\پ
3002   ?\‚
3003   ?\ƒ
3004   ?\„
3005   ?\…
3006   ?\†
3007   ?\‡
3008   ?\ˆ
3009   ?\‰
3010   ?\ٹ
3011   ?\‹
3012   ?\Œ
3013   ?\چ
3014   ?\ژ
3015   ?\ڈ
3016   ?\گ
3017   ?\‘
3018   ?\’
3019   ?\“
3020   ?\”
3021   ?\•
3022   ?\–
3023   ?\—
3024   ?\ک
3025   ?\™
3026   ?\ڑ
3027   ?\›
3028   ?\œ
3029   ?\‌
3030   ?\‍
3031   ?\ں
3032   ?\
3033   ?\،
3034   ?\¢
3035   ?\£
3036   ?\¤
3037   ?\¥
3038   ?\¦
3039   ?\§
3040   ?\¨
3041   ?\©
3042   ?\ھ
3043   ?\«
3044   ?\¬
3045   ?\
3046   ?\®
3047   ?\¯
3048   ?\°
3049   ?\±
3050   ?\²
3051   ?\³
3052   ?\´
3053   ?\µ
3054   ?\¶
3055   ?\·
3056   ?\¸
3057   ?\¹
3058   ?\؛
3059   ?\»
3060   ?\¼
3061   ?\½
3062   ?\¾
3063   ?\؟
3064   ?\ہ
3065   ?\ء
3066   ?\آ
3067   ?\أ
3068   ?\ؤ
3069   ?\إ
3070   ?\ئ
3071   ?\ا
3072   ?\ب
3073   ?\ة
3074   ?\ت
3075   ?\ث
3076   ?\ج
3077   ?\ح
3078   ?\خ
3079   ?\د
3080   ?\ذ
3081   ?\ر
3082   ?\ز
3083   ?\س
3084   ?\ش
3085   ?\ص
3086   ?\ض
3087   ?\×
3088   ?\ط
3089   ?\ظ
3090   ?\ع
3091   ?\غ
3092   ?\ـ
3093   ?\ف
3094   ?\ق
3095   ?\ك
3096   ?\à
3097   ?\ل
3098   ?\â
3099   ?\م
3100   ?\ن
3101   ?\ه
3102   ?\و
3103   ?\ç
3104   ?\è
3105   ?\é
3106   ?\ê
3107   ?\ë
3108   ?\ى
3109   ?\ي
3110   ?\î
3111   ?\ï
3112   ?\ً
3113   ?\ٌ
3114   ?\ٍ
3115   ?\َ
3116   ?\ô
3117   ?\ُ
3118   ?\ِ
3119   ?\÷
3120   ?\ّ
3121   ?\ù
3122   ?\ْ
3123   ?\û
3124   ?\ü
3125   ?\‎
3126   ?\‏
3127   ?\ے]
3128  nil ?a) ;; Arabic
3129
3130 ;;;###autoload(autoload-coding-system 'windows-1257 '(require 'code-pages))
3131 (cp-make-coding-system
3132  windows-1257
3133  [?\€
3134   nil
3135   ?\‚
3136   nil
3137   ?\„
3138   ?\…
3139   ?\†
3140   ?\‡
3141   nil
3142   ?\‰
3143   nil
3144   ?\‹
3145   nil
3146   nil
3147   nil
3148   nil
3149   nil
3150   ?\‘
3151   ?\’
3152   ?\“
3153   ?\”
3154   ?\•
3155   ?\–
3156   ?\—
3157   nil
3158   ?\™
3159   nil
3160   ?\›
3161   nil
3162   nil
3163   nil
3164   nil
3165   ?\
3166   nil
3167   ?\¢
3168   ?\£
3169   ?\¤
3170   nil
3171   ?\¦
3172   ?\§
3173   ?\Ø
3174   ?\©
3175   ?\Ŗ
3176   ?\«
3177   ?\¬
3178   ?\
3179   ?\®
3180   ?\Æ
3181   ?\°
3182   ?\±
3183   ?\²
3184   ?\³
3185   nil
3186   ?\µ
3187   ?\¶
3188   ?\·
3189   ?\ø
3190   ?\¹
3191   ?\ŗ
3192   ?\»
3193   ?\¼
3194   ?\½
3195   ?\¾
3196   ?\æ
3197   ?\Ą
3198   ?\Į
3199   ?\Ā
3200   ?\Ć
3201   ?\Ä
3202   ?\Å
3203   ?\Ę
3204   ?\Ē
3205   ?\Č
3206   ?\É
3207   ?\Ź
3208   ?\Ė
3209   ?\Ģ
3210   ?\Ķ
3211   ?\Ī
3212   ?\Ļ
3213   ?\Š
3214   ?\Ń
3215   ?\Ņ
3216   ?\Ó
3217   ?\Ō
3218   ?\Õ
3219   ?\Ö
3220   ?\×
3221   ?\Ų
3222   ?\Ł
3223   ?\Ś
3224   ?\Ū
3225   ?\Ü
3226   ?\Ż
3227   ?\Ž
3228   ?\ß
3229   ?\ą
3230   ?\į
3231   ?\ā
3232   ?\ć
3233   ?\ä
3234   ?\å
3235   ?\ę
3236   ?\ē
3237   ?\č
3238   ?\é
3239   ?\ź
3240   ?\ė
3241   ?\ģ
3242   ?\ķ
3243   ?\ī
3244   ?\ļ
3245   ?\š
3246   ?\ń
3247   ?\ņ
3248   ?\ó
3249   ?\ō
3250   ?\õ
3251   ?\ö
3252   ?\÷
3253   ?\ų
3254   ?\ł
3255   ?\ś
3256   ?\ū
3257   ?\ü
3258   ?\ż
3259   ?\ž
3260   nil])
3261
3262 ;;;###autoload(autoload-coding-system 'windows-1258 '(require 'code-pages))
3263 (cp-make-coding-system
3264  windows-1258
3265  [?\€
3266   nil
3267   ?\‚
3268   ?\ƒ
3269   ?\„
3270   ?\…
3271   ?\†
3272   ?\‡
3273   ?\ˆ
3274   ?\‰
3275   nil
3276   ?\‹
3277   ?\Œ
3278   nil
3279   nil
3280   nil
3281   nil
3282   ?\‘
3283   ?\’
3284   ?\“
3285   ?\”
3286   ?\•
3287   ?\–
3288   ?\—
3289   ?\˜
3290   ?\™
3291   nil
3292   ?\›
3293   ?\œ
3294   nil
3295   nil
3296   ?\Ÿ
3297   ?\
3298   ?\¡
3299   ?\¢
3300   ?\£
3301   ?\¤
3302   ?\¥
3303   ?\¦
3304   ?\§
3305   ?\¨
3306   ?\©
3307   ?\ª
3308   ?\«
3309   ?\¬
3310   ?\
3311   ?\®
3312   ?\¯
3313   ?\°
3314   ?\±
3315   ?\²
3316   ?\³
3317   ?\´
3318   ?\µ
3319   ?\¶
3320   ?\·
3321   ?\¸
3322   ?\¹
3323   ?\º
3324   ?\»
3325   ?\¼
3326   ?\½
3327   ?\¾
3328   ?\¿
3329   ?\À
3330   ?\Á
3331   ?\Â
3332   ?\Ă
3333   ?\Ä
3334   ?\Å
3335   ?\Æ
3336   ?\Ç
3337   ?\È
3338   ?\É
3339   ?\Ê
3340   ?\Ë
3341   ?\̀
3342   ?\Í
3343   ?\Î
3344   ?\Ï
3345   ?\Đ
3346   ?\Ñ
3347   ?\̉
3348   ?\Ó
3349   ?\Ô
3350   ?\Ơ
3351   ?\Ö
3352   ?\×
3353   ?\Ø
3354   ?\Ù
3355   ?\Ú
3356   ?\Û
3357   ?\Ü
3358   ?\Ư
3359   ?\̃
3360   ?\ß
3361   ?\à
3362   ?\á
3363   ?\â
3364   ?\ă
3365   ?\ä
3366   ?\å
3367   ?\æ
3368   ?\ç
3369   ?\è
3370   ?\é
3371   ?\ê
3372   ?\ë
3373   ?\́
3374   ?\í
3375   ?\î
3376   ?\ï
3377   ?\đ
3378   ?\ñ
3379   ?\̣
3380   ?\ó
3381   ?\ô
3382   ?\ơ
3383   ?\ö
3384   ?\÷
3385   ?\ø
3386   ?\ù
3387   ?\ú
3388   ?\û
3389   ?\ü
3390   ?\ư
3391   ?\₫
3392   ?\ÿ])
3393
3394 ;;;###autoload(autoload-coding-system 'next '(require 'code-pages))
3395 (cp-make-coding-system
3396  next
3397  [?\
3398   ?\À
3399   ?\Á
3400   ?\Â
3401   ?\Ã
3402   ?\Ä
3403   ?\Å
3404   ?\Ç
3405   ?\È
3406   ?\É
3407   ?\Ê
3408   ?\Ë
3409   ?\Ì
3410   ?\Í
3411   ?\Î
3412   ?\Ï
3413   ?\Ð
3414   ?\Ñ
3415   ?\Ò
3416   ?\Ó
3417   ?\Ô
3418   ?\Õ
3419   ?\Ö
3420   ?\Ù
3421   ?\Ú
3422   ?\Û
3423   ?\Ü
3424   ?\Ý
3425   ?\Þ
3426   ?\µ
3427   ?\×
3428   ?\÷
3429   ?\©
3430   ?\¡
3431   ?\¢
3432   ?\£
3433   ?\⁄
3434   ?\¥
3435   ?\ƒ
3436   ?\§
3437   ?\¤
3438   nil
3439   ?\“
3440   ?\«
3441   nil
3442   nil
3443   ?\ﬁ
3444   ?\ﬂ
3445   ?\®
3446   ?\–
3447   ?\†
3448   ?\‡
3449   ?\·
3450   ?\¦
3451   ?\¶
3452   ?\•
3453   nil
3454   nil
3455   ?\”
3456   ?\»
3457   ?\…
3458   ?\‰
3459   ?\¬
3460   ?\¿
3461   ?\¹
3462   ?\ˋ
3463   ?\´
3464   ?\ˆ
3465   ?\˜
3466   ?\¯
3467   ?\˘
3468   ?\˙
3469   ?\¨
3470   ?\²
3471   ?\˚
3472   ?\¸
3473   ?\³
3474   ?\˝
3475   ?\˛
3476   ?\ˇ
3477   ?\—
3478   ?\±
3479   ?\¼
3480   ?\½
3481   ?\¾
3482   ?\à
3483   ?\á
3484   ?\â
3485   ?\ã
3486   ?\ä
3487   ?\å
3488   ?\ç
3489   ?\è
3490   ?\é
3491   ?\ê
3492   ?\ë
3493   ?\ì
3494   ?\Æ
3495   ?\í
3496   ?\ª
3497   ?\î
3498   ?\ï
3499   ?\ð
3500   ?\ñ
3501   ?\Ł
3502   ?\Ø
3503   ?\Œ
3504   ?\º
3505   ?\ò
3506   ?\ó
3507   ?\ô
3508   ?\õ
3509   ?\ö
3510   ?\æ
3511   ?\ù
3512   ?\ú
3513   ?\û
3514   ?\ı
3515   ?\ü
3516   ?\ý
3517   ?\ł
3518   ?\ø
3519   ?\œ
3520   ?\ß
3521   ?\þ
3522   ?\ÿ
3523   nil
3524   nil]
3525  "NeXTstep encoding." ?N)
3526
3527 ;;;###autoload(autoload-coding-system 'koi8-t '(require 'code-pages))
3528 (cp-make-coding-system
3529  koi8-t                                 ; used by glibc for tg_TJ
3530  [?\қ
3531   ?\ғ
3532   ?\‚
3533   ?\Ғ
3534   ?\„
3535   ?\…
3536   ?\†
3537   ?\‡
3538   nil
3539   ?\‰
3540   ?\ҳ
3541   ?\‹
3542   ?\Ҳ
3543   ?\ҷ
3544   ?\Ҷ
3545   nil
3546   ?\Қ
3547   ?\‘
3548   ?\’
3549   ?\“
3550   ?\”
3551   ?\•
3552   ?\–
3553   ?\—
3554   nil
3555   ?\™
3556   nil
3557   ?\›
3558   nil
3559   nil
3560   nil
3561   nil
3562   nil
3563   ?\ӯ
3564   ?\Ӯ
3565   ?\ё
3566   ?\¤
3567   ?\ӣ
3568   ?\¦
3569   ?\§
3570   nil
3571   nil
3572   nil
3573   ?\«
3574   ?\¬
3575   ?\
3576   ?\®
3577   nil
3578   ?\°
3579   ?\±
3580   ?\²
3581   ?\Ё
3582   nil
3583   ?\Ӣ
3584   ?\¶
3585   ?\·
3586   nil
3587   ?\№
3588   nil
3589   ?\»
3590   nil
3591   nil
3592   nil
3593   ?\©
3594   ?\ю
3595   ?\а
3596   ?\б
3597   ?\ц
3598   ?\д
3599   ?\е
3600   ?\ф
3601   ?\г
3602   ?\х
3603   ?\и
3604   ?\й
3605   ?\к
3606   ?\л
3607   ?\м
3608   ?\н
3609   ?\о
3610   ?\п
3611   ?\я
3612   ?\р
3613   ?\с
3614   ?\т
3615   ?\у
3616   ?\ж
3617   ?\в
3618   ?\ь
3619   ?\ы
3620   ?\з
3621   ?\ш
3622   ?\э
3623   ?\щ
3624   ?\ч
3625   ?\ъ
3626   ?\Ю
3627   ?\А
3628   ?\Б
3629   ?\Ц
3630   ?\Д
3631   ?\Е
3632   ?\Ф
3633   ?\Г
3634   ?\Х
3635   ?\И
3636   ?\Й
3637   ?\К
3638   ?\Л
3639   ?\М
3640   ?\Н
3641   ?\О
3642   ?\П
3643   ?\Я
3644   ?\Р
3645   ?\С
3646   ?\Т
3647   ?\У
3648   ?\Ж
3649   ?\В
3650   ?\Ь
3651   ?\Ы
3652   ?\З
3653   ?\Ш
3654   ?\Э
3655   ?\Щ
3656   ?\Ч
3657   ?\Ъ]
3658  "Unicode-based KOI8-T encoding for Cyrillic")
3659 (coding-system-put 'koi8-t 'mime-charset nil) ; not in the IANA list
3660 (define-coding-system-alias 'cyrillic-koi8-t 'koi8-t)
3661
3662 ;;   Online final ISO draft:
3663
3664 ;;     http://www.evertype.com/standards/iso8859/fdis8859-16-en.pdf
3665
3666 ;;   Equivalent National Standard:
3667 ;;     Romanian Standard SR 14111:1998, Romanian Standards Institution
3668 ;;     (ASRO).
3669
3670 ;; Intended usage:
3671
3672 ;;  "This set of coded graphic characters is intended for use in data and
3673 ;;   text processing applications and also for information interchange. The
3674 ;;   set contains graphic characters used for general purpose applications in
3675 ;;   typical office environments in at least the following languages:
3676 ;;   Albanian, Croatian, English, Finnish, French, German, Hungarian, Irish
3677 ;;   Gaelic (new orthography), Italian, Latin, Polish, Romanian, and
3678 ;;   Slovenian. This set of coded graphic characters may be regarded as a
3679 ;;   version of an 8-bit code according to ISO/IEC 2022 or ISO/IEC 4873 at
3680 ;;   level 1." [ISO 8859-16:2001(E), p. 1]
3681
3682 ;;   This charset is suitable for use in MIME text body parts.
3683
3684 ;;   ISO 8859-16 was primarily designed for single-byte encoding the Romanian
3685 ;;   language. The UTF-8 charset is the preferred and in today's MIME software
3686 ;;   more widely implemented encoding suitable for Romanian.
3687 ;;;###autoload(autoload-coding-system 'iso-8859-16 '(require 'code-pages))
3688 (cp-make-coding-system
3689  iso-latin-10                           ; consistent with, e.g. Latin-1
3690  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3691   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3692   ?\
3693   ?\Ą
3694   ?\ą
3695   ?\Ł
3696   ?\€
3697   ?\„
3698   ?\Š
3699   ?\§
3700   ?\š
3701   ?\©
3702   ?\Ș
3703   ?\«
3704   ?\Ź
3705   ?\
3706   ?\ź
3707   ?\Ż
3708   ?\°
3709   ?\±
3710   ?\Č
3711   ?\ł
3712   ?\Ž
3713   ?\”
3714   ?\¶
3715   ?\·
3716   ?\ž
3717   ?\č
3718   ?\ș
3719   ?\»
3720   ?\Œ
3721   ?\œ
3722   ?\Ÿ
3723   ?\ż
3724   ?\À
3725   ?\Á
3726   ?\Â
3727   ?\Ă
3728   ?\Ä
3729   ?\Ć
3730   ?\Æ
3731   ?\Ç
3732   ?\È
3733   ?\É
3734   ?\Ê
3735   ?\Ë
3736   ?\Ì
3737   ?\Í
3738   ?\Î
3739   ?\Ï
3740   ?\Đ
3741   ?\Ń
3742   ?\Ò
3743   ?\Ó
3744   ?\Ô
3745   ?\Ő
3746   ?\Ö
3747   ?\Ś
3748   ?\Ű
3749   ?\Ù
3750   ?\Ú
3751   ?\Û
3752   ?\Ü
3753   ?\Ę
3754   ?\Ț
3755   ?\ß
3756   ?\à
3757   ?\á
3758   ?\â
3759   ?\ă
3760   ?\ä
3761   ?\ć
3762   ?\æ
3763   ?\ç
3764   ?\è
3765   ?\é
3766   ?\ê
3767   ?\ë
3768   ?\ì
3769   ?\í
3770   ?\î
3771   ?\ï
3772   ?\đ
3773   ?\ń
3774   ?\ò
3775   ?\ó
3776   ?\ô
3777   ?\ő
3778   ?\ö
3779   ?\ś
3780   ?\ű
3781   ?\ù
3782   ?\ú
3783   ?\û
3784   ?\ü
3785   ?\ę
3786   ?\ț
3787   ?\ÿ]
3788  "Unicode-based encoding for Latin-10 (MIME: ISO-8859-16)"
3789  ?r) ;; Romanian
3790 (coding-system-put 'iso-latin-10 'mime-charset 'iso-8859-16)
3791 (define-coding-system-alias 'iso-8859-16 'iso-latin-10)
3792 (define-coding-system-alias 'latin-10 'iso-latin-10)
3793
3794 ;; Unicode-based alternative which has the possible advantage of
3795 ;; having its relative sparseness specified.
3796 ;;;###autoload(autoload-coding-system 'iso-8859-6 '(require 'code-pages))
3797 (cp-make-coding-system
3798  ;; The base system uses arabic-iso-8bit, but that's not a MIME charset.
3799  iso-8859-6
3800  [nil nil 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
3802   ?\
3803   ?\¤
3804   ?\،
3805   ?\
3806   ?\؛
3807   ?\؟
3808   ?\ء
3809   ?\آ
3810   ?\أ
3811   ?\ؤ
3812   ?\إ
3813   ?\ئ
3814   ?\ا
3815   ?\ب
3816   ?\ة
3817   ?\ت
3818   ?\ث
3819   ?\ج
3820   ?\ح
3821   ?\خ
3822   ?\د
3823   ?\ذ
3824   ?\ر
3825   ?\ز
3826   ?\س
3827   ?\ش
3828   ?\ص
3829   ?\ض
3830   ?\ط
3831   ?\ظ
3832   ?\ع
3833   ?\غ
3834   ?\ـ
3835   ?\ف
3836   ?\ق
3837   ?\ك
3838   ?\ل
3839   ?\م
3840   ?\ن
3841   ?\ه
3842   ?\و
3843   ?\ى
3844   ?\ي
3845   ?\ً
3846   ?\ٌ
3847   ?\ٍ
3848   ?\َ
3849   ?\ُ
3850   ?\ِ
3851   ?\ّ
3852   ?\ْ
3853   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3854   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3855   nil nil nil nil nil nil nil nil nil nil nil]
3856  "Unicode-based Arabic ISO/IEC 8859-6 (MIME: ISO-8859-6)"
3857  ?6)
3858 (define-coding-system-alias 'arabic-iso-8bit 'iso-8859-6)
3859
3860 ;;;###autoload(autoload-coding-system 'iso-8859-10 '(require 'code-pages))
3861 (cp-make-coding-system
3862  iso-latin-6
3863  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3864   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3865   ?\
3866   ?\Ą
3867   ?\Ē
3868   ?\Ģ
3869   ?\Ī
3870   ?\Ĩ
3871   ?\Ķ
3872   ?\§
3873   ?\Ļ
3874   ?\Đ
3875   ?\Š
3876   ?\Ŧ
3877   ?\Ž
3878   ?\
3879   ?\Ū
3880   ?\Ŋ
3881   ?\°
3882   ?\ą
3883   ?\ē
3884   ?\ģ
3885   ?\ī
3886   ?\ĩ
3887   ?\ķ
3888   ?\·
3889   ?\ļ
3890   ?\đ
3891   ?\š
3892   ?\ŧ
3893   ?\ž
3894   ?\―
3895   ?\ū
3896   ?\ŋ
3897   ?\Ā
3898   ?\Á
3899   ?\Â
3900   ?\Ã
3901   ?\Ä
3902   ?\Å
3903   ?\Æ
3904   ?\Į
3905   ?\Č
3906   ?\É
3907   ?\Ę
3908   ?\Ë
3909   ?\Ė
3910   ?\Í
3911   ?\Î
3912   ?\Ï
3913   ?\Ð
3914   ?\Ņ
3915   ?\Ō
3916   ?\Ó
3917   ?\Ô
3918   ?\Õ
3919   ?\Ö
3920   ?\Ũ
3921   ?\Ø
3922   ?\Ų
3923   ?\Ú
3924   ?\Û
3925   ?\Ü
3926   ?\Ý
3927   ?\Þ
3928   ?\ß
3929   ?\ā
3930   ?\á
3931   ?\â
3932   ?\ã
3933   ?\ä
3934   ?\å
3935   ?\æ
3936   ?\į
3937   ?\č
3938   ?\é
3939   ?\ę
3940   ?\ë
3941   ?\ė
3942   ?\í
3943   ?\î
3944   ?\ï
3945   ?\ð
3946   ?\ņ
3947   ?\ō
3948   ?\ó
3949   ?\ô
3950   ?\õ
3951   ?\ö
3952   ?\ũ
3953   ?\ø
3954   ?\ų
3955   ?\ú
3956   ?\û
3957   ?\ü
3958   ?\ý
3959   ?\þ
3960   ?\ĸ]
3961  "Unicode-based encoding for Latin-6 (MIME: ISO-8859-10)")
3962 (coding-system-put 'iso-latin-6 'mime-charset 'iso-8859-10)
3963 (define-coding-system-alias 'iso-8859-10 'iso-latin-6)
3964 (define-coding-system-alias 'latin-6 'iso-latin-6)
3965
3966 ;; used by lt_LT, lv_LV, mi_NZ
3967 ;;;###autoload(autoload-coding-system 'iso-8859-13 '(require 'code-pages))
3968 (cp-make-coding-system
3969  iso-latin-7
3970  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3971   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3972   ?\
3973   ?\”
3974   ?\¢
3975   ?\£
3976   ?\¤
3977   ?\„
3978   ?\¦
3979   ?\§
3980   ?\Ø
3981   ?\©
3982   ?\Ŗ
3983   ?\«
3984   ?\¬
3985   ?\
3986   ?\®
3987   ?\Æ
3988   ?\°
3989   ?\±
3990   ?\²
3991   ?\³
3992   ?\“
3993   ?\µ
3994   ?\¶
3995   ?\·
3996   ?\ø
3997   ?\¹
3998   ?\ŗ
3999   ?\»
4000   ?\¼
4001   ?\½
4002   ?\¾
4003   ?\æ
4004   ?\Ą
4005   ?\Į
4006   ?\Ā
4007   ?\Ć
4008   ?\Ä
4009   ?\Å
4010   ?\Ę
4011   ?\Ē
4012   ?\Č
4013   ?\É
4014   ?\Ź
4015   ?\Ė
4016   ?\Ģ
4017   ?\Ķ
4018   ?\Ī
4019   ?\Ļ
4020   ?\Š
4021   ?\Ń
4022   ?\Ņ
4023   ?\Ó
4024   ?\Ō
4025   ?\Õ
4026   ?\Ö
4027   ?\×
4028   ?\Ų
4029   ?\Ł
4030   ?\Ś
4031   ?\Ū
4032   ?\Ü
4033   ?\Ż
4034   ?\Ž
4035   ?\ß
4036   ?\ą
4037   ?\į
4038   ?\ā
4039   ?\ć
4040   ?\ä
4041   ?\å
4042   ?\ę
4043   ?\ē
4044   ?\č
4045   ?\é
4046   ?\ź
4047   ?\ė
4048   ?\ģ
4049   ?\ķ
4050   ?\ī
4051   ?\ļ
4052   ?\š
4053   ?\ń
4054   ?\ņ
4055   ?\ó
4056   ?\ō
4057   ?\õ
4058   ?\ö
4059   ?\÷
4060   ?\ų
4061   ?\ł
4062   ?\ś
4063   ?\ū
4064   ?\ü
4065   ?\ż
4066   ?\ž
4067   ?\’
4068   ]
4069  "Unicode-based encoding for Latin-7 (MIME: ISO-8859-13)"
4070  ?l) ;; Lithuanian/Latvian
4071 (coding-system-put 'iso-latin-7 'mime-charset 'iso-8859-13)
4072 (define-coding-system-alias 'iso-8859-13 'iso-latin-7)
4073 (define-coding-system-alias 'latin-7 'iso-latin-7)
4074
4075 ;; Fixme: check on the C1 characters which libiconv includes.  They
4076 ;; are reproduced below, but are probably wrong.  I can't find an
4077 ;; official definition of georgian-ps.
4078 ;;;###autoload(autoload-coding-system 'georgian-ps '(require 'code-pages))
4079 (cp-make-coding-system
4080  georgian-ps                            ; used by glibc for ka_GE
4081  [?\
4082   ?\
4083   ?\‚
4084   ?\ƒ
4085   ?\„
4086   ?\…
4087   ?\†
4088   ?\‡
4089   ?\ˆ
4090   ?\‰
4091   ?\Š
4092   ?\‹
4093   ?\Œ
4094   ?\
4095   ?\
4096   ?\
4097   ?\
4098   ?\‘
4099   ?\’
4100   ?\“
4101   ?\”
4102   ?\•
4103   ?\–
4104   ?\—
4105   ?\˜
4106   ?\™
4107   ?\š
4108   ?\›
4109   ?\œ
4110   ?\
4111   ?\
4112   ?\Ÿ
4113   ?\
4114   ?\¡
4115   ?\¢
4116   ?\£
4117   ?\¤
4118   ?\¥
4119   ?\¦
4120   ?\§
4121   ?\¨
4122   ?\©
4123   ?\ª
4124   ?\«
4125   ?\¬
4126   ?\
4127   ?\®
4128   ?\¯
4129   ?\°
4130   ?\±
4131   ?\²
4132   ?\³
4133   ?\´
4134   ?\µ
4135   ?\¶
4136   ?\·
4137   ?\¸
4138   ?\¹
4139   ?\º
4140   ?\»
4141   ?\¼
4142   ?\½
4143   ?\¾
4144   ?\¿
4145   ?\ა
4146   ?\ბ
4147   ?\გ
4148   ?\დ
4149   ?\ე
4150   ?\ვ
4151   ?\ზ
4152   ?\ჱ
4153   ?\თ
4154   ?\ი
4155   ?\კ
4156   ?\ლ
4157   ?\მ
4158   ?\ნ
4159   ?\ჲ
4160   ?\ო
4161   ?\პ
4162   ?\ჟ
4163   ?\რ
4164   ?\ს
4165   ?\ტ
4166   ?\ჳ
4167   ?\უ
4168   ?\ფ
4169   ?\ქ
4170   ?\ღ
4171   ?\ყ
4172   ?\შ
4173   ?\ჩ
4174   ?\ც
4175   ?\ძ
4176   ?\წ
4177   ?\ჭ
4178   ?\ხ
4179   ?\ჴ
4180   ?\ჯ
4181   ?\ჰ
4182   ?\ჵ
4183   ?\æ
4184   ?\ç
4185   ?\è
4186   ?\é
4187   ?\ê
4188   ?\ë
4189   ?\ì
4190   ?\í
4191   ?\î
4192   ?\ï
4193   ?\ð
4194   ?\ñ
4195   ?\ò
4196   ?\ó
4197   ?\ô
4198   ?\õ
4199   ?\ö
4200   ?\÷
4201   ?\ø
4202   ?\ù
4203   ?\ú
4204   ?\û
4205   ?\ü
4206   ?\ý
4207   ?\þ
4208   ?\ÿ]
4209  nil ?G)
4210 (coding-system-put 'georgian-ps 'mime-charset nil) ; not in IANA list
4211
4212 ;;;###autoload(autoload-coding-system 'cp720 '(require 'code-pages))
4213 ;; From http://www.microsoft.com/globaldev/reference/oem/720.htm
4214 (cp-make-coding-system
4215  cp720
4216  [nil
4217   nil
4218   ?\é
4219   ?\â
4220   nil
4221   ?\à
4222   nil
4223   ?\ç
4224   ?\ê
4225   ?\ë
4226   ?\è
4227   ?\ï
4228   ?\î
4229   nil
4230   nil
4231   nil
4232   nil
4233   ?\ّ
4234   ?\ْ
4235   ?\ô
4236   ?\¤
4237   ?\ـ
4238   ?\û
4239   ?\ù
4240   ?\ء
4241   ?\آ
4242   ?\أ
4243   ?\ؤ
4244   ?\£
4245   ?\إ
4246   ?\ئ
4247   ?\ا
4248   ?\ب
4249   ?\ة
4250   ?\ت
4251   ?\ث
4252   ?\ج
4253   ?\ح
4254   ?\خ
4255   ?\د
4256   ?\ذ
4257   ?\ر
4258   ?\ز
4259   ?\س
4260   ?\ش
4261   ?\ص
4262   ?\«
4263   ?\»
4264   ?\░
4265   ?\▒
4266   ?\▓
4267   ?\│
4268   ?\┤
4269   ?\╡
4270   ?\╢
4271   ?\╖
4272   ?\╕
4273   ?\╣
4274   ?\║
4275   ?\╗
4276   ?\╝
4277   ?\╜
4278   ?\╛
4279   ?\┐
4280   ?\└
4281   ?\┴
4282   ?\┬
4283   ?\├
4284   ?\─
4285   ?\┼
4286   ?\╞
4287   ?\╟
4288   ?\╚
4289   ?\╔
4290   ?\╩
4291   ?\╦
4292   ?\╠
4293   ?\═
4294   ?\╬
4295   ?\╧
4296   ?\╨
4297   ?\╤
4298   ?\╥
4299   ?\╙
4300   ?\╘
4301   ?\╒
4302   ?\╓
4303   ?\╫
4304   ?\╪
4305   ?\┘
4306   ?\┌
4307   ?\█
4308   ?\▄
4309   ?\▌
4310   ?\▐
4311   ?\▀
4312   ?\ض
4313   ?\ط
4314   ?\ظ
4315   ?\ع
4316   ?\غ
4317   ?\ف
4318   ?\µ
4319   ?\ق
4320   ?\ك
4321   ?\ل
4322   ?\م
4323   ?\ن
4324   ?\ه
4325   ?\و
4326   ?\ى
4327   ?\ي
4328   ?\≡
4329   ?\ً
4330   ?\ٌ
4331   ?\ٍ
4332   ?\َ
4333   ?\ُ
4334   ?\ِ
4335   ?\≈
4336   ?\°
4337   ?\∙
4338   ?\·
4339   ?\√
4340   ?\ⁿ
4341   ?\²
4342   ?\■
4343   ?\ ])
4344 (coding-system-put 'cp720 'mime-charset nil) ; not in IANA list
4345
4346 ;;;###autoload(autoload-coding-system 'cp1125 '(require 'code-pages))
4347 ;; http://oss.software.ibm.com/cvs/icu/charset/data/ucm/ibm-1125_P100-2000.ucm
4348 (cp-make-coding-system
4349  cp1125
4350  [?\А
4351   ?\Б
4352   ?\В
4353   ?\Г
4354   ?\Д
4355   ?\Е
4356   ?\Ж
4357   ?\З
4358   ?\И
4359   ?\Й
4360   ?\К
4361   ?\Л
4362   ?\М
4363   ?\Н
4364   ?\О
4365   ?\П
4366   ?\Р
4367   ?\С
4368   ?\Т
4369   ?\У
4370   ?\Ф
4371   ?\Х
4372   ?\Ц
4373   ?\Ч
4374   ?\Ш
4375   ?\Щ
4376   ?\Ъ
4377   ?\Ы
4378   ?\Ь
4379   ?\Э
4380   ?\Ю
4381   ?\Я
4382   ?\а
4383   ?\б
4384   ?\в
4385   ?\г
4386   ?\д
4387   ?\е
4388   ?\ж
4389   ?\з
4390   ?\и
4391   ?\й
4392   ?\к
4393   ?\л
4394   ?\м
4395   ?\н
4396   ?\о
4397   ?\п
4398   ?\░
4399   ?\▒
4400   ?\▓
4401   ?\│
4402   ?\┤
4403   ?\╡
4404   ?\╢
4405   ?\╖
4406   ?\╕
4407   ?\╣
4408   ?\║
4409   ?\╗
4410   ?\╝
4411   ?\╜
4412   ?\╛
4413   ?\┐
4414   ?\└
4415   ?\┴
4416   ?\┬
4417   ?\├
4418   ?\─
4419   ?\┼
4420   ?\╞
4421   ?\╟
4422   ?\╚
4423   ?\╔
4424   ?\╩
4425   ?\╦
4426   ?\╠
4427   ?\═
4428   ?\╬
4429   ?\╧
4430   ?\╨
4431   ?\╤
4432   ?\╥
4433   ?\╙
4434   ?\╘
4435   ?\╒
4436   ?\╓
4437   ?\╫
4438   ?\╪
4439   ?\┘
4440   ?\┌
4441   ?\█
4442   ?\▄
4443   ?\▌
4444   ?\▐
4445   ?\▀
4446   ?\р
4447   ?\с
4448   ?\т
4449   ?\у
4450   ?\ф
4451   ?\х
4452   ?\ц
4453   ?\ч
4454   ?\ш
4455   ?\щ
4456   ?\ъ
4457   ?\ы
4458   ?\ь
4459   ?\э
4460   ?\ю
4461   ?\я
4462   ?\Ё
4463   ?\ё
4464   ?\Ґ
4465   ?\ґ
4466   ?\Є
4467   ?\є
4468   ?\І
4469   ?\і
4470   ?\Ї
4471   ?\ї
4472   ?\·
4473   ?\√
4474   ?\№
4475   ?\¤
4476   ?\■
4477   ?\ ])
4478 (define-coding-system-alias 'ruscii 'cp1125)
4479 ;; Original name for cp1125, says Serhii Hlodin <hlodin@lutsk.bank.gov.ua>
4480 (define-coding-system-alias 'cp866u 'cp1125)
4481 (coding-system-put 'cp1125 'mime-charset nil)
4482
4483 ;; Suggested by Anton Zinoviev <anton@lml.bas.bg>: Bulgarian DOS
4484 ;; codepage.  Table at
4485 ;; <URL:http://czyborra.com/charsets/bulgarian-mik.txt.gz>.
4486 ;;;###autoload(autoload-coding-system 'mik '(require 'code-pages))
4487 (cp-make-coding-system
4488  mik
4489  [?А ?Б ?В ?Г ?Д ?Е ?Ж ?З ?И ?Й ?К ?Л ?М ?Н ?О ?П ?Р ?С ?Т ?У ?Ф ?Х ?Ц
4490   ?Ч ?Ш ?Щ ?Ъ ?Ы ?Ь ?Э ?Ю ?Я ?а ?б ?в ?г ?д ?е ?ж ?з ?и ?й ?к ?л ?м ?н
4491   ?о ?п ?р ?с ?т ?у ?ф ?х ?ц ?ч ?ш ?щ ?ъ ?ы ?ь ?э ?ю ?я ?└ ?┴ ?┬ ?├ ?─
4492   ?┼ ?╣ ?║ ?╚ ?╔ ?╩ ?╦ ?╠ ?═ ?╬ ?┐ ?░ ?▒ ?▓ ?│ ?┤ ?№ ?§ ?╗ ?╝ ?┘ ?┌ ?█
4493   ?▄ ?▌ ?▐ ?▀ ?α ?β ?Γ ?π ?Σ ?σ ?μ ?τ ?Φ ?Θ ?Ω ?δ ?∞ ?∅ ?∈ ?∩ ?≡ ?± ?≥
4494   ?≤ ?⌠ ?⌡ ?÷ ?≈ ?° ?∙ ?· ?√ ?ⁿ ?² ?■ ? ])
4495 (coding-system-put 'mik 'mime-charset nil)
4496
4497 ;; Suggested by Anton Zinoviev <anton@lml.bas.bg>: similar to CP1251
4498 ;; and used for some non-Slavic Cyrillic languages.  Table found at
4499 ;; <URL:ftp://ftp.logic.ru/pub/logic/linux/cyr-asian/PT154>.  See also
4500 ;; <URL:http://lists.w3.org/Archives/Public/ietf-charsets/2002AprJun/0092.html,
4501 ;; which suggests it's used in an Asian Cyrillic context.
4502 ;;;###autoload(autoload-coding-system 'pt154 '(require 'code-pages))
4503 (cp-make-coding-system
4504  pt154
4505  [?Җ ?Ғ ?Ӯ ?ғ ?„ ?… ?Ҷ ?Ү ?Ҳ ?ү ?Ҡ ?Ӣ ?Ң ?Қ ?Һ ?Ҹ ?җ ?‘ ?’ ?“ ?” ?• ?–
4506   ?— ?ҳ ?ҷ ?ҡ ?ӣ ?ң ?қ ?һ ?ҹ ?  ?Ў ?ў ?Ј ?Ө ?Ҙ ?Ұ ?§ ?Ё ?© ?Ә ?\« ?¬ ?ӯ
4507   ?® ?Ҝ ?° ?ұ ?І ?і ?ҙ ?ө ?¶ ?· ?ё ?№ ?ә ?\» ?ј ?Ҫ ?ҫ ?ҝ ?А ?Б ?В ?Г ?Д
4508   ?Е ?Ж ?З ?И ?Й ?К ?Л ?М ?Н ?О ?П ?Р ?С ?Т ?У ?Ф ?Х ?Ц ?Ч ?Ш ?Щ ?Ъ ?Ы
4509   ?Ь ?Э ?Ю ?Я ?а ?б ?в ?г ?д ?е ?ж ?з ?и ?й ?к ?л ?м ?н ?о ?п ?р ?с ?т
4510   ?у ?ф ?х ?ц ?ч ?ш ?щ ?ъ ?ы ?ь ?э ?ю ?я])
4511
4512 ;;;###autoload(autoload-coding-system 'iso-8859-11 '(require 'code-pages))
4513 (cp-make-coding-system
4514  iso-8859-11
4515  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
4516   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
4517   ?   ?ก  ?ข  ?ฃ  ?ค  ?ฅ  ?ฆ  ?ง  ?จ  ?ฉ  ?ช  ?ซ  ?ฌ  ?ญ  ?ฎ  ?ฏ
4518   ?ฐ  ?ฑ  ?ฒ  ?ณ  ?ด  ?ต  ?ถ  ?ท  ?ธ  ?น  ?บ  ?ป  ?ผ  ?ฝ  ?พ  ?ฟ
4519   ?ภ  ?ม  ?ย  ?ร  ?ฤ  ?ล  ?ฦ  ?ว  ?ศ  ?ษ  ?ส  ?ห  ?ฬ  ?อ  ?ฮ  ?ฯ
4520   ?ะ  ?ั  ?า  ?ำ  ?ิ  ?ี  ?ึ  ?ื  ?ุ  ?ู  ?ฺ  nil nil nil nil ?฿
4521   ?เ  ?แ  ?โ  ?ใ  ?ไ  ?ๅ  ?ๆ  ?็  ?่  ?้  ?๊  ?๋  ?์  ?ํ  ?๎  ?๏
4522   ?๐  ?๑  ?๒  ?๓  ?๔  ?๕  ?๖  ?๗  ?๘  ?๙  ?๚  ?๛   nil nil nil nil]
4523  "ISO-8859-11.  This is `thai-tis620' with the addition of no-break-space.")
4524
4525 (dotimes (i 9)
4526   (let ((w (intern (format "windows-125%d" i)))
4527         (c (intern (format "cp125%d" i))))
4528     ;; Define cp125* as aliases for all windows-125*, so on Windows
4529     ;; we can just concat "cp" to the ANSI codepage we get from the system
4530     ;; and not have to worry about whether it should be "cp" or "windows-".
4531     (when (coding-system-p w)
4532       (define-coding-system-alias c w)
4533       ;; Compatibility with codepage.el, though cp... are not the
4534       ;; canonical names.
4535       (if (not (assq c non-iso-charset-alist))
4536           (let ((slot (assq w non-iso-charset-alist)))
4537             (if slot
4538                 (push (cons c (cdr slot)) non-iso-charset-alist)))))))
4539
4540 (provide 'code-pages)
4541
4542 ;;; arch-tag: 8b6e3c73-b271-4198-866d-ea6d0ceff1b2
4543 ;;; code-pages.el ends here