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., 59 Temple Place - Suite 330,
  26 ;; Boston, MA 02111-1307, 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 (cp-make-coding-system
 220  cp437
 221  [?\Ç
 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 (cp-make-coding-system
 351  cp737
 352  [?\Α
 353   ?\Β
 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 (coding-system-put 'cp737 'mime-charset nil) ; not in IANA list
 481
 482 (cp-make-coding-system
 483  cp775
 484  [?\Ć
 485   ?\ü
 486   ?\é
 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 (cp-make-coding-system
 614  cp850
 615  [?\Ç
 616   ?\ü
 617   ?\é
 618   ?\â
 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 (cp-make-coding-system
 745  cp851
 746  [?\Ç
 747   ?\ü
 748   ?\é
 749   ?\â
 750   ?\ä
 751   ?\à
 752   ?\Ά
 753   ?\ç
 754   ?\ê
 755   ?\ë
 756   ?\è
 757   ?\ï
 758   ?\î
 759   ?\Έ
 760   ?\Ä
 761   ?\Ή
 762   ?\Ί
 763   nil
 764   ?\Ό
 765   ?\ô
 766   ?\ö
 767   ?\Ύ
 768   ?\û
 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 (cp-make-coding-system
 876  cp852
 877  [?\Ç
 878   ?\ü
 879   ?\é
 880   ?\â
 881   ?\ä
 882   ?\ů
 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 (cp-make-coding-system
1007  cp855
1008  [?\ђ
1009   ?\Ђ
1010   ?\ѓ
1011   ?\Ѓ
1012   ?\ё
1013   ?\Ё
1014   ?\є
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   nil
1134   ?\■
1135   ?\ ])
1136
1137 (cp-make-coding-system
1138  cp857
1139  [?\Ç
1140   ?\ü
1141   ?\é
1142   ?\â
1143   ?\ä
1144   ?\à
1145   ?\å
1146   ?\ç
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   nil
1225   ?\Í
1226   ?\Î
1227   ?\Ï
1228   ?\┘
1229   ?\┌
1230   ?\█
1231   ?\▄
1232   ?\¦
1233   ?\Ì
1234   ?\▀
1235   ?\Ó
1236   ?\ß
1237   ?\Ô
1238   ?\Ò
1239   ?\õ
1240   ?\Õ
1241   ?\µ
1242   nil
1243   ?\×
1244   ?\Ú
1245   ?\Û
1246   ?\Ù
1247   ?\ì
1248   ?\ÿ
1249   ?\—
1250   ?\´
1251   ?\
1252   ?\±
1253   nil
1254   ?\¾
1255   ?\¶
1256   ?\§
1257   ?\÷
1258   ?\˛
1259   ?\°
1260   ?\¨
1261   ?\˙
1262   ?\¹
1263   ?\³
1264   ?\²
1265   ?\■
1266   ?\ ])
1267
1268 (cp-make-coding-system
1269  cp860
1270  [?\Ç
1271   ?\ü
1272   ?\é
1273   ?\â
1274   ?\ã
1275   ?\à
1276   ?\Á
1277   ?\ç
1278   ?\ê
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 (cp-make-coding-system
1400  cp861
1401  [?\Ç
1402   ?\ü
1403   ?\é
1404   ?\â
1405   ?\ä
1406   ?\à
1407   ?\å
1408   ?\ç
1409   ?\ê
1410   ?\ë
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   nil
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 (cp-make-coding-system
1531  cp862
1532  [?\א
1533   ?\ב
1534   ?\ג
1535   ?\ד
1536   ?\ה
1537   ?\ו
1538   ?\ז
1539   ?\ח
1540   ?\ט
1541   ?\י
1542   ?\ך
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   nil
1574   ?\¬
1575   ?\½
1576   ?\¼
1577   ?\¡
1578   ?\«
1579   ?\»
1580   ?\░
1581   ?\▒
1582   ?\▓
1583   ?\│
1584   ?\┤
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 (cp-make-coding-system
1662  cp863
1663  [?\Ç
1664   ?\ü
1665   ?\é
1666   ?\â
1667   ?\Â
1668   ?\à
1669   ?\¶
1670   ?\ç
1671   ?\ê
1672   ?\ë
1673   ?\è
1674   ?\ï
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 (cp-make-coding-system
1793  cp864
1794  [?\°
1795   ?\·
1796   ?\∘
1797   ?\√
1798   ?\▒
1799   ?\─
1800   ?\│
1801   ?\┼
1802   ?\┤
1803   ?\┬
1804   ?\├
1805   ?\┴
1806   ?\┐
1807   ?\┌
1808   ?\└
1809   ?\┘
1810   ?\ß
1811   ?\∞
1812   ?\ø
1813   ?\±
1814   ?\½
1815   ?\¼
1816   ?\≈
1817   ?\«
1818   ?\»
1819   ?\ﻷ
1820   ?\ﻸ
1821   nil
1822   nil
1823   ?\ﻻ
1824   ?\ﻼ
1825   ?\
1826   nil
1827   ?\
1828   ?\ﺂ
1829   ?\£
1830   ?\¤
1831   ?\ﺄ
1832   nil
1833   nil
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 (cp-make-coding-system
1924  cp865
1925  [?\Ç
1926   ?\ü
1927   ?\é
1928   ?\â
1929   ?\ä
1930   ?\à
1931   ?\å
1932   ?\ç
1933   ?\ê
1934   ?\ë
1935   ?\è
1936   ?\ï
1937   ?\î
1938   ?\ì
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 (cp-make-coding-system
2055  cp866
2056  [?\А
2057   ?\Б
2058   ?\В
2059   ?\Г
2060   ?\Д
2061   ?\Е
2062   ?\Ж
2063   ?\З
2064   ?\И
2065   ?\Й
2066   ?\К
2067   ?\Л
2068   ?\М
2069   ?\Н
2070   ?\О
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  "CP866 (Cyrillic)."
2185  ?A)
2186
2187 (cp-make-coding-system
2188  cp869
2189  [nil
2190   nil
2191   nil
2192   nil
2193   nil
2194   nil
2195   ?\Ά
2196   nil
2197   ?\·
2198   ?\¬
2199   ?\¦
2200   ?\‛
2201   ?\’
2202   ?\Έ
2203   ?\—
2204   ?\Ή
2205   ?\Ί
2206   ?\Ϊ
2207   ?\Ό
2208   nil
2209   nil
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 (cp-make-coding-system
2319  cp874
2320  [?\€
2321   nil
2322   nil
2323   nil
2324   nil
2325   ?\…
2326   nil
2327   nil
2328   nil
2329   nil
2330   nil
2331   nil
2332   nil
2333   nil
2334   nil
2335   nil
2336   nil
2337   ?\‘
2338   ?\’
2339   ?\“
2340   ?\”
2341   ?\•
2342   ?\–
2343   ?\—
2344   nil
2345   nil
2346   nil
2347   nil
2348   nil
2349   nil
2350   nil
2351   nil
2352   ?\
2353   ?\ก
2354   ?\ข
2355   ?\ฃ
2356   ?\ค
2357   ?\ฅ
2358   ?\ฆ
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   nil
2412   nil
2413   nil
2414   nil
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   nil
2445   nil
2446   nil
2447   nil])
2448
2449 ;;;###autoload(autoload-coding-system 'windows-1250 '(require 'code-pages))
2450 (cp-make-coding-system
2451  windows-1250
2452  [?\€
2453   nil
2454   ?\‚
2455   nil
2456   ?\„
2457   ?\…
2458   ?\†
2459   ?\‡
2460   nil
2461   ?\‰
2462   ?\Š
2463   ?\‹
2464   ?\Ś
2465   ?\Ť
2466   ?\Ž
2467   ?\Ź
2468   nil
2469   ?\‘
2470   ?\’
2471   ?\“
2472   ?\”
2473   ?\•
2474   ?\–
2475   ?\—
2476   nil
2477   ?\™
2478   ?\š
2479   ?\›
2480   ?\ś
2481   ?\ť
2482   ?\ž
2483   ?\ź
2484   ?\
2485   ?\ˇ
2486   ?\˘
2487   ?\Ł
2488   ?\¤
2489   ?\Ą
2490   ?\¦
2491   ?\§
2492   ?\¨
2493   ?\©
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 ;;;###autoload(autoload-coding-system 'windows-1253 '(require 'code-pages))
2582 (cp-make-coding-system
2583  windows-1253
2584  [?\€
2585   nil
2586   ?\‚
2587   ?\ƒ
2588   ?\„
2589   ?\…
2590   ?\†
2591   ?\‡
2592   nil
2593   ?\‰
2594   nil
2595   ?\‹
2596   nil
2597   nil
2598   nil
2599   nil
2600   nil
2601   ?\‘
2602   ?\’
2603   ?\“
2604   ?\”
2605   ?\•
2606   ?\–
2607   ?\—
2608   nil
2609   ?\™
2610   nil
2611   ?\›
2612   nil
2613   nil
2614   nil
2615   nil
2616   ?\
2617   ?\΅
2618   ?\Ά
2619   ?\£
2620   ?\¤
2621   ?\¥
2622   ?\¦
2623   ?\§
2624   ?\¨
2625   ?\©
2626   nil
2627   ?\«
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   nil
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   nil]
2712  nil ?g) ;; Greek
2713
2714 ;;;###autoload(autoload-coding-system 'windows-1254 '(require 'code-pages))
2715 (cp-make-coding-system
2716  windows-1254
2717  [?\€
2718   nil
2719   ?\‚
2720   ?\ƒ
2721   ?\„
2722   ?\…
2723   ?\†
2724   ?\‡
2725   ?\ˆ
2726   ?\‰
2727   ?\Š
2728   ?\‹
2729   ?\Œ
2730   nil
2731   nil
2732   nil
2733   nil
2734   ?\‘
2735   ?\’
2736   ?\“
2737   ?\”
2738   ?\•
2739   ?\–
2740   ?\—
2741   ?\˜
2742   ?\™
2743   ?\š
2744   ?\›
2745   ?\œ
2746   nil
2747   nil
2748   ?\Ÿ
2749   ?\
2750   ?\¡
2751   ?\¢
2752   ?\£
2753   ?\¤
2754   ?\¥
2755   ?\¦
2756   ?\§
2757   ?\¨
2758   ?\©
2759   ?\ª
2760   ?\«
2761   ?\¬
2762   ?\
2763   ?\®
2764   ?\¯
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 ;; yi_US
2847 ;;;###autoload(autoload-coding-system 'windows-1255 '(require 'code-pages))
2848 (cp-make-coding-system
2849  windows-1255
2850  [?\€
2851   nil
2852   ?\‚
2853   ?\ƒ
2854   ?\„
2855   ?\…
2856   ?\†
2857   ?\‡
2858   ?\ˆ
2859   ?\‰
2860   nil
2861   ?\‹
2862   nil
2863   nil
2864   nil
2865   nil
2866   nil
2867   ?\‘
2868   ?\’
2869   ?\“
2870   ?\”
2871   ?\•
2872   ?\–
2873   ?\—
2874   ?\˜
2875   ?\™
2876   nil
2877   ?\›
2878   nil
2879   nil
2880   nil
2881   nil
2882   ?\
2883   ?\¡
2884   ?\¢
2885   ?\£
2886   ?\₪
2887   ?\¥
2888   ?\¦
2889   ?\§
2890   ?\¨
2891   ?\©
2892   ?\×
2893   ?\«
2894   ?\¬
2895   ?\
2896   ?\®
2897   ?\¯
2898   ?\°
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   nil
2925   ?\ֻ
2926   ?\ּ
2927   ?\ֽ
2928   ?\־
2929   ?\ֿ
2930   ?\׀
2931   ?\ׁ
2932   ?\ׂ
2933   ?\׃
2934   ?\װ
2935   ?\ױ
2936   ?\ײ
2937   ?\׳
2938   ?\״
2939   nil
2940   nil
2941   nil
2942   nil
2943   nil
2944   nil
2945   nil
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   nil
2974   nil
2975   ?\‎
2976   ?\‏
2977   nil]
2978  nil ?h) ;; Hebrew
2979
2980 ;;;###autoload(autoload-coding-system 'windows-1256 '(require 'code-pages))
2981 (cp-make-coding-system
2982  windows-1256
2983  [?\€
2984   ?\پ
2985   ?\‚
2986   ?\ƒ
2987   ?\„
2988   ?\…
2989   ?\†
2990   ?\‡
2991   ?\ˆ
2992   ?\‰
2993   ?\ٹ
2994   ?\‹
2995   ?\Œ
2996   ?\چ
2997   ?\ژ
2998   ?\ڈ
2999   ?\گ
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  nil ?a) ;; Arabic
3112
3113 ;;;###autoload(autoload-coding-system 'windows-1257 '(require 'code-pages))
3114 (cp-make-coding-system
3115  windows-1257
3116  [?\€
3117   nil
3118   ?\‚
3119   nil
3120   ?\„
3121   ?\…
3122   ?\†
3123   ?\‡
3124   nil
3125   ?\‰
3126   nil
3127   ?\‹
3128   nil
3129   nil
3130   nil
3131   nil
3132   nil
3133   ?\‘
3134   ?\’
3135   ?\“
3136   ?\”
3137   ?\•
3138   ?\–
3139   ?\—
3140   nil
3141   ?\™
3142   nil
3143   ?\›
3144   nil
3145   nil
3146   nil
3147   nil
3148   ?\
3149   nil
3150   ?\¢
3151   ?\£
3152   ?\¤
3153   nil
3154   ?\¦
3155   ?\§
3156   ?\Ø
3157   ?\©
3158   ?\Ŗ
3159   ?\«
3160   ?\¬
3161   ?\
3162   ?\®
3163   ?\Æ
3164   ?\°
3165   ?\±
3166   ?\²
3167   ?\³
3168   nil
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   nil])
3244
3245 ;;;###autoload(autoload-coding-system 'windows-1258 '(require 'code-pages))
3246 (cp-make-coding-system
3247  windows-1258
3248  [?\€
3249   nil
3250   ?\‚
3251   ?\ƒ
3252   ?\„
3253   ?\…
3254   ?\†
3255   ?\‡
3256   ?\ˆ
3257   ?\‰
3258   nil
3259   ?\‹
3260   ?\Œ
3261   nil
3262   nil
3263   nil
3264   nil
3265   ?\‘
3266   ?\’
3267   ?\“
3268   ?\”
3269   ?\•
3270   ?\–
3271   ?\—
3272   ?\˜
3273   ?\™
3274   nil
3275   ?\›
3276   ?\œ
3277   nil
3278   nil
3279   ?\Ÿ
3280   ?\
3281   ?\¡
3282   ?\¢
3283   ?\£
3284   ?\¤
3285   ?\¥
3286   ?\¦
3287   ?\§
3288   ?\¨
3289   ?\©
3290   ?\ª
3291   ?\«
3292   ?\¬
3293   ?\
3294   ?\®
3295   ?\¯
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 (cp-make-coding-system
3378  next
3379  [?\
3380   ?\À
3381   ?\Á
3382   ?\Â
3383   ?\Ã
3384   ?\Ä
3385   ?\Å
3386   ?\Ç
3387   ?\È
3388   ?\É
3389   ?\Ê
3390   ?\Ë
3391   ?\Ì
3392   ?\Í
3393   ?\Î
3394   ?\Ï
3395   ?\Ð
3396   ?\Ñ
3397   ?\Ò
3398   ?\Ó
3399   ?\Ô
3400   ?\Õ
3401   ?\Ö
3402   ?\Ù
3403   ?\Ú
3404   ?\Û
3405   ?\Ü
3406   ?\Ý
3407   ?\Þ
3408   ?\µ
3409   ?\×
3410   ?\÷
3411   ?\©
3412   ?\¡
3413   ?\¢
3414   ?\£
3415   ?\⁄
3416   ?\¥
3417   ?\ƒ
3418   ?\§
3419   ?\¤
3420   nil
3421   ?\“
3422   ?\«
3423   nil
3424   nil
3425   ?\ﬁ
3426   ?\ﬂ
3427   ?\®
3428   ?\–
3429   ?\†
3430   ?\‡
3431   ?\·
3432   ?\¦
3433   ?\¶
3434   ?\•
3435   nil
3436   nil
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   nil
3506   nil]
3507  "NeXTstep encoding." ?N)
3508
3509 (cp-make-coding-system
3510  koi8-t                                 ; used by glibc for tg_TJ
3511  [?\қ
3512   ?\ғ
3513   ?\‚
3514   ?\Ғ
3515   ?\„
3516   ?\…
3517   ?\†
3518   ?\‡
3519   nil
3520   ?\‰
3521   ?\ҳ
3522   ?\‹
3523   ?\Ҳ
3524   ?\ҷ
3525   ?\Ҷ
3526   nil
3527   ?\Қ
3528   ?\‘
3529   ?\’
3530   ?\“
3531   ?\”
3532   ?\•
3533   ?\–
3534   ?\—
3535   nil
3536   ?\™
3537   nil
3538   ?\›
3539   nil
3540   nil
3541   nil
3542   nil
3543   nil
3544   ?\ӯ
3545   ?\Ӯ
3546   ?\ё
3547   ?\¤
3548   ?\ӣ
3549   ?\¦
3550   ?\§
3551   nil
3552   nil
3553   nil
3554   ?\«
3555   ?\¬
3556   ?\
3557   ?\®
3558   nil
3559   ?\°
3560   ?\±
3561   ?\²
3562   ?\Ё
3563   nil
3564   ?\Ӣ
3565   ?\¶
3566   ?\·
3567   nil
3568   ?\№
3569   nil
3570   ?\»
3571   nil
3572   nil
3573   nil
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  "Unicode-based KOI8-T encoding for Cyrillic")
3640 (coding-system-put 'koi8-t 'mime-charset nil) ; not in the IANA list
3641 (define-coding-system-alias 'cyrillic-koi8-t 'koi8-t)
3642
3643 ;;   Online final ISO draft:
3644
3645 ;;     http://www.evertype.com/standards/iso8859/fdis8859-16-en.pdf
3646
3647 ;;   Equivalent National Standard:
3648 ;;     Romanian Standard SR 14111:1998, Romanian Standards Institution
3649 ;;     (ASRO).
3650
3651 ;; Intended usage:
3652
3653 ;;  "This set of coded graphic characters is intended for use in data and
3654 ;;   text processing applications and also for information interchange. The
3655 ;;   set contains graphic characters used for general purpose applications in
3656 ;;   typical office environments in at least the following languages:
3657 ;;   Albanian, Croatian, English, Finnish, French, German, Hungarian, Irish
3658 ;;   Gaelic (new orthography), Italian, Latin, Polish, Romanian, and
3659 ;;   Slovenian. This set of coded graphic characters may be regarded as a
3660 ;;   version of an 8-bit code according to ISO/IEC 2022 or ISO/IEC 4873 at
3661 ;;   level 1." [ISO 8859-16:2001(E), p. 1]
3662
3663 ;;   This charset is suitable for use in MIME text body parts.
3664
3665 ;;   ISO 8859-16 was primarily designed for single-byte encoding the Romanian
3666 ;;   language. The UTF-8 charset is the preferred and in today's MIME software
3667 ;;   more widely implemented encoding suitable for Romanian.
3668 ;;;###autoload(autoload-coding-system 'iso-8859-16 '(require 'code-pages))
3669 (cp-make-coding-system
3670  iso-latin-10                           ; consistent with, e.g. Latin-1
3671  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3672   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3673   ?\
3674   ?\Ą
3675   ?\ą
3676   ?\Ł
3677   ?\€
3678   ?\„
3679   ?\Š
3680   ?\§
3681   ?\š
3682   ?\©
3683   ?\Ș
3684   ?\«
3685   ?\Ź
3686   ?\
3687   ?\ź
3688   ?\Ż
3689   ?\°
3690   ?\±
3691   ?\Č
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  "Unicode-based encoding for Latin-10 (MIME: ISO-8859-16)"
3770  ?r) ;; Romanian
3771 (coding-system-put 'iso-latin-10 'mime-charset 'iso-8859-16)
3772 (define-coding-system-alias 'iso-8859-16 'iso-latin-10)
3773 (define-coding-system-alias 'latin-10 'iso-latin-10)
3774
3775 ;; Unicode-based alternative which has the possible advantage of
3776 ;; having its relative sparseness specified.
3777 (cp-make-coding-system
3778  ;; The base system uses arabic-iso-8bit, but that's not a MIME charset.
3779  iso-8859-6
3780  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3781   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3782   ?\
3783   ?\¤
3784   ?\،
3785   ?\
3786   ?\؛
3787   ?\؟
3788   ?\ء
3789   ?\آ
3790   ?\أ
3791   ?\ؤ
3792   ?\إ
3793   ?\ئ
3794   ?\ا
3795   ?\ب
3796   ?\ة
3797   ?\ت
3798   ?\ث
3799   ?\ج
3800   ?\ح
3801   ?\خ
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   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3834   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3835   nil nil nil nil nil nil nil nil nil nil nil]
3836  "Unicode-based Arabic ISO/IEC 8859-6 (MIME: ISO-8859-6)"
3837  ?6)
3838 (define-coding-system-alias 'arabic-iso-8bit 'iso-8859-6)
3839
3840 ;;;###autoload(autoload-coding-system 'iso-8859-10 '(require 'code-pages))
3841 (cp-make-coding-system
3842  iso-latin-6
3843  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3844   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
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   ?\ó
3929   ?\ô
3930   ?\õ
3931   ?\ö
3932   ?\ũ
3933   ?\ø
3934   ?\ų
3935   ?\ú
3936   ?\û
3937   ?\ü
3938   ?\ý
3939   ?\þ
3940   ?\ĸ]
3941  "Unicode-based encoding for Latin-6 (MIME: ISO-8859-10)")
3942 (coding-system-put 'iso-latin-6 'mime-charset 'iso-8859-10)
3943 (define-coding-system-alias 'iso-8859-10 'iso-latin-6)
3944 (define-coding-system-alias 'latin-6 'iso-latin-6)
3945
3946 ;; used by lt_LT, lv_LV, mi_NZ
3947 ;;;###autoload(autoload-coding-system 'iso-8859-13 '(require 'code-pages))
3948 (cp-make-coding-system
3949  iso-latin-7
3950  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3951   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
3952   ?\
3953   ?\”
3954   ?\¢
3955   ?\£
3956   ?\¤
3957   ?\„
3958   ?\¦
3959   ?\§
3960   ?\Ø
3961   ?\©
3962   ?\Ŗ
3963   ?\«
3964   ?\¬
3965   ?\
3966   ?\®
3967   ?\Æ
3968   ?\°
3969   ?\±
3970   ?\²
3971   ?\³
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  "Unicode-based encoding for Latin-7 (MIME: ISO-8859-13)"
4050  ?l) ;; Lithuanian/Latvian
4051 (coding-system-put 'iso-latin-7 'mime-charset 'iso-8859-13)
4052 (define-coding-system-alias 'iso-8859-13 'iso-latin-7)
4053 (define-coding-system-alias 'latin-7 'iso-latin-7)
4054
4055 ;; Fixme: check on the C1 characters which libiconv includes.  They
4056 ;; are reproduced below, but are probably wrong.  I can't find an
4057 ;; official definition of georgian-ps.
4058 ;;;###autoload(autoload-coding-system 'georgian-ps '(require 'code-pages))
4059 (cp-make-coding-system
4060  georgian-ps                            ; used by glibc for ka_GE
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   ?\ზ
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  nil ?G)
4190 (coding-system-put 'georgian-ps 'mime-charset nil) ; not in IANA list
4191
4192 ;; From http://www.microsoft.com/globaldev/reference/oem/720.htm
4193 (cp-make-coding-system
4194  cp720
4195  [nil
4196   nil
4197   ?\é
4198   ?\â
4199   nil
4200   ?\à
4201   nil
4202   ?\ç
4203   ?\ê
4204   ?\ë
4205   ?\è
4206   ?\ï
4207   ?\î
4208   nil
4209   nil
4210   nil
4211   nil
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   ?\ش
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 (coding-system-put 'cp720 'mime-charset nil) ; not in IANA list
4324
4325 ;; http://oss.software.ibm.com/cvs/icu/charset/data/ucm/ibm-1125_P100-2000.ucm
4326 (cp-make-coding-system
4327  cp1125
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   ?\│
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 (define-coding-system-alias 'ruscii 'cp1125)
4457 ;; Original name for cp1125, says Serhii Hlodin <hlodin@lutsk.bank.gov.ua>
4458 (define-coding-system-alias 'cp866u 'cp1125)
4459 (coding-system-put 'cp1125 'mime-charset nil)
4460
4461 ;; Suggested by Anton Zinoviev <anton@lml.bas.bg>: Bulgarian DOS
4462 ;; codepage.  Table at
4463 ;; <URL:http://czyborra.com/charsets/bulgarian-mik.txt.gz>.
4464 (cp-make-coding-system
4465  mik
4466  [?А ?Б ?В ?Г ?Д ?Е ?Ж ?З ?И ?Й ?К ?Л ?М ?Н ?О ?П ?Р ?С ?Т ?У ?Ф ?Х ?Ц
4467   ?Ч ?Ш ?Щ ?Ъ ?Ы ?Ь ?Э ?Ю ?Я ?а ?б ?в ?г ?д ?е ?ж ?з ?и ?й ?к ?л ?м ?н
4468   ?о ?п ?р ?с ?т ?у ?ф ?х ?ц ?ч ?ш ?щ ?ъ ?ы ?ь ?э ?ю ?я ?└ ?┴ ?┬ ?├ ?─
4469   ?┼ ?╣ ?║ ?╚ ?╔ ?╩ ?╦ ?╠ ?═ ?╬ ?┐ ?░ ?▒ ?▓ ?│ ?┤ ?№ ?§ ?╗ ?╝ ?┘ ?┌ ?█
4470   ?▄ ?▌ ?▐ ?▀ ?α ?β ?Γ ?π ?Σ ?σ ?μ ?τ ?Φ ?Θ ?Ω ?δ ?∞ ?∅ ?∈ ?∩ ?≡ ?± ?≥
4471   ?≤ ?⌠ ?⌡ ?÷ ?≈ ?° ?∙ ?· ?√ ?ⁿ ?² ?■ ? ])
4472 (coding-system-put 'mik 'mime-charset nil)
4473
4474 ;; Suggested by Anton Zinoviev <anton@lml.bas.bg>: similar to CP1251
4475 ;; and used for some non-Slavic Cyrillic languages.  Table found at
4476 ;; <URL:ftp://ftp.logic.ru/pub/logic/linux/cyr-asian/PT154>.  See also
4477 ;; <URL:http://lists.w3.org/Archives/Public/ietf-charsets/2002AprJun/0092.html,
4478 ;; which suggests it's used in an Asian Cyrillic context.
4479 ;;;###autoload(autoload-coding-system 'pt154 '(require 'code-pages))
4480 (cp-make-coding-system
4481  pt154
4482  [?Җ ?Ғ ?Ӯ ?ғ ?„ ?… ?Ҷ ?Ү ?Ҳ ?ү ?Ҡ ?Ӣ ?Ң ?Қ ?Һ ?Ҹ ?җ ?‘ ?’ ?“ ?” ?• ?–
4483   ?— ?ҳ ?ҷ ?ҡ ?ӣ ?ң ?қ ?һ ?ҹ ?  ?Ў ?ў ?Ј ?Ө ?Ҙ ?Ұ ?§ ?Ё ?© ?Ә ?\« ?¬ ?ӯ
4484   ?® ?Ҝ ?° ?ұ ?І ?і ?ҙ ?ө ?¶ ?· ?ё ?№ ?ә ?\» ?ј ?Ҫ ?ҫ ?ҝ ?А ?Б ?В ?Г ?Д
4485   ?Е ?Ж ?З ?И ?Й ?К ?Л ?М ?Н ?О ?П ?Р ?С ?Т ?У ?Ф ?Х ?Ц ?Ч ?Ш ?Щ ?Ъ ?Ы
4486   ?Ь ?Э ?Ю ?Я ?а ?б ?в ?г ?д ?е ?ж ?з ?и ?й ?к ?л ?м ?н ?о ?п ?р ?с ?т
4487   ?у ?ф ?х ?ц ?ч ?ш ?щ ?ъ ?ы ?ь ?э ?ю ?я])
4488
4489 ;;;###autoload(autoload-coding-system 'iso-8859-11 '(require 'code-pages))
4490 (cp-make-coding-system
4491  iso-8859-11
4492  [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
4493   nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil
4494   ?   ?ก  ?ข  ?ฃ  ?ค  ?ฅ  ?ฆ  ?ง  ?จ  ?ฉ  ?ช  ?ซ  ?ฌ  ?ญ  ?ฎ  ?ฏ
4495   ?ฐ  ?ฑ  ?ฒ  ?ณ  ?ด  ?ต  ?ถ  ?ท  ?ธ  ?น  ?บ  ?ป  ?ผ  ?ฝ  ?พ  ?ฟ
4496   ?ภ  ?ม  ?ย  ?ร  ?ฤ  ?ล  ?ฦ  ?ว  ?ศ  ?ษ  ?ส  ?ห  ?ฬ  ?อ  ?ฮ  ?ฯ
4497   ?ะ  ?ั  ?า  ?ำ  ?ิ  ?ี  ?ึ  ?ื  ?ุ  ?ู  ?ฺ  nil nil nil nil ?฿
4498   ?เ  ?แ  ?โ  ?ใ  ?ไ  ?ๅ  ?ๆ  ?็  ?่  ?้  ?๊  ?๋  ?์  ?ํ  ?๎  ?๏
4499   ?๐  ?๑  ?๒  ?๓  ?๔  ?๕  ?๖  ?๗  ?๘  ?๙  ?๚  ?๛   nil nil nil nil]
4500  "ISO-8859-11.  This is `thai-tis620' with the addition of no-break-space.")
4501
4502 (dotimes (i 9)
4503   (let ((w (intern (format "windows-125%d" i)))
4504         (c (intern (format "cp125%d" i))))
4505     ;; Define cp125* as aliases for all windows-125*, so on Windows
4506     ;; we can just concat "cp" to the ANSI codepage we get from the system
4507     ;; and not have to worry about whether it should be "cp" or "windows-".
4508     (when (coding-system-p w)
4509       (define-coding-system-alias c w)
4510       ;; Compatibility with codepage.el, though cp... are not the
4511       ;; canonical names.
4512       (if (not (assq c non-iso-charset-alist))
4513           (let ((slot (assq w non-iso-charset-alist)))
4514             (if slot
4515                 (push (cons c (cdr slot)) non-iso-charset-alist)))))))
4516
4517 (provide 'code-pages)
4518
4519 ;;; arch-tag: 8b6e3c73-b271-4198-866d-ea6d0ceff1b2
4520 ;;; code-pages.el ends here