428
|
1 ;;; cyrillic.el --- Support for Cyrillic -*- coding: iso-2022-7bit; -*-
|
|
2
|
|
3 ;; Copyright (C) 1995,1999 Electrotechnical Laboratory, JAPAN.
|
|
4 ;; Licensed to the Free Software Foundation.
|
|
5 ;; Copyright (C) 1997 MORIOKA Tomohiko
|
788
|
6 ;; Copyright (C) 2001, 2002 Ben Wing.
|
4072
|
7 ;; Copyright (C) 2007 Free Software Foundation
|
428
|
8
|
|
9 ;; Keywords: multilingual, Cyrillic
|
|
10
|
|
11 ;; This file is part of XEmacs.
|
|
12
|
|
13 ;; XEmacs is free software; you can redistribute it and/or modify it
|
|
14 ;; 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 ;; XEmacs is distributed in the hope that it will be useful, but
|
|
19 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
20 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
21 ;; General Public License for more details.
|
|
22
|
|
23 ;; You should have received a copy of the GNU General Public License
|
|
24 ;; along with XEmacs; see the file COPYING. If not, write to the Free
|
|
25 ;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
|
|
26 ;; 02111-1307, USA.
|
|
27
|
|
28 ;;; Commentary:
|
|
29
|
771
|
30 ;; The character set ISO8859-5 is supported. KOI-8 and ALTERNATIVNYJ are
|
|
31 ;; converted to ISO8859-5 internally.
|
|
32
|
428
|
33 ;;; Code:
|
|
34
|
3767
|
35 ;; Case table:
|
3749
|
36 (loop
|
|
37 for (upper lower)
|
|
38 in '((#xcf #xef) ; YA
|
|
39 (#xce #xee) ; YU
|
|
40 (#xcd #xed) ; E
|
|
41 (#xcc #xec) ; SOFT SIGN
|
|
42 (#xcb #xeb) ; YERU
|
|
43 (#xca #xea) ; HARD SIGN
|
|
44 (#xc9 #xe9) ; SHCHA
|
|
45 (#xc8 #xe8) ; SHA
|
|
46 (#xc7 #xe7) ; CHE
|
|
47 (#xc6 #xe6) ; TSE
|
|
48 (#xc5 #xe5) ; HA
|
|
49 (#xc4 #xe4) ; EF
|
|
50 (#xc3 #xe3) ; U
|
|
51 (#xc2 #xe2) ; TE
|
|
52 (#xc1 #xe1) ; ES
|
|
53 (#xc0 #xe0) ; ER
|
|
54 (#xbf #xdf) ; PE
|
|
55 (#xbe #xde) ; O
|
|
56 (#xbd #xdd) ; EN
|
|
57 (#xbc #xdc) ; EM
|
|
58 (#xbb #xdb) ; EL
|
|
59 (#xba #xda) ; KA
|
|
60 (#xb9 #xd9) ; SHORT I
|
|
61 (#xb8 #xd8) ; I
|
|
62 (#xb7 #xd7) ; ZE
|
|
63 (#xb6 #xd6) ; ZHE
|
|
64 (#xb5 #xd5) ; IE
|
|
65 (#xb4 #xd4) ; DE
|
|
66 (#xb3 #xd3) ; GHE
|
|
67 (#xb2 #xd2) ; VE
|
|
68 (#xb1 #xd1) ; BE
|
|
69 (#xb0 #xd0) ; A
|
|
70 (#xaf #xff) ; DZHE
|
|
71 (#xae #xfe) ; SHORT U
|
|
72 (#xac #xfc) ; KJE
|
|
73 (#xab #xfb) ; TSHE
|
|
74 (#xaa #xfa) ; NJE
|
|
75 (#xa9 #xf9) ; LJE
|
|
76 (#xa8 #xf8) ; JE
|
|
77 (#xa7 #xf7) ; YI
|
|
78 (#xa6 #xf6) ; BYELORUSSIAN-UKRAINIAN I
|
|
79 (#xa5 #xf5) ; DZE
|
|
80 (#xa4 #xf4) ; UKRAINIAN IE
|
|
81 (#xa3 #xf3) ; GJE
|
|
82 (#xa2 #xf2) ; DJE
|
|
83 (#xa1 #xf1)) ; IO
|
|
84 with case-table = (standard-case-table)
|
|
85 do
|
|
86 (put-case-table-pair (make-char 'cyrillic-iso8859-5 upper)
|
4072
|
87 (make-char 'cyrillic-iso8859-5 lower)
|
|
88 case-table))
|
3749
|
89
|
|
90 ;; The default character syntax is now word. Pay attention to the
|
3767
|
91 ;; exceptions in ISO-8859-5, copying them from ISO-8859-1.
|
|
92 (loop
|
|
93 for (latin-1 cyrillic)
|
|
94 in '((#xAD #xAD) ;; SOFT HYPHEN
|
|
95 (#xA7 #xFD) ;; SECTION SIGN
|
|
96 (#xA0 #xA0)) ;; NO BREAK SPACE
|
|
97 with syntax-table = (standard-syntax-table)
|
|
98 do (modify-syntax-entry
|
|
99 (make-char 'cyrillic-iso8859-5 cyrillic)
|
|
100 (string (char-syntax (make-char 'latin-iso8859-1 latin-1)))
|
|
101 syntax-table))
|
|
102
|
|
103 ;; Take NUMERO SIGN's syntax from #.
|
|
104 (modify-syntax-entry (make-char 'cyrillic-iso8859-5 #xF0)
|
|
105 (string (char-syntax ?\# (standard-syntax-table)))
|
|
106 (standard-syntax-table))
|
778
|
107
|
4072
|
108 ;; And create the coding system.
|
428
|
109 (make-coding-system
|
|
110 'iso-8859-5 'iso2022
|
771
|
111 "ISO-8859-5 (Cyrillic)"
|
428
|
112 '(charset-g0 ascii
|
|
113 charset-g1 cyrillic-iso8859-5
|
|
114 charset-g2 t
|
|
115 charset-g3 t
|
3767
|
116 mnemonic "ISO8/Cyr"))
|
428
|
117
|
4090
|
118 ;; Provide this locale; but don't allow it to be picked up from the Unix
|
|
119 ;; locale (it has no locale entry in the alist), we leave that to Russian.
|
428
|
120 (set-language-info-alist
|
|
121 "Cyrillic-ISO" '((charset cyrillic-iso8859-5)
|
4072
|
122 (tutorial . "TUTORIAL.ru")
|
|
123 (coding-system iso-8859-5)
|
|
124 (native-coding-system iso-8859-5)
|
|
125 (coding-priority iso-8859-5)
|
|
126 (input-method . "cyrillic-yawerty")
|
|
127 (features cyril-util)
|
|
128 (sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
|
|
129 (documentation . "Support for Cyrillic ISO-8859-5."))
|
428
|
130 '("Cyrillic"))
|
|
131
|
4072
|
132 ;; KOI8-R, the most common encoding for Cyrillic on Unix and Usenet.
|
|
133 (make-8-bit-coding-system
|
|
134 'koi8-r
|
|
135 '((#x80 ?\u2500) ;; BOX DRAWINGS LIGHT HORIZONTAL
|
|
136 (#x81 ?\u2502) ;; BOX DRAWINGS LIGHT VERTICAL
|
|
137 (#x82 ?\u250C) ;; BOX DRAWINGS LIGHT DOWN AND RIGHT
|
|
138 (#x83 ?\u2510) ;; BOX DRAWINGS LIGHT DOWN AND LEFT
|
|
139 (#x84 ?\u2514) ;; BOX DRAWINGS LIGHT UP AND RIGHT
|
|
140 (#x85 ?\u2518) ;; BOX DRAWINGS LIGHT UP AND LEFT
|
|
141 (#x86 ?\u251C) ;; BOX DRAWINGS LIGHT VERTICAL AND RIGHT
|
|
142 (#x87 ?\u2524) ;; BOX DRAWINGS LIGHT VERTICAL AND LEFT
|
|
143 (#x88 ?\u252C) ;; BOX DRAWINGS LIGHT DOWN AND HORIZONTAL
|
|
144 (#x89 ?\u2534) ;; BOX DRAWINGS LIGHT UP AND HORIZONTAL
|
|
145 (#x8A ?\u253C) ;; BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL
|
|
146 (#x8B ?\u2580) ;; UPPER HALF BLOCK
|
|
147 (#x8C ?\u2584) ;; LOWER HALF BLOCK
|
|
148 (#x8D ?\u2588) ;; FULL BLOCK
|
|
149 (#x8E ?\u258C) ;; LEFT HALF BLOCK
|
|
150 (#x8F ?\u2590) ;; RIGHT HALF BLOCK
|
|
151 (#x90 ?\u2591) ;; LIGHT SHADE
|
|
152 (#x91 ?\u2592) ;; MEDIUM SHADE
|
|
153 (#x92 ?\u2593) ;; DARK SHADE
|
|
154 (#x93 ?\u2320) ;; TOP HALF INTEGRAL
|
|
155 (#x94 ?\u25A0) ;; BLACK SQUARE
|
|
156 (#x95 ?\u2219) ;; BULLET OPERATOR
|
|
157 (#x96 ?\u221A) ;; SQUARE ROOT
|
|
158 (#x97 ?\u2248) ;; ALMOST EQUAL TO
|
|
159 (#x98 ?\u2264) ;; LESS-THAN OR EQUAL TO
|
|
160 (#x99 ?\u2265) ;; GREATER-THAN OR EQUAL TO
|
|
161 (#x9A ?\u00A0) ;; NO-BREAK SPACE
|
|
162 (#x9B ?\u2321) ;; BOTTOM HALF INTEGRAL
|
|
163 (#x9C ?\u00B0) ;; DEGREE SIGN
|
|
164 (#x9D ?\u00B2) ;; SUPERSCRIPT TWO
|
|
165 (#x9E ?\u00B7) ;; MIDDLE DOT
|
|
166 (#x9F ?\u00F7) ;; DIVISION SIGN
|
|
167 (#xA0 ?\u2550) ;; BOX DRAWINGS DOUBLE HORIZONTAL
|
|
168 (#xA1 ?\u2551) ;; BOX DRAWINGS DOUBLE VERTICAL
|
|
169 (#xA2 ?\u2552) ;; BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE
|
|
170 (#xA3 ?\u0451) ;; CYRILLIC SMALL LETTER IO
|
|
171 (#xA4 ?\u2553) ;; BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE
|
|
172 (#xA5 ?\u2554) ;; BOX DRAWINGS DOUBLE DOWN AND RIGHT
|
|
173 (#xA6 ?\u2555) ;; BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE
|
|
174 (#xA7 ?\u2556) ;; BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE
|
|
175 (#xA8 ?\u2557) ;; BOX DRAWINGS DOUBLE DOWN AND LEFT
|
|
176 (#xA9 ?\u2558) ;; BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE
|
|
177 (#xAA ?\u2559) ;; BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE
|
|
178 (#xAB ?\u255A) ;; BOX DRAWINGS DOUBLE UP AND RIGHT
|
|
179 (#xAC ?\u255B) ;; BOX DRAWINGS UP SINGLE AND LEFT DOUBLE
|
|
180 (#xAD ?\u255C) ;; BOX DRAWINGS UP DOUBLE AND LEFT SINGLE
|
|
181 (#xAE ?\u255D) ;; BOX DRAWINGS DOUBLE UP AND LEFT
|
|
182 (#xAF ?\u255E) ;; BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE
|
|
183 (#xB0 ?\u255F) ;; BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE
|
|
184 (#xB1 ?\u2560) ;; BOX DRAWINGS DOUBLE VERTICAL AND RIGHT
|
|
185 (#xB2 ?\u2561) ;; BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE
|
|
186 (#xB3 ?\u0401) ;; CYRILLIC CAPITAL LETTER IO
|
|
187 (#xB4 ?\u2562) ;; BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE
|
|
188 (#xB5 ?\u2563) ;; BOX DRAWINGS DOUBLE VERTICAL AND LEFT
|
|
189 (#xB6 ?\u2564) ;; BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE
|
|
190 (#xB7 ?\u2565) ;; BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE
|
|
191 (#xB8 ?\u2566) ;; BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL
|
|
192 (#xB9 ?\u2567) ;; BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE
|
|
193 (#xBA ?\u2568) ;; BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE
|
|
194 (#xBB ?\u2569) ;; BOX DRAWINGS DOUBLE UP AND HORIZONTAL
|
|
195 (#xBC ?\u256A) ;; BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE
|
|
196 (#xBD ?\u256B) ;; BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE
|
|
197 (#xBE ?\u256C) ;; BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL
|
|
198 (#xBF ?\u00A9) ;; COPYRIGHT SIGN
|
|
199 (#xC0 ?\u044E) ;; CYRILLIC SMALL LETTER YU
|
|
200 (#xC1 ?\u0430) ;; CYRILLIC SMALL LETTER A
|
|
201 (#xC2 ?\u0431) ;; CYRILLIC SMALL LETTER BE
|
|
202 (#xC3 ?\u0446) ;; CYRILLIC SMALL LETTER TSE
|
|
203 (#xC4 ?\u0434) ;; CYRILLIC SMALL LETTER DE
|
|
204 (#xC5 ?\u0435) ;; CYRILLIC SMALL LETTER IE
|
|
205 (#xC6 ?\u0444) ;; CYRILLIC SMALL LETTER EF
|
|
206 (#xC7 ?\u0433) ;; CYRILLIC SMALL LETTER GHE
|
|
207 (#xC8 ?\u0445) ;; CYRILLIC SMALL LETTER HA
|
|
208 (#xC9 ?\u0438) ;; CYRILLIC SMALL LETTER I
|
|
209 (#xCA ?\u0439) ;; CYRILLIC SMALL LETTER SHORT I
|
|
210 (#xCB ?\u043A) ;; CYRILLIC SMALL LETTER KA
|
|
211 (#xCC ?\u043B) ;; CYRILLIC SMALL LETTER EL
|
|
212 (#xCD ?\u043C) ;; CYRILLIC SMALL LETTER EM
|
|
213 (#xCE ?\u043D) ;; CYRILLIC SMALL LETTER EN
|
|
214 (#xCF ?\u043E) ;; CYRILLIC SMALL LETTER O
|
|
215 (#xD0 ?\u043F) ;; CYRILLIC SMALL LETTER PE
|
|
216 (#xD1 ?\u044F) ;; CYRILLIC SMALL LETTER YA
|
|
217 (#xD2 ?\u0440) ;; CYRILLIC SMALL LETTER ER
|
|
218 (#xD3 ?\u0441) ;; CYRILLIC SMALL LETTER ES
|
|
219 (#xD4 ?\u0442) ;; CYRILLIC SMALL LETTER TE
|
|
220 (#xD5 ?\u0443) ;; CYRILLIC SMALL LETTER U
|
|
221 (#xD6 ?\u0436) ;; CYRILLIC SMALL LETTER ZHE
|
|
222 (#xD7 ?\u0432) ;; CYRILLIC SMALL LETTER VE
|
|
223 (#xD8 ?\u044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
|
|
224 (#xD9 ?\u044B) ;; CYRILLIC SMALL LETTER YERU
|
|
225 (#xDA ?\u0437) ;; CYRILLIC SMALL LETTER ZE
|
|
226 (#xDB ?\u0448) ;; CYRILLIC SMALL LETTER SHA
|
|
227 (#xDC ?\u044D) ;; CYRILLIC SMALL LETTER E
|
|
228 (#xDD ?\u0449) ;; CYRILLIC SMALL LETTER SHCHA
|
|
229 (#xDE ?\u0447) ;; CYRILLIC SMALL LETTER CHE
|
|
230 (#xDF ?\u044A) ;; CYRILLIC SMALL LETTER HARD SIGN
|
|
231 (#xE0 ?\u042E) ;; CYRILLIC CAPITAL LETTER YU
|
|
232 (#xE1 ?\u0410) ;; CYRILLIC CAPITAL LETTER A
|
|
233 (#xE2 ?\u0411) ;; CYRILLIC CAPITAL LETTER BE
|
|
234 (#xE3 ?\u0426) ;; CYRILLIC CAPITAL LETTER TSE
|
|
235 (#xE4 ?\u0414) ;; CYRILLIC CAPITAL LETTER DE
|
|
236 (#xE5 ?\u0415) ;; CYRILLIC CAPITAL LETTER IE
|
|
237 (#xE6 ?\u0424) ;; CYRILLIC CAPITAL LETTER EF
|
|
238 (#xE7 ?\u0413) ;; CYRILLIC CAPITAL LETTER GHE
|
|
239 (#xE8 ?\u0425) ;; CYRILLIC CAPITAL LETTER HA
|
|
240 (#xE9 ?\u0418) ;; CYRILLIC CAPITAL LETTER I
|
|
241 (#xEA ?\u0419) ;; CYRILLIC CAPITAL LETTER SHORT I
|
|
242 (#xEB ?\u041A) ;; CYRILLIC CAPITAL LETTER KA
|
|
243 (#xEC ?\u041B) ;; CYRILLIC CAPITAL LETTER EL
|
|
244 (#xED ?\u041C) ;; CYRILLIC CAPITAL LETTER EM
|
|
245 (#xEE ?\u041D) ;; CYRILLIC CAPITAL LETTER EN
|
|
246 (#xEF ?\u041E) ;; CYRILLIC CAPITAL LETTER O
|
|
247 (#xF0 ?\u041F) ;; CYRILLIC CAPITAL LETTER PE
|
|
248 (#xF1 ?\u042F) ;; CYRILLIC CAPITAL LETTER YA
|
|
249 (#xF2 ?\u0420) ;; CYRILLIC CAPITAL LETTER ER
|
|
250 (#xF3 ?\u0421) ;; CYRILLIC CAPITAL LETTER ES
|
|
251 (#xF4 ?\u0422) ;; CYRILLIC CAPITAL LETTER TE
|
|
252 (#xF5 ?\u0423) ;; CYRILLIC CAPITAL LETTER U
|
|
253 (#xF6 ?\u0416) ;; CYRILLIC CAPITAL LETTER ZHE
|
|
254 (#xF7 ?\u0412) ;; CYRILLIC CAPITAL LETTER VE
|
|
255 (#xF8 ?\u042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
|
|
256 (#xF9 ?\u042B) ;; CYRILLIC CAPITAL LETTER YERU
|
|
257 (#xFA ?\u0417) ;; CYRILLIC CAPITAL LETTER ZE
|
|
258 (#xFB ?\u0428) ;; CYRILLIC CAPITAL LETTER SHA
|
|
259 (#xFC ?\u042D) ;; CYRILLIC CAPITAL LETTER E
|
|
260 (#xFD ?\u0429) ;; CYRILLIC CAPITAL LETTER SHCHA
|
|
261 (#xFE ?\u0427) ;; CYRILLIC CAPITAL LETTER CHE
|
|
262 (#xFF ?\u042A));; CYRILLIC CAPITAL LETTER HARD SIGN
|
|
263 "KOI8-R (,L:^T(B ,L>Q\U]P(B ,L8]d^`\PfXUY(B, 8 ,LQXb(B) for Russian and Bulgarian."
|
|
264 '(mnemonic "KOI8"
|
|
265 documentation
|
|
266 "This is the ASCII-compatible encoding documented in RFC 1341.
|
|
267 ,L:>8(B8-,L@(B is very common across the Cyrillic-using internet and in Unix
|
|
268 implementations; it shares the useful property with the other ,L:>8(B8
|
|
269 encodings that when the high bit is stripped, encoded text remains
|
|
270 readable (Cyrillic characters get mapped to corresponding Roman
|
|
271 character of the opposite case). "
|
|
272 aliases (cyrillic-koi8 koi8 cp878)))
|
428
|
273
|
4072
|
274 ;; Create a corresponding language environment.
|
428
|
275 (set-language-info-alist
|
4090
|
276 "Russian" '((charset cyrillic-iso8859-5)
|
|
277 (coding-system koi8-r)
|
|
278 (native-coding-system koi8-r)
|
|
279 (coding-priority koi8-r)
|
|
280 (input-method . "cyrillic-yawerty")
|
|
281 (features cyril-util)
|
|
282 (locale "ru")
|
|
283 (mswindows-locale . "RUSSIAN")
|
|
284 (tutorial . "TUTORIAL.ru")
|
|
285 (sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
|
|
286 (documentation . "Support for Russian."))
|
4072
|
287 '("Cyrillic"))
|
|
288
|
4090
|
289 ;; Provide Cyrillic-KOI8 for old times' sake too, but don't allow it to be
|
|
290 ;; selected by the Unix locale. A variant language environment called
|
|
291 ;; "Cyrillic-KOI8 (UTF-8)" just looks too odd.
|
|
292
|
4072
|
293 (set-language-info-alist
|
4090
|
294 "Cyrillic-KOI8"
|
|
295 (remassq 'locale (copy-list (cdr (assoc "Russian" language-info-alist))))
|
4072
|
296 '("Cyrillic"))
|
|
297
|
|
298 ;; KOI8-U, for Ukrainian.
|
|
299 (make-8-bit-coding-system
|
|
300 'koi8-u
|
|
301 '((#x80 ?\u2500) ;; BOX DRAWINGS LIGHT HORIZONTAL
|
|
302 (#x81 ?\u2502) ;; BOX DRAWINGS LIGHT VERTICAL
|
|
303 (#x82 ?\u250C) ;; BOX DRAWINGS LIGHT DOWN AND RIGHT
|
|
304 (#x83 ?\u2510) ;; BOX DRAWINGS LIGHT DOWN AND LEFT
|
|
305 (#x84 ?\u2514) ;; BOX DRAWINGS LIGHT UP AND RIGHT
|
|
306 (#x85 ?\u2518) ;; BOX DRAWINGS LIGHT UP AND LEFT
|
|
307 (#x86 ?\u251C) ;; BOX DRAWINGS LIGHT VERTICAL AND RIGHT
|
|
308 (#x87 ?\u2524) ;; BOX DRAWINGS LIGHT VERTICAL AND LEFT
|
|
309 (#x88 ?\u252C) ;; BOX DRAWINGS LIGHT DOWN AND HORIZONTAL
|
|
310 (#x89 ?\u2534) ;; BOX DRAWINGS LIGHT UP AND HORIZONTAL
|
|
311 (#x8A ?\u253C) ;; BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL
|
|
312 (#x8B ?\u2580) ;; UPPER HALF BLOCK
|
|
313 (#x8C ?\u2584) ;; LOWER HALF BLOCK
|
|
314 (#x8D ?\u2588) ;; FULL BLOCK
|
|
315 (#x8E ?\u258C) ;; LEFT HALF BLOCK
|
|
316 (#x8F ?\u2590) ;; RIGHT HALF BLOCK
|
|
317 (#x90 ?\u2591) ;; LIGHT SHADE
|
|
318 (#x91 ?\u2592) ;; MEDIUM SHADE
|
|
319 (#x92 ?\u2593) ;; DARK SHADE
|
|
320 (#x93 ?\u2320) ;; TOP HALF INTEGRAL
|
|
321 (#x94 ?\u25A0) ;; BLACK SQUARE
|
|
322 (#x95 ?\u2022) ;; BULLET
|
|
323 (#x96 ?\u221A) ;; SQUARE ROOT
|
|
324 (#x97 ?\u2248) ;; ALMOST EQUAL TO
|
|
325 (#x98 ?\u2264) ;; LESS-THAN OR EQUAL TO
|
|
326 (#x99 ?\u2265) ;; GREATER-THAN OR EQUAL TO
|
|
327 (#x9A ?\u00A0) ;; NO-BREAK SPACE
|
|
328 (#x9B ?\u2321) ;; BOTTOM HALF INTEGRAL
|
|
329 (#x9C ?\u00B0) ;; DEGREE SIGN
|
|
330 (#x9D ?\u00B2) ;; SUPERSCRIPT TWO
|
|
331 (#x9E ?\u00B7) ;; MIDDLE DOT
|
|
332 (#x9F ?\u00F7) ;; DIVISION SIGN
|
|
333 (#xA0 ?\u2550) ;; BOX DRAWINGS DOUBLE HORIZONTAL
|
|
334 (#xA1 ?\u2551) ;; BOX DRAWINGS DOUBLE VERTICAL
|
|
335 (#xA2 ?\u2552) ;; BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE
|
|
336 (#xA3 ?\u0451) ;; CYRILLIC SMALL LETTER IO
|
|
337 (#xA4 ?\u0454) ;; CYRILLIC SMALL LETTER UKRAINIAN IE
|
|
338 (#xA5 ?\u2554) ;; BOX DRAWINGS DOUBLE DOWN AND RIGHT
|
|
339 (#xA6 ?\u0456) ;; CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
340 (#xA7 ?\u0457) ;; CYRILLIC SMALL LETTER YI
|
|
341 (#xA8 ?\u2557) ;; BOX DRAWINGS DOUBLE DOWN AND LEFT
|
|
342 (#xA9 ?\u2558) ;; BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE
|
|
343 (#xAA ?\u2559) ;; BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE
|
|
344 (#xAB ?\u255A) ;; BOX DRAWINGS DOUBLE UP AND RIGHT
|
|
345 (#xAC ?\u255B) ;; BOX DRAWINGS UP SINGLE AND LEFT DOUBLE
|
|
346 (#xAD ?\u0491) ;; CYRILLIC SMALL LETTER GHE WITH UPTURN
|
|
347 (#xAE ?\u255D) ;; BOX DRAWINGS DOUBLE UP AND LEFT
|
|
348 (#xAF ?\u255E) ;; BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE
|
|
349 (#xB0 ?\u255F) ;; BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE
|
|
350 (#xB1 ?\u2560) ;; BOX DRAWINGS DOUBLE VERTICAL AND RIGHT
|
|
351 (#xB2 ?\u2561) ;; BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE
|
|
352 (#xB3 ?\u0401) ;; CYRILLIC CAPITAL LETTER IO
|
|
353 (#xB4 ?\u0404) ;; CYRILLIC CAPITAL LETTER UKRAINIAN IE
|
|
354 (#xB5 ?\u2563) ;; BOX DRAWINGS DOUBLE VERTICAL AND LEFT
|
|
355 (#xB6 ?\u0406) ;; CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
356 (#xB7 ?\u0407) ;; CYRILLIC CAPITAL LETTER YI
|
|
357 (#xB8 ?\u2566) ;; BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL
|
|
358 (#xB9 ?\u2567) ;; BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE
|
|
359 (#xBA ?\u2568) ;; BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE
|
|
360 (#xBB ?\u2569) ;; BOX DRAWINGS DOUBLE UP AND HORIZONTAL
|
|
361 (#xBC ?\u256A) ;; BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE
|
|
362 (#xBD ?\u0490) ;; CYRILLIC CAPITAL LETTER GHE WITH UPTURN
|
|
363 (#xBE ?\u256C) ;; BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL
|
|
364 (#xBF ?\u00A9) ;; COPYRIGHT SIGN
|
|
365 (#xC0 ?\u044E) ;; CYRILLIC SMALL LETTER YU
|
|
366 (#xC1 ?\u0430) ;; CYRILLIC SMALL LETTER A
|
|
367 (#xC2 ?\u0431) ;; CYRILLIC SMALL LETTER BE
|
|
368 (#xC3 ?\u0446) ;; CYRILLIC SMALL LETTER TSE
|
|
369 (#xC4 ?\u0434) ;; CYRILLIC SMALL LETTER DE
|
|
370 (#xC5 ?\u0435) ;; CYRILLIC SMALL LETTER IE
|
|
371 (#xC6 ?\u0444) ;; CYRILLIC SMALL LETTER EF
|
|
372 (#xC7 ?\u0433) ;; CYRILLIC SMALL LETTER GHE
|
|
373 (#xC8 ?\u0445) ;; CYRILLIC SMALL LETTER HA
|
|
374 (#xC9 ?\u0438) ;; CYRILLIC SMALL LETTER I
|
|
375 (#xCA ?\u0439) ;; CYRILLIC SMALL LETTER SHORT I
|
|
376 (#xCB ?\u043A) ;; CYRILLIC SMALL LETTER KA
|
|
377 (#xCC ?\u043B) ;; CYRILLIC SMALL LETTER EL
|
|
378 (#xCD ?\u043C) ;; CYRILLIC SMALL LETTER EM
|
|
379 (#xCE ?\u043D) ;; CYRILLIC SMALL LETTER EN
|
|
380 (#xCF ?\u043E) ;; CYRILLIC SMALL LETTER O
|
|
381 (#xD0 ?\u043F) ;; CYRILLIC SMALL LETTER PE
|
|
382 (#xD1 ?\u044F) ;; CYRILLIC SMALL LETTER YA
|
|
383 (#xD2 ?\u0440) ;; CYRILLIC SMALL LETTER ER
|
|
384 (#xD3 ?\u0441) ;; CYRILLIC SMALL LETTER ES
|
|
385 (#xD4 ?\u0442) ;; CYRILLIC SMALL LETTER TE
|
|
386 (#xD5 ?\u0443) ;; CYRILLIC SMALL LETTER U
|
|
387 (#xD6 ?\u0436) ;; CYRILLIC SMALL LETTER ZHE
|
|
388 (#xD7 ?\u0432) ;; CYRILLIC SMALL LETTER VE
|
|
389 (#xD8 ?\u044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
|
|
390 (#xD9 ?\u044B) ;; CYRILLIC SMALL LETTER YERU
|
|
391 (#xDA ?\u0437) ;; CYRILLIC SMALL LETTER ZE
|
|
392 (#xDB ?\u0448) ;; CYRILLIC SMALL LETTER SHA
|
|
393 (#xDC ?\u044D) ;; CYRILLIC SMALL LETTER E
|
|
394 (#xDD ?\u0449) ;; CYRILLIC SMALL LETTER SHCHA
|
|
395 (#xDE ?\u0447) ;; CYRILLIC SMALL LETTER CHE
|
|
396 (#xDF ?\u044A) ;; CYRILLIC SMALL LETTER HARD SIGN
|
|
397 (#xE0 ?\u042E) ;; CYRILLIC CAPITAL LETTER YU
|
|
398 (#xE1 ?\u0410) ;; CYRILLIC CAPITAL LETTER A
|
|
399 (#xE2 ?\u0411) ;; CYRILLIC CAPITAL LETTER BE
|
|
400 (#xE3 ?\u0426) ;; CYRILLIC CAPITAL LETTER TSE
|
|
401 (#xE4 ?\u0414) ;; CYRILLIC CAPITAL LETTER DE
|
|
402 (#xE5 ?\u0415) ;; CYRILLIC CAPITAL LETTER IE
|
|
403 (#xE6 ?\u0424) ;; CYRILLIC CAPITAL LETTER EF
|
|
404 (#xE7 ?\u0413) ;; CYRILLIC CAPITAL LETTER GHE
|
|
405 (#xE8 ?\u0425) ;; CYRILLIC CAPITAL LETTER HA
|
|
406 (#xE9 ?\u0418) ;; CYRILLIC CAPITAL LETTER I
|
|
407 (#xEA ?\u0419) ;; CYRILLIC CAPITAL LETTER SHORT I
|
|
408 (#xEB ?\u041A) ;; CYRILLIC CAPITAL LETTER KA
|
|
409 (#xEC ?\u041B) ;; CYRILLIC CAPITAL LETTER EL
|
|
410 (#xED ?\u041C) ;; CYRILLIC CAPITAL LETTER EM
|
|
411 (#xEE ?\u041D) ;; CYRILLIC CAPITAL LETTER EN
|
|
412 (#xEF ?\u041E) ;; CYRILLIC CAPITAL LETTER O
|
|
413 (#xF0 ?\u041F) ;; CYRILLIC CAPITAL LETTER PE
|
|
414 (#xF1 ?\u042F) ;; CYRILLIC CAPITAL LETTER YA
|
|
415 (#xF2 ?\u0420) ;; CYRILLIC CAPITAL LETTER ER
|
|
416 (#xF3 ?\u0421) ;; CYRILLIC CAPITAL LETTER ES
|
|
417 (#xF4 ?\u0422) ;; CYRILLIC CAPITAL LETTER TE
|
|
418 (#xF5 ?\u0423) ;; CYRILLIC CAPITAL LETTER U
|
|
419 (#xF6 ?\u0416) ;; CYRILLIC CAPITAL LETTER ZHE
|
|
420 (#xF7 ?\u0412) ;; CYRILLIC CAPITAL LETTER VE
|
|
421 (#xF8 ?\u042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
|
|
422 (#xF9 ?\u042B) ;; CYRILLIC CAPITAL LETTER YERU
|
|
423 (#xFA ?\u0417) ;; CYRILLIC CAPITAL LETTER ZE
|
|
424 (#xFB ?\u0428) ;; CYRILLIC CAPITAL LETTER SHA
|
|
425 (#xFC ?\u042D) ;; CYRILLIC CAPITAL LETTER E
|
|
426 (#xFD ?\u0429) ;; CYRILLIC CAPITAL LETTER SHCHA
|
|
427 (#xFE ?\u0427) ;; CYRILLIC CAPITAL LETTER CHE
|
|
428 (#xFF ?\u042A)) ;; CYRILLIC CAPITAL LETTER HARD SIGN
|
|
429 "KOI8-U, for Ukrainian"
|
|
430 '(mnemonic ",L:>8(B8,LC(B"
|
|
431 documentation
|
|
432 "KOI8-U, a KOI-8-compatible encoding for Ukrainian, described in RFC2319.
|
|
433 This has GHE WITH UPTURN, BYELORUSSIAN-UKRAINIAN I, UKRAINIAN IE and
|
|
434 YI instead of some box-drawing characters. Russian in this encoding
|
|
435 (without using box-drawing characters) is bit-for-bit compatible with
|
|
436 Russian in KOI8-R. "))
|
|
437
|
|
438 ;; Case support, for the new characters.
|
|
439 (loop
|
|
440 for (upper lower)
|
|
441 in '((?\u0404 ?\u0454) ; UKRAINIAN IE
|
|
442 (?\u0406 ?\u0456) ; BYELORUSSIAN-UKRAINIAN I
|
|
443 (?\u0407 ?\u0457) ; YI
|
|
444 (?\u0490 ?\u0491)); GHE WITH UPTURN
|
|
445 with case-table = (standard-case-table)
|
|
446 do
|
|
447 (put-case-table-pair upper lower case-table))
|
|
448
|
|
449 (set-language-info-alist
|
|
450 "Ukrainian" '((coding-system koi8-u)
|
|
451 (coding-priority koi8-u)
|
4090
|
452 (locale "uk")
|
4072
|
453 (input-method . "cyrillic-ukrainian")
|
|
454 (documentation
|
4090
|
455 . "Support for Ukrainian."))
|
428
|
456 '("Cyrillic"))
|
|
457
|
4145
|
458 (make-8-bit-coding-system
|
|
459 'windows-1251
|
|
460 '((#x80 ?\u0402) ;; CYRILLIC CAPITAL LETTER DJE
|
|
461 (#x81 ?\u0403) ;; CYRILLIC CAPITAL LETTER GJE
|
|
462 (#x82 ?\u201A) ;; SINGLE LOW-9 QUOTATION MARK
|
|
463 (#x83 ?\u0453) ;; CYRILLIC SMALL LETTER GJE
|
|
464 (#x84 ?\u201E) ;; DOUBLE LOW-9 QUOTATION MARK
|
|
465 (#x85 ?\u2026) ;; HORIZONTAL ELLIPSIS
|
|
466 (#x86 ?\u2020) ;; DAGGER
|
|
467 (#x87 ?\u2021) ;; DOUBLE DAGGER
|
|
468 (#x88 ?\u20AC) ;; EURO SIGN
|
|
469 (#x89 ?\u2030) ;; PER MILLE SIGN
|
|
470 (#x8A ?\u0409) ;; CYRILLIC CAPITAL LETTER LJE
|
|
471 (#x8B ?\u2039) ;; SINGLE LEFT-POINTING ANGLE QUOTATION MARK
|
|
472 (#x8C ?\u040A) ;; CYRILLIC CAPITAL LETTER NJE
|
|
473 (#x8D ?\u040C) ;; CYRILLIC CAPITAL LETTER KJE
|
|
474 (#x8E ?\u040B) ;; CYRILLIC CAPITAL LETTER TSHE
|
|
475 (#x8F ?\u040F) ;; CYRILLIC CAPITAL LETTER DZHE
|
|
476 (#x90 ?\u0452) ;; CYRILLIC SMALL LETTER DJE
|
|
477 (#x91 ?\u2018) ;; LEFT SINGLE QUOTATION MARK
|
|
478 (#x92 ?\u2019) ;; RIGHT SINGLE QUOTATION MARK
|
|
479 (#x93 ?\u201C) ;; LEFT DOUBLE QUOTATION MARK
|
|
480 (#x94 ?\u201D) ;; RIGHT DOUBLE QUOTATION MARK
|
|
481 (#x95 ?\u2022) ;; BULLET
|
|
482 (#x96 ?\u2013) ;; EN DASH
|
|
483 (#x97 ?\u2014) ;; EM DASH
|
|
484 (#x99 ?\u2122) ;; TRADE MARK SIGN
|
|
485 (#x9A ?\u0459) ;; CYRILLIC SMALL LETTER LJE
|
|
486 (#x9B ?\u203A) ;; SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
|
|
487 (#x9C ?\u045A) ;; CYRILLIC SMALL LETTER NJE
|
|
488 (#x9D ?\u045C) ;; CYRILLIC SMALL LETTER KJE
|
|
489 (#x9E ?\u045B) ;; CYRILLIC SMALL LETTER TSHE
|
|
490 (#x9F ?\u045F) ;; CYRILLIC SMALL LETTER DZHE
|
|
491 (#xA0 ?\u00A0) ;; NO-BREAK SPACE
|
|
492 (#xA1 ?\u040E) ;; CYRILLIC CAPITAL LETTER SHORT U
|
|
493 (#xA2 ?\u045E) ;; CYRILLIC SMALL LETTER SHORT U
|
|
494 (#xA3 ?\u0408) ;; CYRILLIC CAPITAL LETTER JE
|
|
495 (#xA4 ?\u00A4) ;; CURRENCY SIGN
|
|
496 (#xA5 ?\u0490) ;; CYRILLIC CAPITAL LETTER GHE WITH UPTURN
|
|
497 (#xA6 ?\u00A6) ;; BROKEN BAR
|
|
498 (#xA7 ?\u00A7) ;; SECTION SIGN
|
|
499 (#xA8 ?\u0401) ;; CYRILLIC CAPITAL LETTER IO
|
|
500 (#xA9 ?\u00A9) ;; COPYRIGHT SIGN
|
|
501 (#xAA ?\u0404) ;; CYRILLIC CAPITAL LETTER UKRAINIAN IE
|
|
502 (#xAB ?\u00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
|
|
503 (#xAC ?\u00AC) ;; NOT SIGN
|
|
504 (#xAD ?\u00AD) ;; SOFT HYPHEN
|
|
505 (#xAE ?\u00AE) ;; REGISTERED SIGN
|
|
506 (#xAF ?\u0407) ;; CYRILLIC CAPITAL LETTER YI
|
|
507 (#xB0 ?\u00B0) ;; DEGREE SIGN
|
|
508 (#xB1 ?\u00B1) ;; PLUS-MINUS SIGN
|
|
509 (#xB2 ?\u0406) ;; CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
510 (#xB3 ?\u0456) ;; CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
511 (#xB4 ?\u0491) ;; CYRILLIC SMALL LETTER GHE WITH UPTURN
|
|
512 (#xB5 ?\u00B5) ;; MICRO SIGN
|
|
513 (#xB6 ?\u00B6) ;; PILCROW SIGN
|
|
514 (#xB7 ?\u00B7) ;; MIDDLE DOT
|
|
515 (#xB8 ?\u0451) ;; CYRILLIC SMALL LETTER IO
|
|
516 (#xB9 ?\u2116) ;; NUMERO SIGN
|
|
517 (#xBA ?\u0454) ;; CYRILLIC SMALL LETTER UKRAINIAN IE
|
|
518 (#xBB ?\u00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
|
|
519 (#xBC ?\u0458) ;; CYRILLIC SMALL LETTER JE
|
|
520 (#xBD ?\u0405) ;; CYRILLIC CAPITAL LETTER DZE
|
|
521 (#xBE ?\u0455) ;; CYRILLIC SMALL LETTER DZE
|
|
522 (#xBF ?\u0457) ;; CYRILLIC SMALL LETTER YI
|
|
523 (#xC0 ?\u0410) ;; CYRILLIC CAPITAL LETTER A
|
|
524 (#xC1 ?\u0411) ;; CYRILLIC CAPITAL LETTER BE
|
|
525 (#xC2 ?\u0412) ;; CYRILLIC CAPITAL LETTER VE
|
|
526 (#xC3 ?\u0413) ;; CYRILLIC CAPITAL LETTER GHE
|
|
527 (#xC4 ?\u0414) ;; CYRILLIC CAPITAL LETTER DE
|
|
528 (#xC5 ?\u0415) ;; CYRILLIC CAPITAL LETTER IE
|
|
529 (#xC6 ?\u0416) ;; CYRILLIC CAPITAL LETTER ZHE
|
|
530 (#xC7 ?\u0417) ;; CYRILLIC CAPITAL LETTER ZE
|
|
531 (#xC8 ?\u0418) ;; CYRILLIC CAPITAL LETTER I
|
|
532 (#xC9 ?\u0419) ;; CYRILLIC CAPITAL LETTER SHORT I
|
|
533 (#xCA ?\u041A) ;; CYRILLIC CAPITAL LETTER KA
|
|
534 (#xCB ?\u041B) ;; CYRILLIC CAPITAL LETTER EL
|
|
535 (#xCC ?\u041C) ;; CYRILLIC CAPITAL LETTER EM
|
|
536 (#xCD ?\u041D) ;; CYRILLIC CAPITAL LETTER EN
|
|
537 (#xCE ?\u041E) ;; CYRILLIC CAPITAL LETTER O
|
|
538 (#xCF ?\u041F) ;; CYRILLIC CAPITAL LETTER PE
|
|
539 (#xD0 ?\u0420) ;; CYRILLIC CAPITAL LETTER ER
|
|
540 (#xD1 ?\u0421) ;; CYRILLIC CAPITAL LETTER ES
|
|
541 (#xD2 ?\u0422) ;; CYRILLIC CAPITAL LETTER TE
|
|
542 (#xD3 ?\u0423) ;; CYRILLIC CAPITAL LETTER U
|
|
543 (#xD4 ?\u0424) ;; CYRILLIC CAPITAL LETTER EF
|
|
544 (#xD5 ?\u0425) ;; CYRILLIC CAPITAL LETTER HA
|
|
545 (#xD6 ?\u0426) ;; CYRILLIC CAPITAL LETTER TSE
|
|
546 (#xD7 ?\u0427) ;; CYRILLIC CAPITAL LETTER CHE
|
|
547 (#xD8 ?\u0428) ;; CYRILLIC CAPITAL LETTER SHA
|
|
548 (#xD9 ?\u0429) ;; CYRILLIC CAPITAL LETTER SHCHA
|
|
549 (#xDA ?\u042A) ;; CYRILLIC CAPITAL LETTER HARD SIGN
|
|
550 (#xDB ?\u042B) ;; CYRILLIC CAPITAL LETTER YERU
|
|
551 (#xDC ?\u042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
|
|
552 (#xDD ?\u042D) ;; CYRILLIC CAPITAL LETTER E
|
|
553 (#xDE ?\u042E) ;; CYRILLIC CAPITAL LETTER YU
|
|
554 (#xDF ?\u042F) ;; CYRILLIC CAPITAL LETTER YA
|
|
555 (#xE0 ?\u0430) ;; CYRILLIC SMALL LETTER A
|
|
556 (#xE1 ?\u0431) ;; CYRILLIC SMALL LETTER BE
|
|
557 (#xE2 ?\u0432) ;; CYRILLIC SMALL LETTER VE
|
|
558 (#xE3 ?\u0433) ;; CYRILLIC SMALL LETTER GHE
|
|
559 (#xE4 ?\u0434) ;; CYRILLIC SMALL LETTER DE
|
|
560 (#xE5 ?\u0435) ;; CYRILLIC SMALL LETTER IE
|
|
561 (#xE6 ?\u0436) ;; CYRILLIC SMALL LETTER ZHE
|
|
562 (#xE7 ?\u0437) ;; CYRILLIC SMALL LETTER ZE
|
|
563 (#xE8 ?\u0438) ;; CYRILLIC SMALL LETTER I
|
|
564 (#xE9 ?\u0439) ;; CYRILLIC SMALL LETTER SHORT I
|
|
565 (#xEA ?\u043A) ;; CYRILLIC SMALL LETTER KA
|
|
566 (#xEB ?\u043B) ;; CYRILLIC SMALL LETTER EL
|
|
567 (#xEC ?\u043C) ;; CYRILLIC SMALL LETTER EM
|
|
568 (#xED ?\u043D) ;; CYRILLIC SMALL LETTER EN
|
|
569 (#xEE ?\u043E) ;; CYRILLIC SMALL LETTER O
|
|
570 (#xEF ?\u043F) ;; CYRILLIC SMALL LETTER PE
|
|
571 (#xF0 ?\u0440) ;; CYRILLIC SMALL LETTER ER
|
|
572 (#xF1 ?\u0441) ;; CYRILLIC SMALL LETTER ES
|
|
573 (#xF2 ?\u0442) ;; CYRILLIC SMALL LETTER TE
|
|
574 (#xF3 ?\u0443) ;; CYRILLIC SMALL LETTER U
|
|
575 (#xF4 ?\u0444) ;; CYRILLIC SMALL LETTER EF
|
|
576 (#xF5 ?\u0445) ;; CYRILLIC SMALL LETTER HA
|
|
577 (#xF6 ?\u0446) ;; CYRILLIC SMALL LETTER TSE
|
|
578 (#xF7 ?\u0447) ;; CYRILLIC SMALL LETTER CHE
|
|
579 (#xF8 ?\u0448) ;; CYRILLIC SMALL LETTER SHA
|
|
580 (#xF9 ?\u0449) ;; CYRILLIC SMALL LETTER SHCHA
|
|
581 (#xFA ?\u044A) ;; CYRILLIC SMALL LETTER HARD SIGN
|
|
582 (#xFB ?\u044B) ;; CYRILLIC SMALL LETTER YERU
|
|
583 (#xFC ?\u044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
|
|
584 (#xFD ?\u044D) ;; CYRILLIC SMALL LETTER E
|
|
585 (#xFE ?\u044E) ;; CYRILLIC SMALL LETTER YU
|
|
586 (#xFF ?\u044F)) ;; CYRILLIC SMALL LETTER YA
|
|
587 "Microsoft's Code Page 1251, for Russian, Bulgarian, Serbian and others. "
|
|
588 '(mnemonic "CyrW"
|
|
589 documentation
|
|
590 "This ASCII-compatible encoding is unfortunately not compatible at
|
4072
|
591 the code point level with the KOI8 family of encodings, but it
|
|
592 provides several widely-used punctuation and quotation marks that
|
|
593 KOI-8R and its relatives don't, and has become widely used. "
|
4145
|
594 aliases (cp1251)))
|
428
|
595
|
4072
|
596 (set-language-info-alist
|
|
597 "Bulgarian" '((coding-system windows-1251)
|
|
598 (coding-priority windows-1251)
|
|
599 (input-method . "bulgarian-bds")
|
4090
|
600 (locale "bg")
|
4072
|
601 (documentation
|
4090
|
602 . "Support for Bulgarian. ")
|
4072
|
603 (tutorial . "TUTORIAL.bg"))
|
|
604 '("Cyrillic"))
|
428
|
605
|
4072
|
606 (set-language-info-alist
|
|
607 "Belarusian" '((coding-system windows-1251)
|
|
608 (coding-priority windows-1251)
|
4090
|
609 (locale "be")
|
4072
|
610 (input-method . "belarusian")
|
|
611 (documentation
|
4090
|
612 . "Support for Belarusian. \(The name Belarusian replaced\
|
|
613 Byelorussian in the early 1990s.)"))
|
4072
|
614 '("Cyrillic"))
|
428
|
615
|
4072
|
616 ;;; Alternativnyj
|
|
617 (make-8-bit-coding-system
|
|
618 'alternativnyj
|
|
619 '((#x80 ?\u0410) ;; CYRILLIC CAPITAL LETTER A
|
|
620 (#x81 ?\u0411) ;; CYRILLIC CAPITAL LETTER BE
|
|
621 (#x82 ?\u0412) ;; CYRILLIC CAPITAL LETTER VE
|
|
622 (#x83 ?\u0413) ;; CYRILLIC CAPITAL LETTER GHE
|
|
623 (#x84 ?\u0414) ;; CYRILLIC CAPITAL LETTER DE
|
|
624 (#x85 ?\u0415) ;; CYRILLIC CAPITAL LETTER IE
|
|
625 (#x86 ?\u0416) ;; CYRILLIC CAPITAL LETTER ZHE
|
|
626 (#x87 ?\u0417) ;; CYRILLIC CAPITAL LETTER ZE
|
|
627 (#x88 ?\u0418) ;; CYRILLIC CAPITAL LETTER I
|
|
628 (#x89 ?\u0419) ;; CYRILLIC CAPITAL LETTER SHORT I
|
|
629 (#x8A ?\u041A) ;; CYRILLIC CAPITAL LETTER KA
|
|
630 (#x8B ?\u041B) ;; CYRILLIC CAPITAL LETTER EL
|
|
631 (#x8C ?\u041C) ;; CYRILLIC CAPITAL LETTER EM
|
|
632 (#x8D ?\u041D) ;; CYRILLIC CAPITAL LETTER EN
|
|
633 (#x8E ?\u041E) ;; CYRILLIC CAPITAL LETTER O
|
|
634 (#x8F ?\u041F) ;; CYRILLIC CAPITAL LETTER PE
|
|
635 (#x90 ?\u0420) ;; CYRILLIC CAPITAL LETTER ER
|
|
636 (#x91 ?\u0421) ;; CYRILLIC CAPITAL LETTER ES
|
|
637 (#x92 ?\u0422) ;; CYRILLIC CAPITAL LETTER TE
|
|
638 (#x93 ?\u0423) ;; CYRILLIC CAPITAL LETTER U
|
|
639 (#x94 ?\u0424) ;; CYRILLIC CAPITAL LETTER EF
|
|
640 (#x95 ?\u0425) ;; CYRILLIC CAPITAL LETTER HA
|
|
641 (#x96 ?\u0426) ;; CYRILLIC CAPITAL LETTER TSE
|
|
642 (#x97 ?\u0427) ;; CYRILLIC CAPITAL LETTER CHE
|
|
643 (#x98 ?\u0428) ;; CYRILLIC CAPITAL LETTER SHA
|
|
644 (#x99 ?\u0429) ;; CYRILLIC CAPITAL LETTER SHCHA
|
|
645 (#x9A ?\u042A) ;; CYRILLIC CAPITAL LETTER HARD SIGN
|
|
646 (#x9B ?\u042B) ;; CYRILLIC CAPITAL LETTER YERU
|
|
647 (#x9C ?\u042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
|
|
648 (#x9D ?\u042D) ;; CYRILLIC CAPITAL LETTER E
|
|
649 (#x9E ?\u042E) ;; CYRILLIC CAPITAL LETTER YU
|
|
650 (#x9F ?\u042F) ;; CYRILLIC CAPITAL LETTER YA
|
|
651 (#xA0 ?\u0430) ;; CYRILLIC SMALL LETTER A
|
|
652 (#xA1 ?\u0431) ;; CYRILLIC SMALL LETTER BE
|
|
653 (#xA2 ?\u0432) ;; CYRILLIC SMALL LETTER VE
|
|
654 (#xA3 ?\u0433) ;; CYRILLIC SMALL LETTER GHE
|
|
655 (#xA4 ?\u0434) ;; CYRILLIC SMALL LETTER DE
|
|
656 (#xA5 ?\u0435) ;; CYRILLIC SMALL LETTER IE
|
|
657 (#xA6 ?\u0436) ;; CYRILLIC SMALL LETTER ZHE
|
|
658 (#xA7 ?\u0437) ;; CYRILLIC SMALL LETTER ZE
|
|
659 (#xA8 ?\u0438) ;; CYRILLIC SMALL LETTER I
|
|
660 (#xA9 ?\u0439) ;; CYRILLIC SMALL LETTER SHORT I
|
|
661 (#xAA ?\u043A) ;; CYRILLIC SMALL LETTER KA
|
|
662 (#xAB ?\u043B) ;; CYRILLIC SMALL LETTER EL
|
|
663 (#xAC ?\u043C) ;; CYRILLIC SMALL LETTER EM
|
|
664 (#xAD ?\u043D) ;; CYRILLIC SMALL LETTER EN
|
|
665 (#xAE ?\u043E) ;; CYRILLIC SMALL LETTER O
|
|
666 (#xAF ?\u043F) ;; CYRILLIC SMALL LETTER PE
|
|
667 (#xB0 ?\u2591) ;; LIGHT SHADE
|
|
668 (#xB1 ?\u2592) ;; MEDIUM SHADE
|
|
669 (#xB2 ?\u2593) ;; DARK SHADE
|
|
670 (#xB3 ?\u2502) ;; BOX DRAWINGS LIGHT VERTICAL
|
|
671 (#xB4 ?\u2524) ;; BOX DRAWINGS LIGHT VERTICAL AND LEFT
|
|
672 (#xB5 ?\u2561) ;; BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE
|
|
673 (#xB6 ?\u2562) ;; BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE
|
|
674 (#xB7 ?\u2556) ;; BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE
|
|
675 (#xB8 ?\u2555) ;; BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE
|
|
676 (#xB9 ?\u2563) ;; BOX DRAWINGS DOUBLE VERTICAL AND LEFT
|
|
677 (#xBA ?\u2551) ;; BOX DRAWINGS DOUBLE VERTICAL
|
|
678 (#xBB ?\u2557) ;; BOX DRAWINGS DOUBLE DOWN AND LEFT
|
|
679 (#xBC ?\u255D) ;; BOX DRAWINGS DOUBLE UP AND LEFT
|
|
680 (#xBD ?\u255C) ;; BOX DRAWINGS UP DOUBLE AND LEFT SINGLE
|
|
681 (#xBE ?\u255B) ;; BOX DRAWINGS UP SINGLE AND LEFT DOUBLE
|
|
682 (#xBF ?\u2510) ;; BOX DRAWINGS LIGHT DOWN AND LEFT
|
|
683 (#xC0 ?\u2514) ;; BOX DRAWINGS LIGHT UP AND RIGHT
|
|
684 (#xC1 ?\u2534) ;; BOX DRAWINGS LIGHT UP AND HORIZONTAL
|
|
685 (#xC2 ?\u252C) ;; BOX DRAWINGS LIGHT DOWN AND HORIZONTAL
|
|
686 (#xC3 ?\u251C) ;; BOX DRAWINGS LIGHT VERTICAL AND RIGHT
|
|
687 (#xC4 ?\u2500) ;; BOX DRAWINGS LIGHT HORIZONTAL
|
|
688 (#xC5 ?\u253C) ;; BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL
|
|
689 (#xC6 ?\u255E) ;; BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE
|
|
690 (#xC7 ?\u255F) ;; BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE
|
|
691 (#xC8 ?\u255A) ;; BOX DRAWINGS DOUBLE UP AND RIGHT
|
|
692 (#xC9 ?\u2554) ;; BOX DRAWINGS DOUBLE DOWN AND RIGHT
|
|
693 (#xCA ?\u2569) ;; BOX DRAWINGS DOUBLE UP AND HORIZONTAL
|
|
694 (#xCB ?\u2566) ;; BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL
|
|
695 (#xCC ?\u2560) ;; BOX DRAWINGS DOUBLE VERTICAL AND RIGHT
|
|
696 (#xCD ?\u2550) ;; BOX DRAWINGS DOUBLE HORIZONTAL
|
|
697 (#xCE ?\u256C) ;; BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL
|
|
698 (#xCF ?\u2567) ;; BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE
|
|
699 (#xD0 ?\u2568) ;; BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE
|
|
700 (#xD1 ?\u2564) ;; BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE
|
|
701 (#xD2 ?\u2565) ;; BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE
|
|
702 (#xD3 ?\u2559) ;; BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE
|
|
703 (#xD4 ?\u2558) ;; BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE
|
|
704 (#xD5 ?\u2552) ;; BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE
|
|
705 (#xD6 ?\u2553) ;; BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE
|
|
706 (#xD7 ?\u256B) ;; BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE
|
|
707 (#xD8 ?\u256A) ;; BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE
|
|
708 (#xD9 ?\u2518) ;; BOX DRAWINGS LIGHT UP AND LEFT
|
|
709 (#xDA ?\u250C) ;; BOX DRAWINGS LIGHT DOWN AND RIGHT
|
|
710 (#xDB ?\u2588) ;; FULL BLOCK
|
|
711 (#xDC ?\u2584) ;; LOWER HALF BLOCK
|
|
712 (#xDD ?\u258C) ;; LEFT HALF BLOCK
|
|
713 (#xDE ?\u2590) ;; RIGHT HALF BLOCK
|
|
714 (#xDF ?\u2580) ;; UPPER HALF BLOCK
|
|
715 (#xE0 ?\u0440) ;; CYRILLIC SMALL LETTER ER
|
|
716 (#xE1 ?\u0441) ;; CYRILLIC SMALL LETTER ES
|
|
717 (#xE2 ?\u0442) ;; CYRILLIC SMALL LETTER TE
|
|
718 (#xE3 ?\u0443) ;; CYRILLIC SMALL LETTER U
|
|
719 (#xE4 ?\u0444) ;; CYRILLIC SMALL LETTER EF
|
|
720 (#xE5 ?\u0445) ;; CYRILLIC SMALL LETTER HA
|
|
721 (#xE6 ?\u0446) ;; CYRILLIC SMALL LETTER TSE
|
|
722 (#xE7 ?\u0447) ;; CYRILLIC SMALL LETTER CHE
|
|
723 (#xE8 ?\u0448) ;; CYRILLIC SMALL LETTER SHA
|
|
724 (#xE9 ?\u0449) ;; CYRILLIC SMALL LETTER SHCHA
|
|
725 (#xEA ?\u044A) ;; CYRILLIC SMALL LETTER HARD SIGN
|
|
726 (#xEB ?\u044B) ;; CYRILLIC SMALL LETTER YERU
|
|
727 (#xEC ?\u044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
|
|
728 (#xED ?\u044D) ;; CYRILLIC SMALL LETTER E
|
|
729 (#xEE ?\u044E) ;; CYRILLIC SMALL LETTER YU
|
|
730 (#xEF ?\u044F) ;; CYRILLIC SMALL LETTER YA
|
|
731 (#xF0 ?\u0401) ;; CYRILLIC CAPITAL LETTER IO
|
|
732 (#xF1 ?\u0451) ;; CYRILLIC SMALL LETTER IO
|
|
733 (#xF2 ?\u0404) ;; CYRILLIC CAPITAL LETTER UKRAINIAN IE
|
|
734 (#xF3 ?\u0454) ;; CYRILLIC SMALL LETTER UKRAINIAN IE
|
|
735 (#xF4 ?\u0407) ;; CYRILLIC CAPITAL LETTER YI
|
|
736 (#xF5 ?\u0457) ;; CYRILLIC SMALL LETTER YI
|
|
737 (#xF6 ?\u040E) ;; CYRILLIC CAPITAL LETTER SHORT U
|
|
738 (#xF7 ?\u045E) ;; CYRILLIC SMALL LETTER SHORT U
|
|
739 (#xF8 ?\u00B0) ;; DEGREE SIGN
|
|
740 (#xF9 ?\u2022) ;; BULLET
|
|
741 (#xFA ?\u00B7) ;; MIDDLE DOT
|
|
742 (#xFB ?\u221A) ;; SQUARE ROOT
|
|
743 (#xFC ?\u2116) ;; NUMERO SIGN
|
|
744 (#xFD ?\u00A4) ;; CURRENCY SIGN
|
|
745 (#xFE ?\u25A0) ;; BLACK SQUARE
|
|
746 (#xFF ?\u00A0)) ;; NO-BREAK SPACE
|
|
747 "Alternativnyj (Cyrillic). Microsoft's Code Page 966. "
|
|
748 '(mnemonic "Cy.Alt"
|
|
749 aliases (cp866)))
|
428
|
750
|
|
751 (set-language-info-alist
|
|
752 "Cyrillic-ALT" '((charset cyrillic-iso8859-5)
|
4072
|
753 (coding-system alternativnyj)
|
|
754 (native-coding-system alternativnyj)
|
|
755 (coding-priority alternativnyj)
|
|
756 (input-method . "cyrillic-yawerty")
|
|
757 (features cyril-util)
|
|
758 (tutorial . "TUTORIAL.ru")
|
|
759 (sample-text . "Russian (,L@caaZXY(B) ,L7T`PRabRcYbU(B!")
|
|
760 (documentation . "Support for Cyrillic ALTERNATIVNYJ."))
|
|
761 '("Cyrillic"))
|
|
762
|
|
763 (make-8-bit-coding-system
|
|
764 'koi8-ru
|
|
765 '((#x80 ?\u2500) ;; BOX DRAWINGS LIGHT HORIZONTAL
|
|
766 (#x81 ?\u2502) ;; BOX DRAWINGS LIGHT VERTICAL
|
|
767 (#x82 ?\u250C) ;; BOX DRAWINGS LIGHT DOWN AND RIGHT
|
|
768 (#x83 ?\u2510) ;; BOX DRAWINGS LIGHT DOWN AND LEFT
|
|
769 (#x84 ?\u2514) ;; BOX DRAWINGS LIGHT UP AND RIGHT
|
|
770 (#x85 ?\u2518) ;; BOX DRAWINGS LIGHT UP AND LEFT
|
|
771 (#x86 ?\u251C) ;; BOX DRAWINGS LIGHT VERTICAL AND RIGHT
|
|
772 (#x87 ?\u2524) ;; BOX DRAWINGS LIGHT VERTICAL AND LEFT
|
|
773 (#x88 ?\u252C) ;; BOX DRAWINGS LIGHT DOWN AND HORIZONTAL
|
|
774 (#x89 ?\u2534) ;; BOX DRAWINGS LIGHT UP AND HORIZONTAL
|
|
775 (#x8A ?\u253C) ;; BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL
|
|
776 (#x8B ?\u2580) ;; UPPER HALF BLOCK
|
|
777 (#x8C ?\u2584) ;; LOWER HALF BLOCK
|
|
778 (#x8D ?\u2588) ;; FULL BLOCK
|
|
779 (#x8E ?\u258C) ;; LEFT HALF BLOCK
|
|
780 (#x8F ?\u2590) ;; RIGHT HALF BLOCK
|
|
781 (#x90 ?\u2591) ;; LIGHT SHADE
|
|
782 (#x91 ?\u2592) ;; MEDIUM SHADE
|
|
783 (#x92 ?\u2593) ;; DARK SHADE
|
|
784 (#x93 ?\u2320) ;; TOP HALF INTEGRAL
|
|
785 (#x94 ?\u25A0) ;; BLACK SQUARE
|
|
786 (#x95 ?\u2219) ;; BULLET OPERATOR
|
|
787 (#x96 ?\u221A) ;; SQUARE ROOT
|
|
788 (#x97 ?\u2248) ;; ALMOST EQUAL TO
|
|
789 (#x98 ?\u2264) ;; LESS-THAN OR EQUAL TO
|
|
790 (#x99 ?\u2265) ;; GREATER-THAN OR EQUAL TO
|
|
791 (#x9A ?\u00A0) ;; NO-BREAK SPACE
|
|
792 (#x9B ?\u2321) ;; BOTTOM HALF INTEGRAL
|
|
793 (#x9C ?\u00B0) ;; DEGREE SIGN
|
|
794 (#x9D ?\u00B2) ;; SUPERSCRIPT TWO
|
|
795 (#x9E ?\u00B7) ;; MIDDLE DOT
|
|
796 (#x9F ?\u00F7) ;; DIVISION SIGN
|
|
797 (#xA0 ?\u2550) ;; BOX DRAWINGS DOUBLE HORIZONTAL
|
|
798 (#xA1 ?\u2551) ;; BOX DRAWINGS DOUBLE VERTICAL
|
|
799 (#xA2 ?\u2552) ;; BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE
|
|
800 (#xA3 ?\u0451) ;; CYRILLIC SMALL LETTER IO
|
|
801 (#xA4 ?\u0454) ;; CYRILLIC SMALL LETTER UKRAINIAN IE
|
|
802 (#xA5 ?\u2554) ;; BOX DRAWINGS DOUBLE DOWN AND RIGHT
|
|
803 (#xA6 ?\u0456) ;; CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
804 (#xA7 ?\u0457) ;; CYRILLIC SMALL LETTER YI
|
|
805 (#xA8 ?\u2557) ;; BOX DRAWINGS DOUBLE DOWN AND LEFT
|
|
806 (#xA9 ?\u2558) ;; BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE
|
|
807 (#xAA ?\u2559) ;; BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE
|
|
808 (#xAB ?\u255A) ;; BOX DRAWINGS DOUBLE UP AND RIGHT
|
|
809 (#xAC ?\u255B) ;; BOX DRAWINGS UP SINGLE AND LEFT DOUBLE
|
|
810 (#xAD ?\u0491) ;; CYRILLIC SMALL LETTER GHE WITH UPTURN
|
|
811 (#xAE ?\u045E) ;; CYRILLIC SMALL LETTER SHORT U
|
|
812 (#xAF ?\u255E) ;; BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE
|
|
813 (#xB0 ?\u255F) ;; BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE
|
|
814 (#xB1 ?\u2560) ;; BOX DRAWINGS DOUBLE VERTICAL AND RIGHT
|
|
815 (#xB2 ?\u2561) ;; BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE
|
|
816 (#xB3 ?\u0401) ;; CYRILLIC CAPITAL LETTER IO
|
|
817 (#xB4 ?\u0404) ;; CYRILLIC CAPITAL LETTER UKRAINIAN IE
|
|
818 (#xB5 ?\u2563) ;; BOX DRAWINGS DOUBLE VERTICAL AND LEFT
|
|
819 (#xB6 ?\u0406) ;; CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
820 (#xB7 ?\u0407) ;; CYRILLIC CAPITAL LETTER YI
|
|
821 (#xB8 ?\u2566) ;; BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL
|
|
822 (#xB9 ?\u2567) ;; BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE
|
|
823 (#xBA ?\u2568) ;; BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE
|
|
824 (#xBB ?\u2569) ;; BOX DRAWINGS DOUBLE UP AND HORIZONTAL
|
|
825 (#xBC ?\u256A) ;; BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE
|
|
826 (#xBD ?\u0490) ;; CYRILLIC CAPITAL LETTER GHE WITH UPTURN
|
|
827 (#xBE ?\u040E) ;; CYRILLIC CAPITAL LETTER SHORT U
|
|
828 (#xBF ?\u00A9) ;; COPYRIGHT SIGN
|
|
829 (#xC0 ?\u044E) ;; CYRILLIC SMALL LETTER YU
|
|
830 (#xC1 ?\u0430) ;; CYRILLIC SMALL LETTER A
|
|
831 (#xC2 ?\u0431) ;; CYRILLIC SMALL LETTER BE
|
|
832 (#xC3 ?\u0446) ;; CYRILLIC SMALL LETTER TSE
|
|
833 (#xC4 ?\u0434) ;; CYRILLIC SMALL LETTER DE
|
|
834 (#xC5 ?\u0435) ;; CYRILLIC SMALL LETTER IE
|
|
835 (#xC6 ?\u0444) ;; CYRILLIC SMALL LETTER EF
|
|
836 (#xC7 ?\u0433) ;; CYRILLIC SMALL LETTER GHE
|
|
837 (#xC8 ?\u0445) ;; CYRILLIC SMALL LETTER HA
|
|
838 (#xC9 ?\u0438) ;; CYRILLIC SMALL LETTER I
|
|
839 (#xCA ?\u0439) ;; CYRILLIC SMALL LETTER SHORT I
|
|
840 (#xCB ?\u043A) ;; CYRILLIC SMALL LETTER KA
|
|
841 (#xCC ?\u043B) ;; CYRILLIC SMALL LETTER EL
|
|
842 (#xCD ?\u043C) ;; CYRILLIC SMALL LETTER EM
|
|
843 (#xCE ?\u043D) ;; CYRILLIC SMALL LETTER EN
|
|
844 (#xCF ?\u043E) ;; CYRILLIC SMALL LETTER O
|
|
845 (#xD0 ?\u043F) ;; CYRILLIC SMALL LETTER PE
|
|
846 (#xD1 ?\u044F) ;; CYRILLIC SMALL LETTER YA
|
|
847 (#xD2 ?\u0440) ;; CYRILLIC SMALL LETTER ER
|
|
848 (#xD3 ?\u0441) ;; CYRILLIC SMALL LETTER ES
|
|
849 (#xD4 ?\u0442) ;; CYRILLIC SMALL LETTER TE
|
|
850 (#xD5 ?\u0443) ;; CYRILLIC SMALL LETTER U
|
|
851 (#xD6 ?\u0436) ;; CYRILLIC SMALL LETTER ZHE
|
|
852 (#xD7 ?\u0432) ;; CYRILLIC SMALL LETTER VE
|
|
853 (#xD8 ?\u044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
|
|
854 (#xD9 ?\u044B) ;; CYRILLIC SMALL LETTER YERU
|
|
855 (#xDA ?\u0437) ;; CYRILLIC SMALL LETTER ZE
|
|
856 (#xDB ?\u0448) ;; CYRILLIC SMALL LETTER SHA
|
|
857 (#xDC ?\u044D) ;; CYRILLIC SMALL LETTER E
|
|
858 (#xDD ?\u0449) ;; CYRILLIC SMALL LETTER SHCHA
|
|
859 (#xDE ?\u0447) ;; CYRILLIC SMALL LETTER CHE
|
|
860 (#xDF ?\u044A) ;; CYRILLIC SMALL LETTER HARD SIGN
|
|
861 (#xE0 ?\u042E) ;; CYRILLIC CAPITAL LETTER YU
|
|
862 (#xE1 ?\u0410) ;; CYRILLIC CAPITAL LETTER A
|
|
863 (#xE2 ?\u0411) ;; CYRILLIC CAPITAL LETTER BE
|
|
864 (#xE3 ?\u0426) ;; CYRILLIC CAPITAL LETTER TSE
|
|
865 (#xE4 ?\u0414) ;; CYRILLIC CAPITAL LETTER DE
|
|
866 (#xE5 ?\u0415) ;; CYRILLIC CAPITAL LETTER IE
|
|
867 (#xE6 ?\u0424) ;; CYRILLIC CAPITAL LETTER EF
|
|
868 (#xE7 ?\u0413) ;; CYRILLIC CAPITAL LETTER GHE
|
|
869 (#xE8 ?\u0425) ;; CYRILLIC CAPITAL LETTER HA
|
|
870 (#xE9 ?\u0418) ;; CYRILLIC CAPITAL LETTER I
|
|
871 (#xEA ?\u0419) ;; CYRILLIC CAPITAL LETTER SHORT I
|
|
872 (#xEB ?\u041A) ;; CYRILLIC CAPITAL LETTER KA
|
|
873 (#xEC ?\u041B) ;; CYRILLIC CAPITAL LETTER EL
|
|
874 (#xED ?\u041C) ;; CYRILLIC CAPITAL LETTER EM
|
|
875 (#xEE ?\u041D) ;; CYRILLIC CAPITAL LETTER EN
|
|
876 (#xEF ?\u041E) ;; CYRILLIC CAPITAL LETTER O
|
|
877 (#xF0 ?\u041F) ;; CYRILLIC CAPITAL LETTER PE
|
|
878 (#xF1 ?\u042F) ;; CYRILLIC CAPITAL LETTER YA
|
|
879 (#xF2 ?\u0420) ;; CYRILLIC CAPITAL LETTER ER
|
|
880 (#xF3 ?\u0421) ;; CYRILLIC CAPITAL LETTER ES
|
|
881 (#xF4 ?\u0422) ;; CYRILLIC CAPITAL LETTER TE
|
|
882 (#xF5 ?\u0423) ;; CYRILLIC CAPITAL LETTER U
|
|
883 (#xF6 ?\u0416) ;; CYRILLIC CAPITAL LETTER ZHE
|
|
884 (#xF7 ?\u0412) ;; CYRILLIC CAPITAL LETTER VE
|
|
885 (#xF8 ?\u042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
|
|
886 (#xF9 ?\u042B) ;; CYRILLIC CAPITAL LETTER YERU
|
|
887 (#xFA ?\u0417) ;; CYRILLIC CAPITAL LETTER ZE
|
|
888 (#xFB ?\u0428) ;; CYRILLIC CAPITAL LETTER SHA
|
|
889 (#xFC ?\u042D) ;; CYRILLIC CAPITAL LETTER E
|
|
890 (#xFD ?\u0429) ;; CYRILLIC CAPITAL LETTER SHCHA
|
|
891 (#xFE ?\u0427) ;; CYRILLIC CAPITAL LETTER CHE
|
|
892 (#xFF ?\u042A));; CYRILLIC CAPITAL LETTER HARD SIGN
|
|
893 "KOI8-RU, a mostly-compatible superset of KOI8-R.
|
|
894 Also known as Windows code page 21866; has Ukrainian and Belarussian support. "
|
|
895 '(mnemonic ",L@C(B"
|
|
896 aliases (cp21866)))
|
|
897
|
|
898 ;; We should provide an input method and the corresponding language
|
|
899 ;; environments for the next three coding systems.
|
|
900
|
|
901 (make-8-bit-coding-system
|
|
902 'koi8-t
|
|
903 '((#x80 ?\u049B) ;; CYRILLIC SMALL LETTER KA WITH DESCENDER
|
|
904 (#x81 ?\u0493) ;; CYRILLIC SMALL LETTER GHE WITH STROKE
|
|
905 (#x82 ?\u201A) ;; SINGLE LOW-9 QUOTATION MARK
|
|
906 (#x83 ?\u0492) ;; CYRILLIC CAPITAL LETTER GHE WITH STROKE
|
|
907 (#x84 ?\u201E) ;; DOUBLE LOW-9 QUOTATION MARK
|
|
908 (#x85 ?\u2026) ;; HORIZONTAL ELLIPSIS
|
|
909 (#x86 ?\u2020) ;; DAGGER
|
|
910 (#x87 ?\u2021) ;; DOUBLE DAGGER
|
|
911 (#x89 ?\u2030) ;; PER MILLE SIGN
|
|
912 (#x8A ?\u04B3) ;; CYRILLIC SMALL LETTER HA WITH DESCENDER
|
|
913 (#x8B ?\u2039) ;; SINGLE LEFT-POINTING ANGLE QUOTATION MARK
|
|
914 (#x8C ?\u04B2) ;; CYRILLIC CAPITAL LETTER HA WITH DESCENDER
|
|
915 (#x8D ?\u04B7) ;; CYRILLIC SMALL LETTER CHE WITH DESCENDER
|
|
916 (#x8E ?\u04B6) ;; CYRILLIC CAPITAL LETTER CHE WITH DESCENDER
|
|
917 (#x90 ?\u049A) ;; CYRILLIC CAPITAL LETTER KA WITH DESCENDER
|
|
918 (#x91 ?\u2018) ;; LEFT SINGLE QUOTATION MARK
|
|
919 (#x92 ?\u2019) ;; RIGHT SINGLE QUOTATION MARK
|
|
920 (#x93 ?\u201C) ;; LEFT DOUBLE QUOTATION MARK
|
|
921 (#x94 ?\u201D) ;; RIGHT DOUBLE QUOTATION MARK
|
|
922 (#x95 ?\u2022) ;; BULLET
|
|
923 (#x96 ?\u2013) ;; EN DASH
|
|
924 (#x97 ?\u2014) ;; EM DASH
|
|
925 (#x99 ?\u2122) ;; TRADE MARK SIGN
|
|
926 (#x9B ?\u203A) ;; SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
|
|
927 (#xA1 ?\u04EF) ;; CYRILLIC SMALL LETTER U WITH MACRON
|
|
928 (#xA2 ?\u04EE) ;; CYRILLIC CAPITAL LETTER U WITH MACRON
|
|
929 (#xA3 ?\u0451) ;; CYRILLIC SMALL LETTER IO
|
|
930 (#xA4 ?\u00A4) ;; CURRENCY SIGN
|
|
931 (#xA5 ?\u04E3) ;; CYRILLIC SMALL LETTER I WITH MACRON
|
|
932 (#xA6 ?\u00A6) ;; BROKEN BAR
|
|
933 (#xA7 ?\u00A7) ;; SECTION SIGN
|
|
934 (#xAB ?\u00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
|
|
935 (#xAC ?\u00AC) ;; NOT SIGN
|
|
936 (#xAD ?\u00AD) ;; SOFT HYPHEN
|
|
937 (#xAE ?\u00AE) ;; REGISTERED SIGN
|
|
938 (#xB0 ?\u00B0) ;; DEGREE SIGN
|
|
939 (#xB1 ?\u00B1) ;; PLUS-MINUS SIGN
|
|
940 (#xB2 ?\u00B2) ;; SUPERSCRIPT TWO
|
|
941 (#xB3 ?\u0401) ;; CYRILLIC CAPITAL LETTER IO
|
|
942 (#xB5 ?\u04E2) ;; CYRILLIC CAPITAL LETTER I WITH MACRON
|
|
943 (#xB6 ?\u00B6) ;; PILCROW SIGN
|
|
944 (#xB7 ?\u00B7) ;; MIDDLE DOT
|
|
945 (#xB9 ?\u2116) ;; NUMERO SIGN
|
|
946 (#xBB ?\u00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
|
|
947 (#xBF ?\u00A9) ;; COPYRIGHT SIGN
|
|
948 (#xC0 ?\u044E) ;; CYRILLIC SMALL LETTER YU
|
|
949 (#xC1 ?\u0430) ;; CYRILLIC SMALL LETTER A
|
|
950 (#xC2 ?\u0431) ;; CYRILLIC SMALL LETTER BE
|
|
951 (#xC3 ?\u0446) ;; CYRILLIC SMALL LETTER TSE
|
|
952 (#xC4 ?\u0434) ;; CYRILLIC SMALL LETTER DE
|
|
953 (#xC5 ?\u0435) ;; CYRILLIC SMALL LETTER IE
|
|
954 (#xC6 ?\u0444) ;; CYRILLIC SMALL LETTER EF
|
|
955 (#xC7 ?\u0433) ;; CYRILLIC SMALL LETTER GHE
|
|
956 (#xC8 ?\u0445) ;; CYRILLIC SMALL LETTER HA
|
|
957 (#xC9 ?\u0438) ;; CYRILLIC SMALL LETTER I
|
|
958 (#xCA ?\u0439) ;; CYRILLIC SMALL LETTER SHORT I
|
|
959 (#xCB ?\u043A) ;; CYRILLIC SMALL LETTER KA
|
|
960 (#xCC ?\u043B) ;; CYRILLIC SMALL LETTER EL
|
|
961 (#xCD ?\u043C) ;; CYRILLIC SMALL LETTER EM
|
|
962 (#xCE ?\u043D) ;; CYRILLIC SMALL LETTER EN
|
|
963 (#xCF ?\u043E) ;; CYRILLIC SMALL LETTER O
|
|
964 (#xD0 ?\u043F) ;; CYRILLIC SMALL LETTER PE
|
|
965 (#xD1 ?\u044F) ;; CYRILLIC SMALL LETTER YA
|
|
966 (#xD2 ?\u0440) ;; CYRILLIC SMALL LETTER ER
|
|
967 (#xD3 ?\u0441) ;; CYRILLIC SMALL LETTER ES
|
|
968 (#xD4 ?\u0442) ;; CYRILLIC SMALL LETTER TE
|
|
969 (#xD5 ?\u0443) ;; CYRILLIC SMALL LETTER U
|
|
970 (#xD6 ?\u0436) ;; CYRILLIC SMALL LETTER ZHE
|
|
971 (#xD7 ?\u0432) ;; CYRILLIC SMALL LETTER VE
|
|
972 (#xD8 ?\u044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
|
|
973 (#xD9 ?\u044B) ;; CYRILLIC SMALL LETTER YERU
|
|
974 (#xDA ?\u0437) ;; CYRILLIC SMALL LETTER ZE
|
|
975 (#xDB ?\u0448) ;; CYRILLIC SMALL LETTER SHA
|
|
976 (#xDC ?\u044D) ;; CYRILLIC SMALL LETTER E
|
|
977 (#xDD ?\u0449) ;; CYRILLIC SMALL LETTER SHCHA
|
|
978 (#xDE ?\u0447) ;; CYRILLIC SMALL LETTER CHE
|
|
979 (#xDF ?\u044A) ;; CYRILLIC SMALL LETTER HARD SIGN
|
|
980 (#xE0 ?\u042E) ;; CYRILLIC CAPITAL LETTER YU
|
|
981 (#xE1 ?\u0410) ;; CYRILLIC CAPITAL LETTER A
|
|
982 (#xE2 ?\u0411) ;; CYRILLIC CAPITAL LETTER BE
|
|
983 (#xE3 ?\u0426) ;; CYRILLIC CAPITAL LETTER TSE
|
|
984 (#xE4 ?\u0414) ;; CYRILLIC CAPITAL LETTER DE
|
|
985 (#xE5 ?\u0415) ;; CYRILLIC CAPITAL LETTER IE
|
|
986 (#xE6 ?\u0424) ;; CYRILLIC CAPITAL LETTER EF
|
|
987 (#xE7 ?\u0413) ;; CYRILLIC CAPITAL LETTER GHE
|
|
988 (#xE8 ?\u0425) ;; CYRILLIC CAPITAL LETTER HA
|
|
989 (#xE9 ?\u0418) ;; CYRILLIC CAPITAL LETTER I
|
|
990 (#xEA ?\u0419) ;; CYRILLIC CAPITAL LETTER SHORT I
|
|
991 (#xEB ?\u041A) ;; CYRILLIC CAPITAL LETTER KA
|
|
992 (#xEC ?\u041B) ;; CYRILLIC CAPITAL LETTER EL
|
|
993 (#xED ?\u041C) ;; CYRILLIC CAPITAL LETTER EM
|
|
994 (#xEE ?\u041D) ;; CYRILLIC CAPITAL LETTER EN
|
|
995 (#xEF ?\u041E) ;; CYRILLIC CAPITAL LETTER O
|
|
996 (#xF0 ?\u041F) ;; CYRILLIC CAPITAL LETTER PE
|
|
997 (#xF1 ?\u042F) ;; CYRILLIC CAPITAL LETTER YA
|
|
998 (#xF2 ?\u0420) ;; CYRILLIC CAPITAL LETTER ER
|
|
999 (#xF3 ?\u0421) ;; CYRILLIC CAPITAL LETTER ES
|
|
1000 (#xF4 ?\u0422) ;; CYRILLIC CAPITAL LETTER TE
|
|
1001 (#xF5 ?\u0423) ;; CYRILLIC CAPITAL LETTER U
|
|
1002 (#xF6 ?\u0416) ;; CYRILLIC CAPITAL LETTER ZHE
|
|
1003 (#xF7 ?\u0412) ;; CYRILLIC CAPITAL LETTER VE
|
|
1004 (#xF8 ?\u042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
|
|
1005 (#xF9 ?\u042B) ;; CYRILLIC CAPITAL LETTER YERU
|
|
1006 (#xFA ?\u0417) ;; CYRILLIC CAPITAL LETTER ZE
|
|
1007 (#xFB ?\u0428) ;; CYRILLIC CAPITAL LETTER SHA
|
|
1008 (#xFC ?\u042D) ;; CYRILLIC CAPITAL LETTER E
|
|
1009 (#xFD ?\u0429) ;; CYRILLIC CAPITAL LETTER SHCHA
|
|
1010 (#xFE ?\u0427) ;; CYRILLIC CAPITAL LETTER CHE
|
|
1011 (#xFF ?\u042A));; CYRILLIC CAPITAL LETTER HARD SIGN
|
|
1012 ",L:>8(B-8 for Tajik."
|
|
1013 '(mnemonic ",LB%GҶ%@(B"
|
|
1014 documentation
|
|
1015 "Compatible in the alphabetic characters with KOI-8R for Russian,
|
|
1016 this 8-bit Cyrillic coding system makes those characters available
|
|
1017 that are necessary for writing Tajik, (,LWPQ^]%Gӣ%@(B ,Lb^%Gҷ%@XZ%Gӣ%@(B) the main
|
|
1018 language of Tajikistan and a close relative of Persian. "))
|
|
1019
|
|
1020 ;; Case support, for the new characters.
|
|
1021 (loop
|
|
1022 for (upper lower)
|
|
1023 in '((?\u04B6 ?\u04B7) ;; CHE WITH DESCENDER
|
|
1024 (?\u0492 ?\u0493) ;; GHE WITH STROKE
|
|
1025 (?\u04B2 ?\u04B3) ;; HA WITH DESCENDER
|
|
1026 (?\u04E2 ?\u04E3) ;; I WITH MACRON
|
|
1027 (?\u049A ?\u049B) ;; KA WITH DESCENDER
|
|
1028 (?\u04EE ?\u04EF)) ;; U WITH MACRON
|
|
1029 with case-table = (standard-case-table)
|
|
1030 do
|
|
1031 (put-case-table-pair upper lower case-table))
|
|
1032
|
|
1033 ;; Support fot the languages of the Caucasus.
|
|
1034 (make-8-bit-coding-system
|
|
1035 'koi8-c
|
|
1036 '((#x80 ?\u0493) ;; CYRILLIC SMALL LETTER GHE WITH STROKE
|
|
1037 (#x81 ?\u0497) ;; CYRILLIC SMALL LETTER ZHE WITH DESCENDER
|
|
1038 (#x82 ?\u049B) ;; CYRILLIC SMALL LETTER KA WITH DESCENDER
|
|
1039 (#x83 ?\u049D) ;; CYRILLIC SMALL LETTER KA WITH VERTICAL STROKE
|
|
1040 (#x84 ?\u04A3) ;; CYRILLIC SMALL LETTER EN WITH DESCENDER
|
|
1041 (#x85 ?\u04AF) ;; CYRILLIC SMALL LETTER STRAIGHT U
|
|
1042 (#x86 ?\u04B1) ;; CYRILLIC SMALL LETTER STRAIGHT U WITH STROKE
|
|
1043 (#x87 ?\u04B3) ;; CYRILLIC SMALL LETTER HA WITH DESCENDER
|
|
1044 (#x88 ?\u04B7) ;; CYRILLIC SMALL LETTER CHE WITH DESCENDER
|
|
1045 (#x89 ?\u04B9) ;; CYRILLIC SMALL LETTER CHE WITH VERTICAL STROKE
|
|
1046 (#x8A ?\u04BB) ;; CYRILLIC SMALL LETTER SHHA
|
|
1047 (#x8B ?\u2580) ;; UPPER HALF BLOCK
|
|
1048 (#x8C ?\u049D) ;; CYRILLIC SMALL LETTER KA WITH VERTICAL STROKE
|
|
1049 (#x8D ?\u04E3) ;; CYRILLIC SMALL LETTER I WITH MACRON
|
|
1050 (#x8E ?\u04E9) ;; CYRILLIC SMALL LETTER BARRED O
|
|
1051 (#x8F ?\u04EF) ;; CYRILLIC SMALL LETTER U WITH MACRON
|
|
1052 (#x90 ?\u0492) ;; CYRILLIC CAPITAL LETTER GHE WITH STROKE
|
|
1053 (#x91 ?\u0496) ;; CYRILLIC CAPITAL LETTER ZHE WITH DESCENDER
|
|
1054 (#x92 ?\u049A) ;; CYRILLIC CAPITAL LETTER KA WITH DESCENDER
|
|
1055 (#x93 ?\u049C) ;; CYRILLIC CAPITAL LETTER KA WITH VERTICAL STROKE
|
|
1056 (#x94 ?\u04A2) ;; CYRILLIC CAPITAL LETTER EN WITH DESCENDER
|
|
1057 (#x95 ?\u04AE) ;; CYRILLIC CAPITAL LETTER STRAIGHT U
|
|
1058 (#x96 ?\u04B0) ;; CYRILLIC CAPITAL LETTER STRAIGHT U WITH STROKE
|
|
1059 (#x97 ?\u04B2) ;; CYRILLIC CAPITAL LETTER HA WITH DESCENDER
|
|
1060 (#x98 ?\u04B6) ;; CYRILLIC CAPITAL LETTER CHE WITH DESCENDER
|
|
1061 (#x99 ?\u04B8) ;; CYRILLIC CAPITAL LETTER CHE WITH VERTICAL STROKE
|
|
1062 (#x9A ?\u04BA) ;; CYRILLIC CAPITAL LETTER SHHA
|
|
1063 (#x9B ?\u2321) ;; BOTTOM HALF INTEGRAL
|
|
1064 (#x9C ?\u04D8) ;; CYRILLIC CAPITAL LETTER SCHWA
|
|
1065 (#x9D ?\u04E2) ;; CYRILLIC CAPITAL LETTER I WITH MACRON
|
|
1066 (#x9E ?\u04E8) ;; CYRILLIC CAPITAL LETTER BARRED O
|
|
1067 (#x9F ?\u04EE) ;; CYRILLIC CAPITAL LETTER U WITH MACRON
|
|
1068 (#xA0 ?\u00A0) ;; NO-BREAK SPACE
|
|
1069 (#xA1 ?\u0452) ;; CYRILLIC SMALL LETTER DJE
|
|
1070 (#xA2 ?\u0453) ;; CYRILLIC SMALL LETTER GJE
|
|
1071 (#xA3 ?\u0451) ;; CYRILLIC SMALL LETTER IO
|
|
1072 (#xA4 ?\u0454) ;; CYRILLIC SMALL LETTER UKRAINIAN IE
|
|
1073 (#xA5 ?\u0455) ;; CYRILLIC SMALL LETTER DZE
|
|
1074 (#xA6 ?\u0456) ;; CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
1075 (#xA7 ?\u0457) ;; CYRILLIC SMALL LETTER YI
|
|
1076 (#xA8 ?\u0458) ;; CYRILLIC SMALL LETTER JE
|
|
1077 (#xA9 ?\u0459) ;; CYRILLIC SMALL LETTER LJE
|
|
1078 (#xAA ?\u045A) ;; CYRILLIC SMALL LETTER NJE
|
|
1079 (#xAB ?\u045B) ;; CYRILLIC SMALL LETTER TSHE
|
|
1080 (#xAC ?\u045C) ;; CYRILLIC SMALL LETTER KJE
|
|
1081 (#xAD ?\u0491) ;; CYRILLIC SMALL LETTER GHE WITH UPTURN
|
|
1082 (#xAE ?\u045E) ;; CYRILLIC SMALL LETTER SHORT U
|
|
1083 (#xAF ?\u045F) ;; CYRILLIC SMALL LETTER DZHE
|
|
1084 (#xB0 ?\u2116) ;; NUMERO SIGN
|
|
1085 (#xB1 ?\u0402) ;; CYRILLIC CAPITAL LETTER DJE
|
|
1086 (#xB2 ?\u0403) ;; CYRILLIC CAPITAL LETTER GJE
|
|
1087 (#xB3 ?\u0401) ;; CYRILLIC CAPITAL LETTER IO
|
|
1088 (#xB4 ?\u0404) ;; CYRILLIC CAPITAL LETTER UKRAINIAN IE
|
|
1089 (#xB5 ?\u0405) ;; CYRILLIC CAPITAL LETTER DZE
|
|
1090 (#xB6 ?\u0406) ;; CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
1091 (#xB7 ?\u0407) ;; CYRILLIC CAPITAL LETTER YI
|
|
1092 (#xB8 ?\u0408) ;; CYRILLIC CAPITAL LETTER JE
|
|
1093 (#xB9 ?\u0409) ;; CYRILLIC CAPITAL LETTER LJE
|
|
1094 (#xBA ?\u040A) ;; CYRILLIC CAPITAL LETTER NJE
|
|
1095 (#xBB ?\u040B) ;; CYRILLIC CAPITAL LETTER TSHE
|
|
1096 (#xBC ?\u040C) ;; CYRILLIC CAPITAL LETTER KJE
|
|
1097 (#xBD ?\u0490) ;; CYRILLIC CAPITAL LETTER GHE WITH UPTURN
|
|
1098 (#xBE ?\u040E) ;; CYRILLIC CAPITAL LETTER SHORT U
|
|
1099 (#xBF ?\u040F) ;; CYRILLIC CAPITAL LETTER DZHE
|
|
1100 (#xC0 ?\u044E) ;; CYRILLIC SMALL LETTER YU
|
|
1101 (#xC1 ?\u0430) ;; CYRILLIC SMALL LETTER A
|
|
1102 (#xC2 ?\u0431) ;; CYRILLIC SMALL LETTER BE
|
|
1103 (#xC3 ?\u0446) ;; CYRILLIC SMALL LETTER TSE
|
|
1104 (#xC4 ?\u0434) ;; CYRILLIC SMALL LETTER DE
|
|
1105 (#xC5 ?\u0435) ;; CYRILLIC SMALL LETTER IE
|
|
1106 (#xC6 ?\u0444) ;; CYRILLIC SMALL LETTER EF
|
|
1107 (#xC7 ?\u0433) ;; CYRILLIC SMALL LETTER GHE
|
|
1108 (#xC8 ?\u0445) ;; CYRILLIC SMALL LETTER HA
|
|
1109 (#xC9 ?\u0438) ;; CYRILLIC SMALL LETTER I
|
|
1110 (#xCA ?\u0439) ;; CYRILLIC SMALL LETTER SHORT I
|
|
1111 (#xCB ?\u043A) ;; CYRILLIC SMALL LETTER KA
|
|
1112 (#xCC ?\u043B) ;; CYRILLIC SMALL LETTER EL
|
|
1113 (#xCD ?\u043C) ;; CYRILLIC SMALL LETTER EM
|
|
1114 (#xCE ?\u043D) ;; CYRILLIC SMALL LETTER EN
|
|
1115 (#xCF ?\u043E) ;; CYRILLIC SMALL LETTER O
|
|
1116 (#xD0 ?\u043F) ;; CYRILLIC SMALL LETTER PE
|
|
1117 (#xD1 ?\u044F) ;; CYRILLIC SMALL LETTER YA
|
|
1118 (#xD2 ?\u0440) ;; CYRILLIC SMALL LETTER ER
|
|
1119 (#xD3 ?\u0441) ;; CYRILLIC SMALL LETTER ES
|
|
1120 (#xD4 ?\u0442) ;; CYRILLIC SMALL LETTER TE
|
|
1121 (#xD5 ?\u0443) ;; CYRILLIC SMALL LETTER U
|
|
1122 (#xD6 ?\u0436) ;; CYRILLIC SMALL LETTER ZHE
|
|
1123 (#xD7 ?\u0432) ;; CYRILLIC SMALL LETTER VE
|
|
1124 (#xD8 ?\u044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
|
|
1125 (#xD9 ?\u044B) ;; CYRILLIC SMALL LETTER YERU
|
|
1126 (#xDA ?\u0437) ;; CYRILLIC SMALL LETTER ZE
|
|
1127 (#xDB ?\u0448) ;; CYRILLIC SMALL LETTER SHA
|
|
1128 (#xDC ?\u044D) ;; CYRILLIC SMALL LETTER E
|
|
1129 (#xDD ?\u0449) ;; CYRILLIC SMALL LETTER SHCHA
|
|
1130 (#xDE ?\u0447) ;; CYRILLIC SMALL LETTER CHE
|
|
1131 (#xDF ?\u044A) ;; CYRILLIC SMALL LETTER HARD SIGN
|
|
1132 (#xE0 ?\u042E) ;; CYRILLIC CAPITAL LETTER YU
|
|
1133 (#xE1 ?\u0410) ;; CYRILLIC CAPITAL LETTER A
|
|
1134 (#xE2 ?\u0411) ;; CYRILLIC CAPITAL LETTER BE
|
|
1135 (#xE3 ?\u0426) ;; CYRILLIC CAPITAL LETTER TSE
|
|
1136 (#xE4 ?\u0414) ;; CYRILLIC CAPITAL LETTER DE
|
|
1137 (#xE5 ?\u0415) ;; CYRILLIC CAPITAL LETTER IE
|
|
1138 (#xE6 ?\u0424) ;; CYRILLIC CAPITAL LETTER EF
|
|
1139 (#xE7 ?\u0413) ;; CYRILLIC CAPITAL LETTER GHE
|
|
1140 (#xE8 ?\u0425) ;; CYRILLIC CAPITAL LETTER HA
|
|
1141 (#xE9 ?\u0418) ;; CYRILLIC CAPITAL LETTER I
|
|
1142 (#xEA ?\u0419) ;; CYRILLIC CAPITAL LETTER SHORT I
|
|
1143 (#xEB ?\u041A) ;; CYRILLIC CAPITAL LETTER KA
|
|
1144 (#xEC ?\u041B) ;; CYRILLIC CAPITAL LETTER EL
|
|
1145 (#xED ?\u041C) ;; CYRILLIC CAPITAL LETTER EM
|
|
1146 (#xEE ?\u041D) ;; CYRILLIC CAPITAL LETTER EN
|
|
1147 (#xEF ?\u041E) ;; CYRILLIC CAPITAL LETTER O
|
|
1148 (#xF0 ?\u041F) ;; CYRILLIC CAPITAL LETTER PE
|
|
1149 (#xF1 ?\u042F) ;; CYRILLIC CAPITAL LETTER YA
|
|
1150 (#xF2 ?\u0420) ;; CYRILLIC CAPITAL LETTER ER
|
|
1151 (#xF3 ?\u0421) ;; CYRILLIC CAPITAL LETTER ES
|
|
1152 (#xF4 ?\u0422) ;; CYRILLIC CAPITAL LETTER TE
|
|
1153 (#xF5 ?\u0423) ;; CYRILLIC CAPITAL LETTER U
|
|
1154 (#xF6 ?\u0416) ;; CYRILLIC CAPITAL LETTER ZHE
|
|
1155 (#xF7 ?\u0412) ;; CYRILLIC CAPITAL LETTER VE
|
|
1156 (#xF8 ?\u042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
|
|
1157 (#xF9 ?\u042B) ;; CYRILLIC CAPITAL LETTER YERU
|
|
1158 (#xFA ?\u0417) ;; CYRILLIC CAPITAL LETTER ZE
|
|
1159 (#xFB ?\u0428) ;; CYRILLIC CAPITAL LETTER SHA
|
|
1160 (#xFC ?\u042D) ;; CYRILLIC CAPITAL LETTER E
|
|
1161 (#xFD ?\u0429) ;; CYRILLIC CAPITAL LETTER SHCHA
|
|
1162 (#xFE ?\u0427) ;; CYRILLIC CAPITAL LETTER CHE
|
|
1163 (#xFF ?\u042A));; CYRILLIC CAPITAL LETTER HARD SIGN
|
|
1164 "KOI-8 for the Caucasus."
|
|
1165 '(documentation
|
|
1166 "Note that this does not support old Russian orthography;
|
|
1167 for that, see koi8-o. "))
|
|
1168
|
|
1169 (loop
|
|
1170 for (upper lower)
|
|
1171 in '((?\u04E9 ?\u04E8) ;; BARRED O
|
|
1172 (?\u04B9 ?\u04B8) ;; CHE WITH VERTICAL STROKE
|
|
1173 (?\u0452 ?\u0402) ;; DJE
|
|
1174 (?\u0455 ?\u0405) ;; DZE
|
|
1175 (?\u04A3 ?\u04A2) ;; EN WITH DESCENDER
|
|
1176 (?\u049D ?\u049C) ;; KA WITH VERTICAL STROKE
|
|
1177 (?\u04BB ?\u04BA) ;; SHHA
|
|
1178 (?\u04AF ?\u04AE) ;; STRAIGHT U
|
|
1179 (?\u04B1 ?\u04B0) ;; STRAIGHT U WITH STROKE
|
|
1180 (?\u0497 ?\u0496)) ;; ZHE WITH DESCENDER
|
|
1181 with case-table = (standard-case-table)
|
|
1182 do
|
|
1183 (put-case-table-pair upper lower case-table))
|
|
1184
|
|
1185 ;; Archaic Russian support.
|
|
1186 (make-8-bit-coding-system
|
|
1187 'koi8-o
|
|
1188 '((#x80 ?\u0402) ;; CYRILLIC CAPITAL LETTER DJE
|
|
1189 (#x81 ?\u0403) ;; CYRILLIC CAPITAL LETTER GJE
|
|
1190 (#x82 ?\u00B8) ;; CEDILLA
|
|
1191 (#x83 ?\u0453) ;; CYRILLIC SMALL LETTER GJE
|
|
1192 (#x84 ?\u201E) ;; DOUBLE LOW-9 QUOTATION MARK
|
|
1193 (#x85 ?\u2026) ;; HORIZONTAL ELLIPSIS
|
|
1194 (#x86 ?\u2020) ;; DAGGER
|
|
1195 (#x87 ?\u00A7) ;; SECTION SIGN
|
|
1196 (#x88 ?\u20AC) ;; EURO SIGN
|
|
1197 (#x89 ?\u00A8) ;; DIAERESIS
|
|
1198 (#x8A ?\u0409) ;; CYRILLIC CAPITAL LETTER LJE
|
|
1199 (#x8B ?\u2039) ;; SINGLE LEFT-POINTING ANGLE QUOTATION MARK
|
|
1200 (#x8C ?\u040A) ;; CYRILLIC CAPITAL LETTER NJE
|
|
1201 (#x8D ?\u040C) ;; CYRILLIC CAPITAL LETTER KJE
|
|
1202 (#x8E ?\u040B) ;; CYRILLIC CAPITAL LETTER TSHE
|
|
1203 (#x8F ?\u040F) ;; CYRILLIC CAPITAL LETTER DZHE
|
|
1204 (#x90 ?\u0452) ;; CYRILLIC SMALL LETTER DJE
|
|
1205 (#x91 ?\u2018) ;; LEFT SINGLE QUOTATION MARK
|
|
1206 (#x92 ?\u2019) ;; RIGHT SINGLE QUOTATION MARK
|
|
1207 (#x93 ?\u201C) ;; LEFT DOUBLE QUOTATION MARK
|
|
1208 (#x94 ?\u201D) ;; RIGHT DOUBLE QUOTATION MARK
|
|
1209 (#x95 ?\u2022) ;; BULLET
|
|
1210 (#x96 ?\u2013) ;; EN DASH
|
|
1211 (#x97 ?\u2014) ;; EM DASH
|
|
1212 (#x98 ?\u00A3) ;; POUND SIGN
|
|
1213 (#x99 ?\u00B7) ;; MIDDLE DOT
|
|
1214 (#x9A ?\u0459) ;; CYRILLIC SMALL LETTER LJE
|
|
1215 (#x9B ?\u203A) ;; SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
|
|
1216 (#x9C ?\u045A) ;; CYRILLIC SMALL LETTER NJE
|
|
1217 (#x9D ?\u045C) ;; CYRILLIC SMALL LETTER KJE
|
|
1218 (#x9E ?\u045B) ;; CYRILLIC SMALL LETTER TSHE
|
|
1219 (#x9F ?\u045F) ;; CYRILLIC SMALL LETTER DZHE
|
|
1220 (#xA0 ?\u00A0) ;; NO-BREAK SPACE
|
|
1221 (#xA1 ?\u0475) ;; CYRILLIC SMALL LETTER IZHITSA
|
|
1222 (#xA2 ?\u0463) ;; CYRILLIC SMALL LETTER YAT
|
|
1223 (#xA3 ?\u0451) ;; CYRILLIC SMALL LETTER IO
|
|
1224 (#xA4 ?\u0454) ;; CYRILLIC SMALL LETTER UKRAINIAN IE
|
|
1225 (#xA5 ?\u0455) ;; CYRILLIC SMALL LETTER DZE
|
|
1226 (#xA6 ?\u0456) ;; CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
1227 (#xA7 ?\u0457) ;; CYRILLIC SMALL LETTER YI
|
|
1228 (#xA8 ?\u0458) ;; CYRILLIC SMALL LETTER JE
|
|
1229 (#xA9 ?\u00AE) ;; REGISTERED SIGN
|
|
1230 (#xAA ?\u2122) ;; TRADE MARK SIGN
|
|
1231 (#xAB ?\u00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
|
|
1232 (#xAC ?\u0473) ;; CYRILLIC SMALL LETTER FITA
|
|
1233 (#xAD ?\u0491) ;; CYRILLIC SMALL LETTER GHE WITH UPTURN
|
|
1234 (#xAE ?\u045E) ;; CYRILLIC SMALL LETTER SHORT U
|
|
1235 (#xAF ?\u00B4) ;; ACUTE ACCENT
|
|
1236 (#xB0 ?\u00B0) ;; DEGREE SIGN
|
|
1237 (#xB1 ?\u0474) ;; CYRILLIC CAPITAL LETTER IZHITSA
|
|
1238 (#xB2 ?\u0462) ;; CYRILLIC CAPITAL LETTER YAT
|
|
1239 (#xB3 ?\u0401) ;; CYRILLIC CAPITAL LETTER IO
|
|
1240 (#xB4 ?\u0404) ;; CYRILLIC CAPITAL LETTER UKRAINIAN IE
|
|
1241 (#xB5 ?\u0405) ;; CYRILLIC CAPITAL LETTER DZE
|
|
1242 (#xB6 ?\u0406) ;; CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
|
|
1243 (#xB7 ?\u0407) ;; CYRILLIC CAPITAL LETTER YI
|
|
1244 (#xB8 ?\u0408) ;; CYRILLIC CAPITAL LETTER JE
|
|
1245 (#xB9 ?\u2116) ;; NUMERO SIGN
|
|
1246 (#xBA ?\u00A2) ;; CENT SIGN
|
|
1247 (#xBB ?\u00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
|
|
1248 (#xBC ?\u0472) ;; CYRILLIC CAPITAL LETTER FITA
|
|
1249 (#xBD ?\u0490) ;; CYRILLIC CAPITAL LETTER GHE WITH UPTURN
|
|
1250 (#xBE ?\u040E) ;; CYRILLIC CAPITAL LETTER SHORT U
|
|
1251 (#xBF ?\u00A9) ;; COPYRIGHT SIGN
|
|
1252 (#xC0 ?\u044E) ;; CYRILLIC SMALL LETTER YU
|
|
1253 (#xC1 ?\u0430) ;; CYRILLIC SMALL LETTER A
|
|
1254 (#xC2 ?\u0431) ;; CYRILLIC SMALL LETTER BE
|
|
1255 (#xC3 ?\u0446) ;; CYRILLIC SMALL LETTER TSE
|
|
1256 (#xC4 ?\u0434) ;; CYRILLIC SMALL LETTER DE
|
|
1257 (#xC5 ?\u0435) ;; CYRILLIC SMALL LETTER IE
|
|
1258 (#xC6 ?\u0444) ;; CYRILLIC SMALL LETTER EF
|
|
1259 (#xC7 ?\u0433) ;; CYRILLIC SMALL LETTER GHE
|
|
1260 (#xC8 ?\u0445) ;; CYRILLIC SMALL LETTER HA
|
|
1261 (#xC9 ?\u0438) ;; CYRILLIC SMALL LETTER I
|
|
1262 (#xCA ?\u0439) ;; CYRILLIC SMALL LETTER SHORT I
|
|
1263 (#xCB ?\u043A) ;; CYRILLIC SMALL LETTER KA
|
|
1264 (#xCC ?\u043B) ;; CYRILLIC SMALL LETTER EL
|
|
1265 (#xCD ?\u043C) ;; CYRILLIC SMALL LETTER EM
|
|
1266 (#xCE ?\u043D) ;; CYRILLIC SMALL LETTER EN
|
|
1267 (#xCF ?\u043E) ;; CYRILLIC SMALL LETTER O
|
|
1268 (#xD0 ?\u043F) ;; CYRILLIC SMALL LETTER PE
|
|
1269 (#xD1 ?\u044F) ;; CYRILLIC SMALL LETTER YA
|
|
1270 (#xD2 ?\u0440) ;; CYRILLIC SMALL LETTER ER
|
|
1271 (#xD3 ?\u0441) ;; CYRILLIC SMALL LETTER ES
|
|
1272 (#xD4 ?\u0442) ;; CYRILLIC SMALL LETTER TE
|
|
1273 (#xD5 ?\u0443) ;; CYRILLIC SMALL LETTER U
|
|
1274 (#xD6 ?\u0436) ;; CYRILLIC SMALL LETTER ZHE
|
|
1275 (#xD7 ?\u0432) ;; CYRILLIC SMALL LETTER VE
|
|
1276 (#xD8 ?\u044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
|
|
1277 (#xD9 ?\u044B) ;; CYRILLIC SMALL LETTER YERU
|
|
1278 (#xDA ?\u0437) ;; CYRILLIC SMALL LETTER ZE
|
|
1279 (#xDB ?\u0448) ;; CYRILLIC SMALL LETTER SHA
|
|
1280 (#xDC ?\u044D) ;; CYRILLIC SMALL LETTER E
|
|
1281 (#xDD ?\u0449) ;; CYRILLIC SMALL LETTER SHCHA
|
|
1282 (#xDE ?\u0447) ;; CYRILLIC SMALL LETTER CHE
|
|
1283 (#xDF ?\u044A) ;; CYRILLIC SMALL LETTER HARD SIGN
|
|
1284 (#xE0 ?\u042E) ;; CYRILLIC CAPITAL LETTER YU
|
|
1285 (#xE1 ?\u0410) ;; CYRILLIC CAPITAL LETTER A
|
|
1286 (#xE2 ?\u0411) ;; CYRILLIC CAPITAL LETTER BE
|
|
1287 (#xE3 ?\u0426) ;; CYRILLIC CAPITAL LETTER TSE
|
|
1288 (#xE4 ?\u0414) ;; CYRILLIC CAPITAL LETTER DE
|
|
1289 (#xE5 ?\u0415) ;; CYRILLIC CAPITAL LETTER IE
|
|
1290 (#xE6 ?\u0424) ;; CYRILLIC CAPITAL LETTER EF
|
|
1291 (#xE7 ?\u0413) ;; CYRILLIC CAPITAL LETTER GHE
|
|
1292 (#xE8 ?\u0425) ;; CYRILLIC CAPITAL LETTER HA
|
|
1293 (#xE9 ?\u0418) ;; CYRILLIC CAPITAL LETTER I
|
|
1294 (#xEA ?\u0419) ;; CYRILLIC CAPITAL LETTER SHORT I
|
|
1295 (#xEB ?\u041A) ;; CYRILLIC CAPITAL LETTER KA
|
|
1296 (#xEC ?\u041B) ;; CYRILLIC CAPITAL LETTER EL
|
|
1297 (#xED ?\u041C) ;; CYRILLIC CAPITAL LETTER EM
|
|
1298 (#xEE ?\u041D) ;; CYRILLIC CAPITAL LETTER EN
|
|
1299 (#xEF ?\u041E) ;; CYRILLIC CAPITAL LETTER O
|
|
1300 (#xF0 ?\u041F) ;; CYRILLIC CAPITAL LETTER PE
|
|
1301 (#xF1 ?\u042F) ;; CYRILLIC CAPITAL LETTER YA
|
|
1302 (#xF2 ?\u0420) ;; CYRILLIC CAPITAL LETTER ER
|
|
1303 (#xF3 ?\u0421) ;; CYRILLIC CAPITAL LETTER ES
|
|
1304 (#xF4 ?\u0422) ;; CYRILLIC CAPITAL LETTER TE
|
|
1305 (#xF5 ?\u0423) ;; CYRILLIC CAPITAL LETTER U
|
|
1306 (#xF6 ?\u0416) ;; CYRILLIC CAPITAL LETTER ZHE
|
|
1307 (#xF7 ?\u0412) ;; CYRILLIC CAPITAL LETTER VE
|
|
1308 (#xF8 ?\u042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
|
|
1309 (#xF9 ?\u042B) ;; CYRILLIC CAPITAL LETTER YERU
|
|
1310 (#xFA ?\u0417) ;; CYRILLIC CAPITAL LETTER ZE
|
|
1311 (#xFB ?\u0428) ;; CYRILLIC CAPITAL LETTER SHA
|
|
1312 (#xFC ?\u042D) ;; CYRILLIC CAPITAL LETTER E
|
|
1313 (#xFD ?\u0429) ;; CYRILLIC CAPITAL LETTER SHCHA
|
|
1314 (#xFE ?\u0427) ;; CYRILLIC CAPITAL LETTER CHE
|
|
1315 (#xFF ?\u042A));; CYRILLIC CAPITAL LETTER HARD SIGN
|
|
1316 "KOI-8 for old-orthography Russian; also known as KOI-C."
|
|
1317 '(mnemonic ",L:>(B"
|
|
1318 documentation
|
|
1319 "KOI-8 for old-orthography Russian; also known as KOI-C.
|
|
1320
|
|
1321 This is mostly compatible with KOI8-R in the alphabetic characters, and
|
|
1322 provides ,L&v(B, %GѲѳ%@, %GѢѣ%@, and %GѴѵ%@ instead of some of the box-drawing characters. "))
|
|
1323
|
|
1324 (loop
|
|
1325 for (upper lower)
|
|
1326 in '((?\u0472 ?\u0473) ;; FITA
|
|
1327 (?\u0474 ?\u0475) ;; IZHITSA
|
|
1328 (?\u0408 ?\u0458) ;; JE
|
|
1329 (?\u0462 ?\u0463)) ;; YAT
|
|
1330 with case-table = (standard-case-table)
|
|
1331 do
|
|
1332 (put-case-table-pair upper lower case-table))
|
|
1333
|
|
1334 (provide 'cyrillic)
|
|
1335
|
4090
|
1336 ;;; cyrillic.el ends here
|