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, 2006, 2007
   4 ;;   Free Software Foundation, Inc.
   5 ;; Copyright (C) 2004, 2005, 2006, 2007
   6 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
   7 ;;   Registration Number H14PRO021
   8
   9 ;; Author: Dave Love <fx@gnu.org>
  10 ;; Keywords: i18n
  11
  12 ;; This file is part of GNU Emacs.
  13
  14 ;; GNU Emacs is free software; you can redistribute it and/or modify
  15 ;; it under the terms of the GNU General Public License as published by
  16 ;; the Free Software Foundation; either version 2, or (at your option)
  17 ;; any later version.
  18
  19 ;; GNU Emacs is distributed in the hope that it will be useful,
  20 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  21 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22 ;; GNU General Public License for more details.
  23
  24 ;; You should have received a copy of the GNU General Public License
  25 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
  26 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  27 ;; Boston, MA 02110-1301, USA.
  28
  29 ;;; Commentary:
  30
  31 ;; Definitions of miscellaneous 8-bit coding systems based on ASCII
  32 ;; (we can't cope properly with EBCDIC, for instance), mainly for PC
  33 ;; `code pages'.  They are decoded into Latin-1 and mule-unicode
  34 ;; charsets rather than (lossily) into single iso8859 charsets à la
  35 ;; codepage.el.  The utility `cp-make-coding-system' derives them from
  36 ;; simple tables.
  37
  38 ;; Those covered are: cp437, cp737, cp720, cp775, cp850, cp851, cp852,
  39 ;; cp855, cp857, cp860, cp861, cp862, cp863, cp864, cp865, cp866,
  40 ;; cp869, cp874, cp1125, windows-1250, windows-1253, windows-1254,
  41 ;; windows-1255, windows-1256, windows-1257, windows-1258, next,
  42 ;; iso-8859-6, iso-8859-10, iso-8859-11, iso-8859-16, koi8-t,
  43 ;; georgian-ps.  This is meant to include all the single-byte ones
  44 ;; relevant to GNU (used in glibc-defined locales); we don't yet get
  45 ;; all the multibyte ones in base Emacs.
  46
  47 ;; Note that various of these can clash with definitions in
  48 ;; codepage.el; we try to avoid damage from that.  A few CPs from
  49 ;; codepage.el (770, 773, 774) aren't covered (in the absence of
  50 ;; translation tables to Unicode).
  51
  52 ;; Compile this, to avoid loading `ccl' at runtime.
  53
  54 ;; Although the tables used here aren't very big, it might be worth
  55 ;; splitting the file and autoloading the coding systems if/when my
  56 ;; (or similar) autoloading code is installed.
  57
  58 ;;; Code:
  59
  60 ;; The defsubsts here are just so that language files can use
  61 ;; `cp-make-coding-system' and not require functions from this file
  62 ;; at runtime.
  63
  64 (defsubst cp-make-translation-table (v)
  65   "Return a translation table made from 128-long vector V.
  66 V comprises characters encodable by mule-utf-8."
  67   (let ((encoding-vector (make-vector 256 0)))
  68     (dotimes (i 128)
  69       (aset encoding-vector i i))
  70     (dotimes (i 128)
  71       (aset encoding-vector (+ i 128) (aref v i)))
  72     ;; Add equivalent characters to the encoder so that we can unify
  73     ;; on encoding.
  74     (let* ((tab (make-translation-table-from-vector encoding-vector))
  75            ;; Translation table used for encoding:
  76            (encode-table (char-table-extra-slot tab 0)))
  77       (map-char-table (lambda (c v)
  78                         (if v
  79                             (let ((c1 (aref encode-table v)))
  80                               (if c1    ; we encode that unicode
  81                                   (aset encode-table c c1)))))
  82                       ucs-mule-to-mule-unicode)
  83       tab)))
  84
  85 (defsubst cp-valid-codes (v)
  86   "Derive a valid-codes list for translation vector V.
  87 See `make-coding-system'."
  88   (let (pairs
  89         (i 128)                         ; index into v
  90         (start 0)                       ; start of a valid range
  91         (end 127))                      ; end of a valid range
  92     (while (< i 256)
  93       (if (aref v (- i 128))            ; start or extend range
  94           (progn
  95             (setq end i)
  96             (unless start (setq start i)))
  97         (if start
  98             (push (cons start end) pairs))
  99         (setq start nil))
 100       (setq i (1+ i)))
 101     (if start (push (cons start end) pairs))
 102     (nreverse pairs)))
 103
 104 ;; Fix things that have been, or might be, done by codepage.el.
 105 (eval-after-load "codepage"
 106   '(progn
 107
 108 ;; Semi-dummy version for the stuff in codepage.el which we don't
 109 ;; define here.  (Used by mule-diag.)
 110 (defun cp-supported-codepages ()
 111   "Return an alist of supported codepages.
 112
 113 Each association in the alist has the form (NNN . CHARSET), where NNN is the
 114 codepage number, and CHARSET is the MULE charset which is the closest match
 115 for the character set supported by that codepage.
 116
 117 A codepage NNN is supported if a variable called `cpNNN-decode-table' exists,
 118 is a vector, and has a charset property."
 119   '(("774" . latin-iso8859-4) ("770" . latin-iso8859-4)
 120     ("773" . latin-iso8859-4)))
 121
 122 ;; A version which doesn't override the coding systems set up by this
 123 ;; file.  It could still be used for the few missing ones from
 124 ;; codepage.el.
 125 (defun codepage-setup (codepage)
 126   "Create a coding system cpCODEPAGE to support the IBM codepage CODEPAGE.
 127
 128 These coding systems are meant for encoding and decoding 8-bit non-ASCII
 129 characters used by the IBM codepages, typically in conjunction with files
 130 read/written by MS-DOS software, or for display on the MS-DOS terminal."
 131   (interactive
 132    (let ((completion-ignore-case t)
 133          (candidates (cp-supported-codepages)))
 134      (list (completing-read "Setup DOS Codepage (default 437): " candidates
 135                             nil t nil nil "437"))))
 136   (let ((cp (format "cp%s" codepage)))
 137     (unless (coding-system-p (intern cp))
 138       (cp-make-coding-systems-for-codepage
 139        cp (cp-charset-for-codepage cp) (cp-offset-for-codepage cp))))))
 140 )                                       ; eval-after-load
 141
 142 ;; Macro to allow ccl compilation at byte-compile time, avoiding
 143 ;; loading ccl.
 144 ;;;###autoload
 145 (defmacro cp-make-coding-system (name v &optional doc-string mnemonic)
 146   "Make coding system NAME for and 8-bit, extended-ASCII character set.
 147 V is a 128-long vector of characters to translate the upper half of
 148 the character set.  DOC-STRING and MNEMONIC are used as the
 149 corresponding args of `make-coding-system'.  If MNEMONIC isn't given,
 150 ?* is used.
 151 Return an updated `non-iso-charset-alist'."
 152   (let* ((encoder (intern (format "encode-%s" name)))
 153          (decoder (intern (format "decode-%s" name)))
 154          (ccl-decoder
 155           (ccl-compile
 156            `(4
 157              ((loop
 158                (read r1)
 159                (if (r1 < 128) ;; ASCII
 160                    (r0 = ,(charset-id 'ascii))
 161                  (if (r1 < 160)
 162                      (r0 = ,(charset-id 'eight-bit-control))
 163                    (r0 = ,(charset-id 'eight-bit-graphic))))
 164                (translate-character ,decoder r0 r1)
 165                ;; Allow fragmentation on decoding -- relevant for
 166                ;; Cyrillic, Greek and, possibly Arabic and Hebrew.
 167                (translate-character utf-translation-table-for-decode r0 r1)
 168                (write-multibyte-character r0 r1)
 169                (repeat))))))
 170          (ccl-encoder
 171           (ccl-compile
 172            `(1
 173              ((loop
 174                (read-multibyte-character r0 r1)
 175                (translate-character ,encoder r0 r1)
 176                (if (r0 != ,(charset-id 'ascii))
 177                    (if (r0 != ,(charset-id 'eight-bit-graphic))
 178                        (if (r0 != ,(charset-id 'eight-bit-control))
 179                            (r1 = ??))))
 180                (write-repeat r1)))))))
 181     `(let ((translation-table (cp-make-translation-table ,v))
 182            (codes (cp-valid-codes ,v)))
 183        (define-translation-table ',decoder translation-table)
 184        (define-translation-table ',encoder
 185          (char-table-extra-slot translation-table 0))
 186        (make-coding-system
 187         ',name 4 ,(or mnemonic ?*)
 188         (or ,doc-string (format "%s encoding" ',name))
 189         (cons ,ccl-decoder ,ccl-encoder)
 190         (list (cons 'safe-chars (get ',encoder 'translation-table))
 191               (cons 'valid-codes codes)
 192               (cons 'mime-charset ',name)
 193               ;; For Quail translation.  Fixme: this should really be
 194               ;; a separate table that only translates the coding
 195               ;; system's safe-chars.
 196               (cons 'translation-table-for-input 'ucs-mule-to-mule-unicode)))
 197        (let ((slot (assq ',name non-iso-charset-alist))
 198              (elt (list nil                     ; charset list
 199                         ',decoder
 200                         (let (l)                ; code range
 201                           (dolist (elt (reverse codes))
 202                             (push (cdr elt) l)
 203                             (push (car elt) l))
 204                           (list l)))))
 205          (if (not slot)
 206              (push (cons ',name elt) non-iso-charset-alist)
 207            (setcdr slot elt)
 208            non-iso-charset-alist)))))
 209
 210 (eval-when-compile (defvar non-iso-charset-alist))
 211
 212 ;; These tables were mostly derived by running somthing like
 213 ;; `recode -f cpxxx/..utf-8' on a binary file filled by
 214 ;; `(dotimes (i 128) (insert ?? ?\\ (+ 128 i) ?\n))' and then
 215 ;; exchanging the ?\� entries for nil.  iconv was used instead in some
 216 ;; cases.
 217
 218 ;; Fixme: Do better for mode-line mnemonics?
 219
 220 ;;;###autoload(autoload-coding-system 'cp437 '(require 'code-pages))
 221 (cp-make-coding-system
 222  cp437
 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
 352 ;;;###autoload(autoload-coding-system 'cp737 '(require 'code-pages))
 353 (cp-make-coding-system
 354  cp737
 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   ?\ ])
 483 (coding-system-put 'cp737 'mime-charset nil) ; not in IANA list
 484
 485 ;;;###autoload(autoload-coding-system 'cp775 '(require 'code-pages))
 486 (cp-make-coding-system
 487  cp775
 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
 617 ;;;###autoload(autoload-coding-system 'cp850 '(require 'code-pages))
 618 (cp-make-coding-system
 619  cp850
 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
 749 ;;;###autoload(autoload-coding-system 'cp851 '(require 'code-pages))
 750 (cp-make-coding-system
 751  cp851
 752  [?\Ç
 753   ?\ü
 754   ?\é
 755   ?\â
 756   ?\ä
 757   ?\à
 758   ?\Ά
 759   ?\ç
 760   ?\ê
 761   ?\ë
 762   ?\è
 763   ?\ï
 764   ?\î
 765   ?\Έ
 766   ?\Ä
 767   ?\Ή
 768   ?\Ί
 769   nil
 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
 881 ;;;###autoload(autoload-coding-system 'cp852 '(require 'code-pages))
 882 (cp-make-coding-system
 883  cp852
 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
1013 ;;;###autoload(autoload-coding-system 'cp855 '(require 'code-pages))
1014 (cp-make-coding-system
1015  cp855
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   ?\Ч
1141   nil
1142   ?\■
1143   ?\ ])
1144
1145 ;;;###autoload(autoload-coding-system 'cp857 '(require 'code-pages))
1146 (cp-make-coding-system
1147  cp857
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   ?\È
1233   nil
1234   ?\Í
1235   ?\Î
1236   ?\Ï
1237   ?\┘
1238   ?\┌
1239   ?\█
1240   ?\▄
1241   ?\¦
1242   ?\Ì
1243   ?\▀
1244   ?\Ó
1245   ?\ß
1246   ?\Ô
1247   ?\Ò
1248   ?\õ
1249   ?\Õ
1250   ?\µ
1251   nil
1252   ?\×
1253   ?\Ú
1254   ?\Û
1255   ?\Ù
1256   ?\ì
1257   ?\ÿ
1258   ?\—
1259   ?\´
1260   ?\
1261   ?\±
1262   nil
1263   ?\¾
1264   ?\¶
1265   ?\§
1266   ?\÷
1267   ?\˛
1268   ?\°
1269   ?\¨
1270   ?\˙
1271   ?\¹
1272   ?\³
1273   ?\²
1274   ?\■
1275   ?\ ])
1276
1277 ;;;###autoload(autoload-coding-system 'cp858 '(require 'code-pages))
1278 (cp-make-coding-system
1279  cp858
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
1409 ;;;###autoload(autoload-coding-system 'cp860 '(require 'code-pages))
1410 (cp-make-coding-system
1411  cp860
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   ?\¿
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
1541 ;;;###autoload(autoload-coding-system 'cp861 '(require 'code-pages))
1542 (cp-make-coding-system
1543  cp861
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   ?\¿
1585   nil
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
1673 ;;;###autoload(autoload-coding-system 'cp862 '(require 'code-pages))
1674 (cp-make-coding-system
1675  cp862
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   nil
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
1805 ;;;###autoload(autoload-coding-system 'cp863 '(require 'code-pages))
1806 (cp-make-coding-system
1807  cp863
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   ?\Ü
1835   ?\¢
1836   ?\£
1837   ?\Ù
1838   ?\Û
1839   ?\ƒ
1840   ?\¦
1841   ?\´
1842   ?\ó
1843   ?\ú
1844   ?\¨
1845   ?\¸
1846   ?\³
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
1937 ;;;###autoload(autoload-coding-system 'cp864 '(require 'code-pages))
1938 (cp-make-coding-system
1939  cp864
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   nil
1968   nil
1969   ?\ﻻ
1970   ?\ﻼ
1971   ?\
1972   nil
1973   ?\
1974   ?\ﺂ
1975   ?\£
1976   ?\¤
1977   ?\ﺄ
1978   nil
1979   nil
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
2069 ;;;###autoload(autoload-coding-system 'cp865 '(require 'code-pages))
2070 (cp-make-coding-system
2071  cp865
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   ?\ ])
2200
2201 ;;;###autoload(autoload-coding-system 'cp866 '(require 'code-pages))
2202 (cp-make-coding-system
2203  cp866
2204  [?\А
2205   ?\Б
2206   ?\В
2207   ?\Г
2208   ?\Д
2209   ?\Е
2210   ?\Ж
2211   ?\З
2212   ?\И
2213   ?\Й
2214   ?\К
2215   ?\Л
2216   ?\М
2217   ?\Н
2218   ?\О
2219   ?\П
2220   ?\Р
2221   ?\С
2222   ?\Т
2223   ?\У
2224   ?\Ф
2225   ?\Х
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  "CP866 (Cyrillic)."
2333  ?A)
2334
2335 ;;;###autoload(autoload-coding-system 'cp869 '(require 'code-pages))
2336 (cp-make-coding-system
2337  cp869
2338  [nil
2339   nil
2340   nil
2341   nil
2342   nil
2343   nil
2344   ?\Ά
2345   nil
2346   ?\·
2347   ?\¬
2348   ?\¦
2349   ?\‛
2350   ?\’
2351   ?\Έ
2352   ?\—
2353   ?\Ή
2354   ?\Ί
2355   ?\Ϊ
2356   ?\Ό
2357   nil
2358   nil
2359   ?\Ύ
2360   ?\Ϋ
2361   ?\©
2362   ?\Ώ
2363   ?\²
2364   ?\³
2365   ?\ά
2366   ?\£
2367   ?\έ
2368   ?\ή
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   ?\┌
2429   ?\█
2430   ?\▄
2431   ?\δ
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   ?\ϋ
2462   ?\ΰ
2463   ?\ώ
2464   ?\■
2465   ?\ ])
2466
2467 ;;;###autoload(autoload-coding-system 'cp874 '(require 'code-pages))
2468 (cp-make-coding-system
2469  cp874
2470  [?\€
2471   nil
2472   nil
2473   nil
2474   nil
2475   ?\…
2476   nil
2477   nil
2478   nil
2479   nil
2480   nil
2481   nil
2482   nil
2483   nil
2484   nil
2485   nil
2486   nil
2487   ?\‘
2488   ?\’
2489   ?\“
2490   ?\”
2491   ?\•
2492   ?\–
2493   ?\—
2494   nil
2495   nil
2496   nil
2497   nil
2498   nil
2499   nil
2500   nil
2501   nil
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   nil
2562   nil
2563   nil
2564   nil
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   nil
2595   nil
2596   nil
2597   nil])
2598
2599 ;;;###autoload(autoload-coding-system 'windows-1250 '(require 'code-pages))
2600 ;;;###autoload(autoload-coding-system 'cp1250 '(require 'code-pages))
2601 (cp-make-coding-system
2602  windows-1250
2603  [?\€
2604   nil
2605   ?\‚
2606   nil
2607   ?\„
2608   ?\…
2609   ?\†
2610   ?\‡
2611   nil
2612   ?\‰
2613   ?\Š
2614   ?\‹
2615   ?\Ś
2616   ?\Ť
2617   ?\Ž
2618   ?\Ź
2619   nil
2620   ?\‘
2621   ?\’
2622   ?\“
2623   ?\”
2624   ?\•
2625   ?\–
2626   ?\—
2627   nil
2628   ?\™
2629   ?\š
2630   ?\›
2631   ?\ś
2632   ?\ť
2633   ?\ž
2634   ?\ź
2635   ?\
2636   ?\ˇ
2637   ?\˘
2638   ?\Ł
2639   ?\¤
2640   ?\Ą
2641   ?\¦
2642   ?\§
2643   ?\¨
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   ?\Đ
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   ?\ý
2729   ?\ţ
2730   ?\˙])
2731
2732 ;;;###autoload(autoload-coding-system 'windows-1253 '(require 'code-pages))
2733 ;;;###autoload(autoload-coding-system 'cp1253 '(require 'code-pages))
2734 (cp-make-coding-system
2735  windows-1253
2736  [?\€
2737   nil
2738   ?\‚
2739   ?\ƒ
2740   ?\„
2741   ?\…
2742   ?\†
2743   ?\‡
2744   nil
2745   ?\‰
2746   nil
2747   ?\‹
2748   nil
2749   nil
2750   nil
2751   nil
2752   nil
2753   ?\‘
2754   ?\’
2755   ?\“
2756   ?\”
2757   ?\•
2758   ?\–
2759   ?\—
2760   nil
2761   ?\™
2762   nil
2763   ?\›
2764   nil
2765   nil
2766   nil
2767   nil
2768   ?\
2769   ?\΅
2770   ?\Ά
2771   ?\£
2772   ?\¤
2773   ?\¥
2774   ?\¦
2775   ?\§
2776   ?\¨
2777   ?\©
2778   nil
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   nil
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   nil]
2864  nil ?g) ;; Greek
2865
2866 ;;;###autoload(autoload-coding-system 'windows-1254 '(require 'code-pages))
2867 ;;;###autoload(autoload-coding-system 'cp1254 '(require 'code-pages))
2868 (cp-make-coding-system
2869  windows-1254
2870  [?\€
2871   nil
2872   ?\‚
2873   ?\ƒ
2874   ?\„
2875   ?\…
2876   ?\†
2877   ?\‡
2878   ?\ˆ
2879   ?\‰
2880   ?\Š
2881   ?\‹
2882   ?\Œ
2883   nil
2884   nil
2885   nil
2886   nil
2887   ?\‘
2888   ?\’
2889   ?\“
2890   ?\”
2891   ?\•
2892   ?\–
2893   ?\—
2894   ?\˜
2895   ?\™
2896   ?\š
2897   ?\›
2898   ?\œ
2899   nil
2900   nil
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   ?\Ç
2942   ?\È
2943   ?\É
2944   ?\Ê
2945   ?\Ë
2946   ?\Ì
2947   ?\Í
2948   ?\Î
2949   ?\Ï
2950   ?\Ğ
2951   ?\Ñ
2952   ?\Ò
2953   ?\Ó
2954   ?\Ô
2955   ?\Õ
2956   ?\Ö
2957   ?\×
2958   ?\Ø
2959   ?\Ù
2960   ?\Ú
2961   ?\Û
2962   ?\Ü
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   ?\ø
2991   ?\ù
2992   ?\ú
2993   ?\û
2994   ?\ü
2995   ?\ı
2996   ?\ş
2997   ?\ÿ])
2998
2999 ;; yi_US
3000 ;;;###autoload(autoload-coding-system 'windows-1255 '(require 'code-pages))
3001 ;;;###autoload(autoload-coding-system 'cp1255 '(require 'code-pages))
3002 (cp-make-coding-system
3003  windows-1255
3004  [?\€
3005   nil
3006   ?\‚
3007   ?\ƒ
3008   ?\„
3009   ?\…
3010   ?\†
3011   ?\‡
3012   ?\ˆ
3013   ?\‰
3014   nil
3015   ?\‹
3016   nil
3017   nil
3018   nil
3019   nil
3020   nil
3021   ?\‘
3022   ?\’
3023   ?\“
3024   ?\”
3025   ?\•
3026   ?\–
3027   ?\—
3028   ?\˜
3029   ?\™
3030   nil
3031   ?\›
3032   nil
3033   nil
3034   nil
3035   nil
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   nil
3079   ?\ֻ
3080   ?\ּ
3081   ?\ֽ
3082   ?\־
3083   ?\ֿ
3084   ?\׀
3085   ?\ׁ
3086   ?\ׂ
3087   ?\׃
3088   ?\װ
3089   ?\ױ
3090   ?\ײ
3091   ?\׳
3092   ?\״
3093   nil
3094   nil
3095   nil
3096   nil
3097   nil
3098   nil
3099   nil
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   nil
3128   nil
3129   ?\‎
3130   ?\‏
3131   nil]
3132  nil ?h) ;; Hebrew
3133
3134 ;;;###autoload(autoload-coding-system 'windows-1256 '(require 'code-pages))
3135 ;;;###autoload(autoload-coding-system 'cp1256 '(require 'code-pages))
3136 (cp-make-coding-system
3137  windows-1256
3138  [?\€
3139   ?\پ
3140   ?\‚
3141   ?\ƒ
3142   ?\„
3143   ?\…
3144   ?\†
3145   ?\‡
3146   ?\ˆ
3147   ?\‰
3148   ?\ٹ
3149   ?\‹
3150   ?\Œ
3151   ?\چ
3152   ?\ژ
3153   ?\ڈ
3154   ?\گ
3155   ?\‘
3156   ?\’
3157   ?\“
3158   ?\”
3159   ?\•
3160   ?\–
3161   ?\—
3162   ?\ک
3163   ?\™
3164   ?\ڑ
3165   ?\›
3166   ?\œ
3167   ?\‌
3168   ?\‍
3169   ?\ں
3170   ?\
3171   ?\،
3172   ?\¢
3173   ?\£
3174   ?\¤
3175   ?\¥
3176   ?\¦
3177   ?\§
3178   ?\¨
3179   ?\©
3180   ?\ھ
3181   ?\«
3182   ?\¬
3183   ?\
3184   ?\®
3185   ?\¯
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   ?\ْ
3261   ?\û
3262   ?\ü
3263   ?\‎
3264   ?\‏
3265   ?\ے]
3266  nil ?a) ;; Arabic
3267
3268 ;;;###autoload(autoload-coding-system 'windows-1257 '(require 'code-pages))
3269 ;;;###autoload(autoload-coding-system 'cp1257 '(require 'code-pages))
3270 (cp-make-coding-system
3271  windows-1257
3272  [?\€
3273   nil
3274   ?\‚
3275   nil
3276   ?\„
3277   ?\…
3278   ?\†
3279   ?\‡
3280   nil
3281   ?\‰
3282   nil
3283   ?\‹
3284   nil
3285   nil
3286   nil
3287   nil
3288   nil
3289   ?\‘
3290   ?\’
3291   ?\“
3292   ?\”
3293   ?\•
3294   ?\–
3295   ?\—
3296   nil
3297   ?\™
3298   nil
3299   ?\›
3300   nil
3301   nil
3302   nil
3303   nil
3304   ?\
3305   nil
3306   ?\¢
3307   ?\£
3308   ?\¤
3309   nil
3310   ?\¦
3311   ?\§
3312   ?\Ø
3313   ?\©
3314   ?\Ŗ
3315   ?\«
3316   ?\¬
3317   ?\
3318   ?\®
3319   ?\Æ
3320   ?\°
3321   ?\±
3322   ?\²
3323   ?\³
3324   nil
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   ?\ś
3395   ?\ū
3396   ?\ü
3397   ?\ż
3398   ?\ž
3399   nil])
3400
3401 ;;;###autoload(autoload-coding-system 'windows-1258 '(require 'code-pages))
3402 ;;;###autoload(autoload-coding-system 'cp1258 '(require 'code-pages))
3403 (cp-make-coding-system
3404  windows-1258
3405  [?\€
3406   nil
3407   ?\‚
3408   ?\ƒ
3409   ?\„
3410   ?\…
3411   ?\†
3412   ?\‡
3413   ?\ˆ
3414   ?\‰
3415   nil
3416   ?\‹
3417   ?\Œ
3418   nil
3419   nil
3420   nil
3421   nil
3422   ?\‘
3423   ?\’
3424   ?\“
3425   ?\”
3426   ?\•
3427   ?\–
3428   ?\—
3429   ?\˜
3430   ?\™
3431   nil
3432   ?\›
3433   ?\œ
3434   nil
3435   nil
3436   ?\Ÿ
3437   ?\
3438   ?\¡
3439   ?\¢
3440   ?\£
3441   ?\¤
3442   ?\¥
3443   ?\¦
3444   ?\§
3445   ?\¨
3446   ?\©
3447   ?\ª
3448   ?\«
3449   ?\¬
3450   ?\
3451   ?\®
3452   ?\¯
3453   ?\°
3454   ?\±
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   ?\ö
3524   ?\÷
3525   ?\ø
3526   ?\ù
3527   ?\ú
3528   ?\û
3529   ?\ü
3530   ?\ư
3531   ?\₫
3532   ?\ÿ])
3533
3534 ;;;###autoload(autoload-coding-system 'next '(require 'code-pages))
3535 (cp-make-coding-system
3536  next
3537  [?\
3538   ?\À
3539   ?\Á
3540   ?\Â
3541   ?\Ã
3542   ?\Ä
3543   ?\Å
3544   ?\Ç
3545   ?\È
3546   ?\É
3547   ?\Ê
3548   ?\Ë
3549   ?\Ì
3550   ?\Í
3551   ?\Î
3552   ?\Ï
3553   ?\Ð
3554   ?\Ñ
3555   ?\Ò
3556   ?\Ó
3557   ?\Ô
3558   ?\Õ
3559   ?\Ö
3560   ?\Ù
3561   ?\Ú
3562   ?\Û
3563   ?\Ü
3564   ?\Ý
3565   ?\Þ
3566   ?\µ
3567   ?\×
3568   ?\÷
3569   ?\©
3570   ?\¡
3571   ?\¢
3572   ?\£
3573   ?\⁄
3574   ?\¥
3575   ?\ƒ
3576   ?\§
3577   ?\¤
3578   ?\’
3579   ?\“
3580   ?\«
3581   ?\‹
3582   ?\›
3583   ?\ﬁ
3584   ?\ﬂ
3585   ?\®
3586   ?\–
3587   ?\†
3588   ?\‡
3589   ?\·
3590   ?\¦
3591   ?\¶
3592   ?\•
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   ?\ø
3659   ?\œ
3660   ?\ß
3661   ?\þ
3662   ?\ÿ
3663   nil
3664   nil]
3665  "NeXTstep encoding." ?N)
3666
3667 ;;;###autoload(autoload-coding-system 'koi8-t '(require 'code-pages))
3668 (cp-make-coding-system
3669  koi8-t                                 ; used by glibc for tg_TJ
3670  [?\қ
3671   ?\ғ
3672   ?\‚
3673   ?\Ғ
3674   ?\„
3675   ?\…
3676   ?\†
3677   ?\‡
3678   nil
3679   ?\‰
3680   ?\ҳ
3681   ?\‹
3682   ?\Ҳ
3683   ?\ҷ
3684   ?\Ҷ
3685   nil
3686   ?\Қ
3687   ?\‘
3688   ?\’
3689   ?\“
3690   ?\”
3691   ?\•
3692   ?\–
3693   ?\—
3694   nil
3695   ?\™
3696   nil
3697   ?\›
3698   nil
3699   nil
3700   nil
3701   nil
3702   nil
3703   ?\ӯ
3704   ?\Ӯ
3705   ?\ё
3706   ?\¤
3707   ?\ӣ
3708   ?\¦
3709   ?\§
3710   nil
3711   nil
3712   nil
3713   ?\«
3714   ?\¬
3715   ?\
3716   ?\®
3717   nil
3718   ?\°
3719   ?\±
3720   ?\²
3721   ?\Ё
3722   nil
3723   ?\Ӣ
3724   ?\¶
3725   ?\·
3726   nil
3727   ?\№
3728   nil
3729   ?\»
3730   nil
3731   nil
3732   nil
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   ?\Ж
3789   ?\В
3790   ?\Ь
3791   ?\Ы
3792   ?\З
3793   ?\Ш
3794   ?\Э
3795   ?\Щ
3796   ?\Ч
3797   ?\Ъ]
3798  "Unicode-based KOI8-T encoding for Cyrillic")
3799 (coding-system-put 'koi8-t 'mime-charset nil) ; not in the IANA list
3800 (define-coding-system-alias 'cyrillic-koi8-t 'koi8-t)
3801
3802 ;;   Online final ISO draft:
3803
3804 ;;     http://www.evertype.com/standards/iso8859/fdis8859-16-en.pdf
3805
3806 ;;   Equivalent National Standard:
3807 ;;     Romanian Standard SR 14111:1998, Romanian Standards Institution
3808 ;;     (ASRO).
3809
3810 ;; Intended usage:
3811
3812 ;;  "This set of coded graphic characters is intended for use in data and
3813 ;;   text processing applications and also for information interchange. The
3814 ;;   set contains graphic characters used for general purpose applications in
3815 ;;   typical office environments in at least the following languages:
3816 ;;   Albanian, Croatian, English, Finnish, French, German, Hungarian, Irish
3817 ;;   Gaelic (new orthography), Italian, Latin, Polish, Romanian, and
3818 ;;   Slovenian. This set of coded graphic characters may be regarded as a
3819 ;;   version of an 8-bit code according to ISO/IEC 2022 or ISO/IEC 4873 at
3820 ;;   level 1." [ISO 8859-16:2001(E), p. 1]
3821
3822 ;;   This charset is suitable for use in MIME text body parts.
3823
3824 ;;   ISO 8859-16 was primarily designed for single-byte encoding the Romanian
3825 ;;   language. The UTF-8 charset is the preferred and in today's MIME software
3826 ;;   more widely implemented encoding suitable for Romanian.
3827 ;;;###autoload(autoload-coding-system 'iso-8859-16 '(require 'code-pages))
3828 (cp-make-coding-system
3829  iso-latin-10                           ; consistent with, e.g. Latin-1
3830  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3831   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3832   ?\
3833   ?\Ą
3834   ?\ą
3835   ?\Ł
3836   ?\€
3837   ?\„
3838   ?\Š
3839   ?\§
3840   ?\š
3841   ?\©
3842   ?\Ș
3843   ?\«
3844   ?\Ź
3845   ?\
3846   ?\ź
3847   ?\Ż
3848   ?\°
3849   ?\±
3850   ?\Č
3851   ?\ł
3852   ?\Ž
3853   ?\”
3854   ?\¶
3855   ?\·
3856   ?\ž
3857   ?\č
3858   ?\ș
3859   ?\»
3860   ?\Œ
3861   ?\œ
3862   ?\Ÿ
3863   ?\ż
3864   ?\À
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  "Unicode-based encoding for Latin-10 (MIME: ISO-8859-16)"
3929  ?r) ;; Romanian
3930 (coding-system-put 'iso-latin-10 'mime-charset 'iso-8859-16)
3931 (define-coding-system-alias 'iso-8859-16 'iso-latin-10)
3932 (define-coding-system-alias 'latin-10 'iso-latin-10)
3933
3934 ;; Unicode-based alternative which has the possible advantage of
3935 ;; having its relative sparseness specified.
3936 ;;;###autoload(autoload-coding-system 'iso-8859-6 '(require 'code-pages))
3937 (cp-make-coding-system
3938  ;; The base system uses arabic-iso-8bit, but that's not a MIME charset.
3939  iso-8859-6
3940  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3941   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3942   ?\
3943   nil
3944   nil
3945   nil
3946   ?¤
3947   nil
3948   nil
3949   nil
3950   nil
3951   nil
3952   nil
3953   nil
3954   ?،
3955   ?
3956   nil
3957   nil
3958   nil
3959   nil
3960   nil
3961   nil
3962   nil
3963   nil
3964   nil
3965   nil
3966   nil
3967   nil
3968   nil
3969   ?؛
3970   nil
3971   nil
3972   nil
3973   ?؟
3974   nil
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   nil
4002   nil
4003   nil
4004   nil
4005   nil
4006   ?ـ
4007   ?ف
4008   ?ق
4009   ?ك
4010   ?ل
4011   ?م
4012   ?ن
4013   ?ه
4014   ?و
4015   ?ى
4016   ?ي
4017   ?ً
4018   ?ٌ
4019   ?ٍ
4020   ?َ
4021   ?ُ
4022   ?ِ
4023   ?ّ
4024   ?ْ
4025   nil nil nil nil nil nil nil nil nil nil nil nil nil]
4026  "Unicode-based Arabic ISO/IEC 8859-6 (MIME: ISO-8859-6)"
4027  ?6)
4028 (define-coding-system-alias 'arabic-iso-8bit 'iso-8859-6)
4029
4030 ;;;###autoload(autoload-coding-system 'iso-8859-10 '(require 'code-pages))
4031 (cp-make-coding-system
4032  iso-latin-6
4033  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
4034   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
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   ?\Â
4070   ?\Ã
4071   ?\Ä
4072   ?\Å
4073   ?\Æ
4074   ?\Į
4075   ?\Č
4076   ?\É
4077   ?\Ę
4078   ?\Ë
4079   ?\Ė
4080   ?\Í
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  "Unicode-based encoding for Latin-6 (MIME: ISO-8859-10)")
4132 (coding-system-put 'iso-latin-6 'mime-charset 'iso-8859-10)
4133 (define-coding-system-alias 'iso-8859-10 'iso-latin-6)
4134 (define-coding-system-alias 'latin-6 'iso-latin-6)
4135
4136 ;; used by lt_LT, lv_LV, mi_NZ
4137 ;;;###autoload(autoload-coding-system 'iso-8859-13 '(require 'code-pages))
4138 (cp-make-coding-system
4139  iso-latin-7
4140  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
4141   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
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   ?\ć
4210   ?\ä
4211   ?\å
4212   ?\ę
4213   ?\ē
4214   ?\č
4215   ?\é
4216   ?\ź
4217   ?\ė
4218   ?\ģ
4219   ?\ķ
4220   ?\ī
4221   ?\ļ
4222   ?\š
4223   ?\ń
4224   ?\ņ
4225   ?\ó
4226   ?\ō
4227   ?\õ
4228   ?\ö
4229   ?\÷
4230   ?\ų
4231   ?\ł
4232   ?\ś
4233   ?\ū
4234   ?\ü
4235   ?\ż
4236   ?\ž
4237   ?\’
4238   ]
4239  "Unicode-based encoding for Latin-7 (MIME: ISO-8859-13)"
4240  ?l) ;; Lithuanian/Latvian
4241 (coding-system-put 'iso-latin-7 'mime-charset 'iso-8859-13)
4242 (define-coding-system-alias 'iso-8859-13 'iso-latin-7)
4243 (define-coding-system-alias 'latin-7 'iso-latin-7)
4244
4245 ;; Fixme: check on the C1 characters which libiconv includes.  They
4246 ;; are reproduced below, but are probably wrong.  I can't find an
4247 ;; official definition of georgian-ps.
4248 ;;;###autoload(autoload-coding-system 'georgian-ps '(require 'code-pages))
4249 (cp-make-coding-system
4250  georgian-ps                            ; used by glibc for ka_GE
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   ?\ც
4345   ?\ძ
4346   ?\წ
4347   ?\ჭ
4348   ?\ხ
4349   ?\ჴ
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  nil ?G)
4380 (coding-system-put 'georgian-ps 'mime-charset nil) ; not in IANA list
4381
4382 ;;;###autoload(autoload-coding-system 'cp720 '(require 'code-pages))
4383 ;; From http://www.microsoft.com/globaldev/reference/oem/720.htm
4384 (cp-make-coding-system
4385  cp720
4386  [nil
4387   nil
4388   ?\é
4389   ?\â
4390   nil
4391   ?\à
4392   nil
4393   ?\ç
4394   ?\ê
4395   ?\ë
4396   ?\è
4397   ?\ï
4398   ?\î
4399   nil
4400   nil
4401   nil
4402   nil
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   ?\▄
4479   ?\▌
4480   ?\▐
4481   ?\▀
4482   ?\ض
4483   ?\ط
4484   ?\ظ
4485   ?\ع
4486   ?\غ
4487   ?\ف
4488   ?\µ
4489   ?\ق
4490   ?\ك
4491   ?\ل
4492   ?\م
4493   ?\ن
4494   ?\ه
4495   ?\و
4496   ?\ى
4497   ?\ي
4498   ?\≡
4499   ?\ً
4500   ?\ٌ
4501   ?\ٍ
4502   ?\َ
4503   ?\ُ
4504   ?\ِ
4505   ?\≈
4506   ?\°
4507   ?\∙
4508   ?\·
4509   ?\√
4510   ?\ⁿ
4511   ?\²
4512   ?\■
4513   ?\ ])
4514 (coding-system-put 'cp720 'mime-charset nil) ; not in IANA list
4515
4516 ;;;###autoload(autoload-coding-system 'cp1125 '(require 'code-pages))
4517 ;; http://oss.software.ibm.com/cvs/icu/charset/data/ucm/ibm-1125_P100-2000.ucm
4518 (cp-make-coding-system
4519  cp1125
4520  [?\А
4521   ?\Б
4522   ?\В
4523   ?\Г
4524   ?\Д
4525   ?\Е
4526   ?\Ж
4527   ?\З
4528   ?\И
4529   ?\Й
4530   ?\К
4531   ?\Л
4532   ?\М
4533   ?\Н
4534   ?\О
4535   ?\П
4536   ?\Р
4537   ?\С
4538   ?\Т
4539   ?\У
4540   ?\Ф
4541   ?\Х
4542   ?\Ц
4543   ?\Ч
4544   ?\Ш
4545   ?\Щ
4546   ?\Ъ
4547   ?\Ы
4548   ?\Ь
4549   ?\Э
4550   ?\Ю
4551   ?\Я
4552   ?\а
4553   ?\б
4554   ?\в
4555   ?\г
4556   ?\д
4557   ?\е
4558   ?\ж
4559   ?\з
4560   ?\и
4561   ?\й
4562   ?\к
4563   ?\л
4564   ?\м
4565   ?\н
4566   ?\о
4567   ?\п
4568   ?\░
4569   ?\▒
4570   ?\▓
4571   ?\│
4572   ?\┤
4573   ?\╡
4574   ?\╢
4575   ?\╖
4576   ?\╕
4577   ?\╣
4578   ?\║
4579   ?\╗
4580   ?\╝
4581   ?\╜
4582   ?\╛
4583   ?\┐
4584   ?\└
4585   ?\┴
4586   ?\┬
4587   ?\├
4588   ?\─
4589   ?\┼
4590   ?\╞
4591   ?\╟
4592   ?\╚
4593   ?\╔
4594   ?\╩
4595   ?\╦
4596   ?\╠
4597   ?\═
4598   ?\╬
4599   ?\╧
4600   ?\╨
4601   ?\╤
4602   ?\╥
4603   ?\╙
4604   ?\╘
4605   ?\╒
4606   ?\╓
4607   ?\╫
4608   ?\╪
4609   ?\┘
4610   ?\┌
4611   ?\█
4612   ?\▄
4613   ?\▌
4614   ?\▐
4615   ?\▀
4616   ?\р
4617   ?\с
4618   ?\т
4619   ?\у
4620   ?\ф
4621   ?\х
4622   ?\ц
4623   ?\ч
4624   ?\ш
4625   ?\щ
4626   ?\ъ
4627   ?\ы
4628   ?\ь
4629   ?\э
4630   ?\ю
4631   ?\я
4632   ?\Ё
4633   ?\ё
4634   ?\Ґ
4635   ?\ґ
4636   ?\Є
4637   ?\є
4638   ?\І
4639   ?\і
4640   ?\Ї
4641   ?\ї
4642   ?\·
4643   ?\√
4644   ?\№
4645   ?\¤
4646   ?\■
4647   ?\ ])
4648 (define-coding-system-alias 'ruscii 'cp1125)
4649 ;; Original name for cp1125, says Serhii Hlodin <hlodin@lutsk.bank.gov.ua>
4650 (define-coding-system-alias 'cp866u 'cp1125)
4651 (coding-system-put 'cp1125 'mime-charset nil)
4652
4653 ;; Suggested by Anton Zinoviev <anton@lml.bas.bg>: Bulgarian DOS
4654 ;; codepage.  Table at
4655 ;; <http://en.wikipedia.org/wiki/MIK_Code_page>.
4656 ;;;###autoload(autoload-coding-system 'mik '(require 'code-pages))
4657 (cp-make-coding-system
4658  mik
4659  [?А ?Б ?В ?Г ?Д ?Е ?Ж ?З ?И ?Й ?К ?Л ?М ?Н ?О ?П ?Р ?С ?Т ?У ?Ф ?Х ?Ц
4660   ?Ч ?Ш ?Щ ?Ъ ?Ы ?Ь ?Э ?Ю ?Я ?а ?б ?в ?г ?д ?е ?ж ?з ?и ?й ?к ?л ?м ?н
4661   ?о ?п ?р ?с ?т ?у ?ф ?х ?ц ?ч ?ш ?щ ?ъ ?ы ?ь ?э ?ю ?я ?└ ?┴ ?┬ ?├ ?─
4662   ?┼ ?╣ ?║ ?╚ ?╔ ?╩ ?╦ ?╠ ?═ ?╬ ?┐ ?░ ?▒ ?▓ ?│ ?┤ ?№ ?§ ?╗ ?╝ ?┘ ?┌ ?█
4663   ?▄ ?▌ ?▐ ?▀ ?α ?ß ?Γ ?π ?Σ ?σ ?µ ?τ ?Φ ?Θ ?Ω ?δ ?∞ ?φ ?ε ?∩ ?≡ ?± ?≥
4664   ?≤ ?⌠ ?⌡ ?÷ ?≈ ?° ?∙ ?· ?√ ?ⁿ ?² ?■ ? ])
4665 (coding-system-put 'mik 'mime-charset nil)
4666
4667 ;; Suggested by Anton Zinoviev <anton@lml.bas.bg>: similar to CP1251
4668 ;; and used for some non-Slavic Cyrillic languages.  Table found at
4669 ;; <URL:ftp://ftp.logic.ru/pub/logic/linux/cyr-asian/PT154>.  See also
4670 ;; <URL:http://lists.w3.org/Archives/Public/ietf-charsets/2002AprJun/0092.html,
4671 ;; which suggests it's used in an Asian Cyrillic context.
4672 ;;;###autoload(autoload-coding-system 'pt154 '(require 'code-pages))
4673 (cp-make-coding-system
4674  pt154
4675  [?Җ ?Ғ ?Ӯ ?ғ ?„ ?… ?Ҷ ?Ү ?Ҳ ?ү ?Ҡ ?Ӣ ?Ң ?Қ ?Һ ?Ҹ ?җ ?‘ ?’ ?“ ?” ?• ?–
4676   ?— ?ҳ ?ҷ ?ҡ ?ӣ ?ң ?қ ?һ ?ҹ ?  ?Ў ?ў ?Ј ?Ө ?Ҙ ?Ұ ?§ ?Ё ?© ?Ә ?\« ?¬ ?ӯ
4677   ?® ?Ҝ ?° ?ұ ?І ?і ?ҙ ?ө ?¶ ?· ?ё ?№ ?ә ?\» ?ј ?Ҫ ?ҫ ?ҝ ?А ?Б ?В ?Г ?Д
4678   ?Е ?Ж ?З ?И ?Й ?К ?Л ?М ?Н ?О ?П ?Р ?С ?Т ?У ?Ф ?Х ?Ц ?Ч ?Ш ?Щ ?Ъ ?Ы
4679   ?Ь ?Э ?Ю ?Я ?а ?б ?в ?г ?д ?е ?ж ?з ?и ?й ?к ?л ?м ?н ?о ?п ?р ?с ?т
4680   ?у ?ф ?х ?ц ?ч ?ш ?щ ?ъ ?ы ?ь ?э ?ю ?я])
4681
4682 ;;;###autoload(autoload-coding-system 'iso-8859-11 '(require 'code-pages))
4683 (cp-make-coding-system
4684  iso-8859-11
4685  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
4686   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
4687   ?   ?ก  ?ข  ?ฃ  ?ค  ?ฅ  ?ฆ  ?ง  ?จ  ?ฉ  ?ช  ?ซ  ?ฌ  ?ญ  ?ฎ  ?ฏ
4688   ?ฐ  ?ฑ  ?ฒ  ?ณ  ?ด  ?ต  ?ถ  ?ท  ?ธ  ?น  ?บ  ?ป  ?ผ  ?ฝ  ?พ  ?ฟ
4689   ?ภ  ?ม  ?ย  ?ร  ?ฤ  ?ล  ?ฦ  ?ว  ?ศ  ?ษ  ?ส  ?ห  ?ฬ  ?อ  ?ฮ  ?ฯ
4690   ?ะ  ?ั  ?า  ?ำ  ?ิ  ?ี  ?ึ  ?ื  ?ุ  ?ู  ?ฺ  nil nil nil nil ?฿
4691   ?เ  ?แ  ?โ  ?ใ  ?ไ  ?ๅ  ?ๆ  ?็  ?่  ?้  ?๊  ?๋  ?์  ?ํ  ?๎  ?๏
4692   ?๐  ?๑  ?๒  ?๓  ?๔  ?๕  ?๖  ?๗  ?๘  ?๙  ?๚  ?๛   nil nil nil nil]
4693  "ISO-8859-11.  This is `thai-tis620' with the addition of no-break-space.")
4694
4695 (dotimes (i 9)
4696   (let ((w (intern (format "windows-125%d" i)))
4697         (c (intern (format "cp125%d" i))))
4698     ;; Define cp125* as aliases for all windows-125*, so on Windows
4699     ;; we can just concat "cp" to the ANSI codepage we get from the system
4700     ;; and not have to worry about whether it should be "cp" or "windows-".
4701     (when (coding-system-p w)
4702       (define-coding-system-alias c w)
4703       ;; Compatibility with codepage.el, though cp... are not the
4704       ;; canonical names.
4705       (if (not (assq c non-iso-charset-alist))
4706           (let ((slot (assq w non-iso-charset-alist)))
4707             (if slot
4708                 (push (cons c (cdr slot)) non-iso-charset-alist)))))))
4709
4710 (provide 'code-pages)
4711
4712 ;;; arch-tag: 8b6e3c73-b271-4198-866d-ea6d0ceff1b2
4713 ;;; code-pages.el ends here