?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
*** empty log message ***
[emacs.git] / lisp / international / ucs-tables.el
blob7aa05ca799f338234c24f93b60b6724dca9aa173
1 ;;; ucs-tables.el --- translation to, from and via Unicode -*- coding: iso-2022-7bit -*-
2
3 ;; Copyright (C) 2001 Free Software Foundation, Inc.
4
5 ;; Author: Dave Love <fx@gnu.org>
6 ;; Keywords: i18n
7
8 ;; This file is free software; you can redistribute it and/or modify
9 ;; it under the terms of the GNU General Public License as published by
10 ;; the Free Software Foundation; either version 2, or (at your option)
11 ;; any later version.
12
13 ;; This file is distributed in the hope that it will be useful,
14 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
15 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 ;; GNU General Public License for more details.
17
18 ;; You should have received a copy of the GNU General Public License
19 ;; along with GNU Emacs; see the file COPYING. If not, write to
20 ;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21 ;; Boston, MA 02111-1307, USA.
22
23 ;;; Commentary:
24
25 ;; This file provides tables mapping between Unicode numbers and
26 ;; emacs-mule characters from the iso8859 charsets. These are used to
27 ;; construct other mappings between the Mule iso8859 charsets and the
28 ;; emacs-unicode charsets and also a table that unifies iso8859
29 ;; characters using a single charset as far as possible. These tables
30 ;; can be used by latin1-disp.el to display some Unicode characters
31 ;; without a Unicode font and by utf-8.el to unify Latin-N as far as
32 ;; possible into Latin-1 on encoding.
33
34 ;;; Code:
35
36 (defvar ucs-mule-8859-to-ucs-table (make-translation-table)
37 "Translation table from Emacs ISO-8859 characters to Unicode.
38 This maps Emacs characters from the non-Latin-1
39 ...-iso8859-... charsets to their Unicode code points. This is a
40 many-to-one mapping.")
41
42 (defvar ucs-ucs-to-mule-8859-table (make-translation-table)
43 "Translation table from Unicode to Emacs ISO-8859 characters.
44 This maps Unicode code points to corresponding Emacs characters from
45 the ...-iso8859-... charsets. This is made a one-to-one mapping where
46 the same character occurs in more than one set by preferring the Emacs
47 iso-8859-N character with lowest N .")
48
49 (defvar ucs-mule-8859-to-mule-unicode (make-translation-table)
50 "Translation table from Emacs ISO-8859 characters to Mule Unicode.
51 This maps Emacs characters from the non-Latin-1
52 ...-iso8859-... charsets to characters from the
53 mule-unicode-... charsets. This is a many-to-one mapping. The
54 characters translated to are suitable for encoding using the
55 `mule-utf-8' coding system.")
56
57 (defvar ucs-mule-unicode-to-mule-8859 (make-translation-table)
58 "Translation table from Mule Unicode to Emacs ISO-8859 characters.
59 This maps non-Latin-1 Emacs characters from the
60 mule-unicode-... charsets used by the `mule-utf-8' coding system to
61 characters from the ...-iso8859-... charsets. This is made a
62 one-to-one mapping where the same character occurs in more than one
63 set by preferring the Emacs iso-8859-N character with lowest N.")
64
65 (defvar ucs-latin-1-unification-table (make-translation-table)
66 "Translation table from other ISO-8859 characters to Latin-1.
67 This maps Emacs characters from the non-Latin-1
68 ...-iso8859-... charsets to their equivalent Latin-1 characters, when
69 they have an equivalent. E.g. capital A with diaresis is code point
70 0xC4 in both Latin-1 and Latin-2, so this table maps Emacs character
71 0x944 to 0x8c4. This is a many-to-one mapping.")
72
73 (defcustom ucs-preferred-8859-set 'latin-iso8859-1
74 "Preferred charset to use for the `ucs-latin-1-unification-table'
75 target. Only a Latin-N set makes sense. You might want to change
76 this from the default latin-iso8859-1 to match your preferred coding
77 system in a non-Latin-1 environment."
78 :type '(choice (const latin-iso8859-15)
79 (const latin-iso8859-14)
80 (const latin-iso8859-9)
81 (const latin-iso8859-5)
82 (const latin-iso8859-4)
83 (const latin-iso8859-3)
84 (const latin-iso8859-2)
85 (const latin-iso8859-1)))
86
87 ;; There doesn't seem to be a need to make these let bindings into
88 ;; defvars, so we'll let the data get GC'ed.
89 (let ((ucs-8859-2-alist
90 '((?\\e,B \e(B . ?\x00A0) ;; NO-BREAK SPACE
91 (?\\e,B!\e(B . ?\x0104) ;; LATIN CAPITAL LETTER A WITH OGONEK
92 (?\\e,B"\e(B . ?\x02D8) ;; BREVE
93 (?\\e,B#\e(B . ?\x0141) ;; LATIN CAPITAL LETTER L WITH STROKE
94 (?\\e,B$\e(B . ?\x00A4) ;; CURRENCY SIGN
95 (?\\e,B%\e(B . ?\x013D) ;; LATIN CAPITAL LETTER L WITH CARON
96 (?\\e,B&\e(B . ?\x015A) ;; LATIN CAPITAL LETTER S WITH ACUTE
97 (?\\e,B'\e(B . ?\x00A7) ;; SECTION SIGN
98 (?\\e,B(\e(B . ?\x00A8) ;; DIAERESIS
99 (?\\e,B)\e(B . ?\x0160) ;; LATIN CAPITAL LETTER S WITH CARON
100 (?\\e,B*\e(B . ?\x015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
101 (?\\e,B+\e(B . ?\x0164) ;; LATIN CAPITAL LETTER T WITH CARON
102 (?\\e,B,\e(B . ?\x0179) ;; LATIN CAPITAL LETTER Z WITH ACUTE
103 (?\\e,B-\e(B . ?\x00AD) ;; SOFT HYPHEN
104 (?\\e,B.\e(B . ?\x017D) ;; LATIN CAPITAL LETTER Z WITH CARON
105 (?\\e,B/\e(B . ?\x017B) ;; LATIN CAPITAL LETTER Z WITH DOT ABOVE
106 (?\\e,B0\e(B . ?\x00B0) ;; DEGREE SIGN
107 (?\\e,B1\e(B . ?\x0105) ;; LATIN SMALL LETTER A WITH OGONEK
108 (?\\e,B2\e(B . ?\x02DB) ;; OGONEK
109 (?\\e,B3\e(B . ?\x0142) ;; LATIN SMALL LETTER L WITH STROKE
110 (?\\e,B4\e(B . ?\x00B4) ;; ACUTE ACCENT
111 (?\\e,B5\e(B . ?\x013E) ;; LATIN SMALL LETTER L WITH CARON
112 (?\\e,B6\e(B . ?\x015B) ;; LATIN SMALL LETTER S WITH ACUTE
113 (?\\e,B7\e(B . ?\x02C7) ;; CARON
114 (?\\e,B8\e(B . ?\x00B8) ;; CEDILLA
115 (?\\e,B9\e(B . ?\x0161) ;; LATIN SMALL LETTER S WITH CARON
116 (?\\e,B:\e(B . ?\x015F) ;; LATIN SMALL LETTER S WITH CEDILLA
117 (?\\e,B;\e(B . ?\x0165) ;; LATIN SMALL LETTER T WITH CARON
118 (?\\e,B<\e(B . ?\x017A) ;; LATIN SMALL LETTER Z WITH ACUTE
119 (?\\e,B=\e(B . ?\x02DD) ;; DOUBLE ACUTE ACCENT
120 (?\\e,B>\e(B . ?\x017E) ;; LATIN SMALL LETTER Z WITH CARON
121 (?\\e,B?\e(B . ?\x017C) ;; LATIN SMALL LETTER Z WITH DOT ABOVE
122 (?\\e,B@\e(B . ?\x0154) ;; LATIN CAPITAL LETTER R WITH ACUTE
123 (?\\e,BA\e(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
124 (?\\e,BB\e(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
125 (?\\e,BC\e(B . ?\x0102) ;; LATIN CAPITAL LETTER A WITH BREVE
126 (?\\e,BD\e(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
127 (?\\e,BE\e(B . ?\x0139) ;; LATIN CAPITAL LETTER L WITH ACUTE
128 (?\\e,BF\e(B . ?\x0106) ;; LATIN CAPITAL LETTER C WITH ACUTE
129 (?\\e,BG\e(B . ?\x00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
130 (?\\e,BH\e(B . ?\x010C) ;; LATIN CAPITAL LETTER C WITH CARON
131 (?\\e,BI\e(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
132 (?\\e,BJ\e(B . ?\x0118) ;; LATIN CAPITAL LETTER E WITH OGONEK
133 (?\\e,BK\e(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
134 (?\\e,BL\e(B . ?\x011A) ;; LATIN CAPITAL LETTER E WITH CARON
135 (?\\e,BM\e(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
136 (?\\e,BN\e(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
137 (?\\e,BO\e(B . ?\x010E) ;; LATIN CAPITAL LETTER D WITH CARON
138 (?\\e,BP\e(B . ?\x0110) ;; LATIN CAPITAL LETTER D WITH STROKE
139 (?\\e,BQ\e(B . ?\x0143) ;; LATIN CAPITAL LETTER N WITH ACUTE
140 (?\\e,BR\e(B . ?\x0147) ;; LATIN CAPITAL LETTER N WITH CARON
141 (?\\e,BS\e(B . ?\x00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
142 (?\\e,BT\e(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
143 (?\\e,BU\e(B . ?\x0150) ;; LATIN CAPITAL LETTER O WITH DOUBLE ACUTE
144 (?\\e,BV\e(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
145 (?\\e,BW\e(B . ?\x00D7) ;; MULTIPLICATION SIGN
146 (?\\e,BX\e(B . ?\x0158) ;; LATIN CAPITAL LETTER R WITH CARON
147 (?\\e,BY\e(B . ?\x016E) ;; LATIN CAPITAL LETTER U WITH RING ABOVE
148 (?\\e,BZ\e(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
149 (?\\e,B[\e(B . ?\x0170) ;; LATIN CAPITAL LETTER U WITH DOUBLE ACUTE
150 (?\\e,B\\e(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
151 (?\\e,B]\e(B . ?\x00DD) ;; LATIN CAPITAL LETTER Y WITH ACUTE
152 (?\\e,B^\e(B . ?\x0162) ;; LATIN CAPITAL LETTER T WITH CEDILLA
153 (?\\e,B_\e(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
154 (?\\e,B`\e(B . ?\x0155) ;; LATIN SMALL LETTER R WITH ACUTE
155 (?\\e,Ba\e(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
156 (?\\e,Bb\e(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
157 (?\\e,Bc\e(B . ?\x0103) ;; LATIN SMALL LETTER A WITH BREVE
158 (?\\e,Bd\e(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
159 (?\\e,Be\e(B . ?\x013A) ;; LATIN SMALL LETTER L WITH ACUTE
160 (?\\e,Bf\e(B . ?\x0107) ;; LATIN SMALL LETTER C WITH ACUTE
161 (?\\e,Bg\e(B . ?\x00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
162 (?\\e,Bh\e(B . ?\x010D) ;; LATIN SMALL LETTER C WITH CARON
163 (?\\e,Bi\e(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
164 (?\\e,Bj\e(B . ?\x0119) ;; LATIN SMALL LETTER E WITH OGONEK
165 (?\\e,Bk\e(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
166 (?\\e,Bl\e(B . ?\x011B) ;; LATIN SMALL LETTER E WITH CARON
167 (?\\e,Bm\e(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
168 (?\\e,Bn\e(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
169 (?\\e,Bo\e(B . ?\x010F) ;; LATIN SMALL LETTER D WITH CARON
170 (?\\e,Bp\e(B . ?\x0111) ;; LATIN SMALL LETTER D WITH STROKE
171 (?\\e,Bq\e(B . ?\x0144) ;; LATIN SMALL LETTER N WITH ACUTE
172 (?\\e,Br\e(B . ?\x0148) ;; LATIN SMALL LETTER N WITH CARON
173 (?\\e,Bs\e(B . ?\x00F3) ;; LATIN SMALL LETTER O WITH ACUTE
174 (?\\e,Bt\e(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
175 (?\\e,Bu\e(B . ?\x0151) ;; LATIN SMALL LETTER O WITH DOUBLE ACUTE
176 (?\\e,Bv\e(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
177 (?\\e,Bw\e(B . ?\x00F7) ;; DIVISION SIGN
178 (?\\e,Bx\e(B . ?\x0159) ;; LATIN SMALL LETTER R WITH CARON
179 (?\\e,By\e(B . ?\x016F) ;; LATIN SMALL LETTER U WITH RING ABOVE
180 (?\\e,Bz\e(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
181 (?\\e,B{\e(B . ?\x0171) ;; LATIN SMALL LETTER U WITH DOUBLE ACUTE
182 (?\\e,B|\e(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
183 (?\\e,B}\e(B . ?\x00FD) ;; LATIN SMALL LETTER Y WITH ACUTE
184 (?\\e,B~\e(B . ?\x0163) ;; LATIN SMALL LETTER T WITH CEDILLA
185 (?\\e,B\x7f\e(B . ?\x02D9) ;; DOT ABOVE
186 ))
187
188 (ucs-8859-3-alist
189 '((?\\e,C \e(B . ?\x00A0) ;; NO-BREAK SPACE
190 (?\\e,C!\e(B . ?\x0126) ;; LATIN CAPITAL LETTER H WITH STROKE
191 (?\\e,C"\e(B . ?\x02D8) ;; BREVE
192 (?\\e,C#\e(B . ?\x00A3) ;; POUND SIGN
193 (?\\e,C$\e(B . ?\x00A4) ;; CURRENCY SIGN
194 (?\\e,C&\e(B . ?\x0124) ;; LATIN CAPITAL LETTER H WITH CIRCUMFLEX
195 (?\\e,C'\e(B . ?\x00A7) ;; SECTION SIGN
196 (?\\e,C(\e(B . ?\x00A8) ;; DIAERESIS
197 (?\\e,C)\e(B . ?\x0130) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE
198 (?\\e,C*\e(B . ?\x015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
199 (?\\e,C+\e(B . ?\x011E) ;; LATIN CAPITAL LETTER G WITH BREVE
200 (?\\e,C,\e(B . ?\x0134) ;; LATIN CAPITAL LETTER J WITH CIRCUMFLEX
201 (?\\e,C-\e(B . ?\x00AD) ;; SOFT HYPHEN
202 (?\\e,C/\e(B . ?\x017B) ;; LATIN CAPITAL LETTER Z WITH DOT ABOVE
203 (?\\e,C0\e(B . ?\x00B0) ;; DEGREE SIGN
204 (?\\e,C1\e(B . ?\x0127) ;; LATIN SMALL LETTER H WITH STROKE
205 (?\\e,C2\e(B . ?\x00B2) ;; SUPERSCRIPT TWO
206 (?\\e,C3\e(B . ?\x00B3) ;; SUPERSCRIPT THREE
207 (?\\e,C4\e(B . ?\x00B4) ;; ACUTE ACCENT
208 (?\\e,C5\e(B . ?\x00B5) ;; MICRO SIGN
209 (?\\e,C6\e(B . ?\x0125) ;; LATIN SMALL LETTER H WITH CIRCUMFLEX
210 (?\\e,C7\e(B . ?\x00B7) ;; MIDDLE DOT
211 (?\\e,C8\e(B . ?\x00B8) ;; CEDILLA
212 (?\\e,C9\e(B . ?\x0131) ;; LATIN SMALL LETTER DOTLESS I
213 (?\\e,C:\e(B . ?\x015F) ;; LATIN SMALL LETTER S WITH CEDILLA
214 (?\\e,C;\e(B . ?\x011F) ;; LATIN SMALL LETTER G WITH BREVE
215 (?\\e,C<\e(B . ?\x0135) ;; LATIN SMALL LETTER J WITH CIRCUMFLEX
216 (?\\e,C=\e(B . ?\x00BD) ;; VULGAR FRACTION ONE HALF
217 (?\\e,C?\e(B . ?\x017C) ;; LATIN SMALL LETTER Z WITH DOT ABOVE
218 (?\\e,C@\e(B . ?\x00C0) ;; LATIN CAPITAL LETTER A WITH GRAVE
219 (?\\e,CA\e(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
220 (?\\e,CB\e(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
221 (?\\e,CD\e(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
222 (?\\e,CE\e(B . ?\x010A) ;; LATIN CAPITAL LETTER C WITH DOT ABOVE
223 (?\\e,CF\e(B . ?\x0108) ;; LATIN CAPITAL LETTER C WITH CIRCUMFLEX
224 (?\\e,CG\e(B . ?\x00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
225 (?\\e,CH\e(B . ?\x00C8) ;; LATIN CAPITAL LETTER E WITH GRAVE
226 (?\\e,CI\e(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
227 (?\\e,CJ\e(B . ?\x00CA) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX
228 (?\\e,CK\e(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
229 (?\\e,CL\e(B . ?\x00CC) ;; LATIN CAPITAL LETTER I WITH GRAVE
230 (?\\e,CM\e(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
231 (?\\e,CN\e(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
232 (?\\e,CO\e(B . ?\x00CF) ;; LATIN CAPITAL LETTER I WITH DIAERESIS
233 (?\\e,CQ\e(B . ?\x00D1) ;; LATIN CAPITAL LETTER N WITH TILDE
234 (?\\e,CR\e(B . ?\x00D2) ;; LATIN CAPITAL LETTER O WITH GRAVE
235 (?\\e,CS\e(B . ?\x00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
236 (?\\e,CT\e(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
237 (?\\e,CU\e(B . ?\x0120) ;; LATIN CAPITAL LETTER G WITH DOT ABOVE
238 (?\\e,CV\e(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
239 (?\\e,CW\e(B . ?\x00D7) ;; MULTIPLICATION SIGN
240 (?\\e,CX\e(B . ?\x011C) ;; LATIN CAPITAL LETTER G WITH CIRCUMFLEX
241 (?\\e,CY\e(B . ?\x00D9) ;; LATIN CAPITAL LETTER U WITH GRAVE
242 (?\\e,CZ\e(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
243 (?\\e,C[\e(B . ?\x00DB) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
244 (?\\e,C\\e(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
245 (?\\e,C]\e(B . ?\x016C) ;; LATIN CAPITAL LETTER U WITH BREVE
246 (?\\e,C^\e(B . ?\x015C) ;; LATIN CAPITAL LETTER S WITH CIRCUMFLEX
247 (?\\e,C_\e(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
248 (?\\e,C`\e(B . ?\x00E0) ;; LATIN SMALL LETTER A WITH GRAVE
249 (?\\e,Ca\e(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
250 (?\\e,Cb\e(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
251 (?\\e,Cd\e(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
252 (?\\e,Ce\e(B . ?\x010B) ;; LATIN SMALL LETTER C WITH DOT ABOVE
253 (?\\e,Cf\e(B . ?\x0109) ;; LATIN SMALL LETTER C WITH CIRCUMFLEX
254 (?\\e,Cg\e(B . ?\x00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
255 (?\\e,Ch\e(B . ?\x00E8) ;; LATIN SMALL LETTER E WITH GRAVE
256 (?\\e,Ci\e(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
257 (?\\e,Cj\e(B . ?\x00EA) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX
258 (?\\e,Ck\e(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
259 (?\\e,Cl\e(B . ?\x00EC) ;; LATIN SMALL LETTER I WITH GRAVE
260 (?\\e,Cm\e(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
261 (?\\e,Cn\e(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
262 (?\\e,Co\e(B . ?\x00EF) ;; LATIN SMALL LETTER I WITH DIAERESIS
263 (?\\e,Cq\e(B . ?\x00F1) ;; LATIN SMALL LETTER N WITH TILDE
264 (?\\e,Cr\e(B . ?\x00F2) ;; LATIN SMALL LETTER O WITH GRAVE
265 (?\\e,Cs\e(B . ?\x00F3) ;; LATIN SMALL LETTER O WITH ACUTE
266 (?\\e,Ct\e(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
267 (?\\e,Cu\e(B . ?\x0121) ;; LATIN SMALL LETTER G WITH DOT ABOVE
268 (?\\e,Cv\e(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
269 (?\\e,Cw\e(B . ?\x00F7) ;; DIVISION SIGN
270 (?\\e,Cx\e(B . ?\x011D) ;; LATIN SMALL LETTER G WITH CIRCUMFLEX
271 (?\\e,Cy\e(B . ?\x00F9) ;; LATIN SMALL LETTER U WITH GRAVE
272 (?\\e,Cz\e(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
273 (?\\e,C{\e(B . ?\x00FB) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
274 (?\\e,C|\e(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
275 (?\\e,C}\e(B . ?\x016D) ;; LATIN SMALL LETTER U WITH BREVE
276 (?\\e,C~\e(B . ?\x015D) ;; LATIN SMALL LETTER S WITH CIRCUMFLEX
277 (?\\e,C\x7f\e(B . ?\x02D9) ;; DOT ABOVE
278 ))
279
280 (ucs-8859-4-alist
281 '((?\\e,D \e(B . ?\x00A0) ;; NO-BREAK SPACE
282 (?\\e,D!\e(B . ?\x0104) ;; LATIN CAPITAL LETTER A WITH OGONEK
283 (?\\e,D"\e(B . ?\x0138) ;; LATIN SMALL LETTER KRA
284 (?\\e,D#\e(B . ?\x0156) ;; LATIN CAPITAL LETTER R WITH CEDILLA
285 (?\\e,D$\e(B . ?\x00A4) ;; CURRENCY SIGN
286 (?\\e,D%\e(B . ?\x0128) ;; LATIN CAPITAL LETTER I WITH TILDE
287 (?\\e,D&\e(B . ?\x013B) ;; LATIN CAPITAL LETTER L WITH CEDILLA
288 (?\\e,D'\e(B . ?\x00A7) ;; SECTION SIGN
289 (?\\e,D(\e(B . ?\x00A8) ;; DIAERESIS
290 (?\\e,D)\e(B . ?\x0160) ;; LATIN CAPITAL LETTER S WITH CARON
291 (?\\e,D*\e(B . ?\x0112) ;; LATIN CAPITAL LETTER E WITH MACRON
292 (?\\e,D+\e(B . ?\x0122) ;; LATIN CAPITAL LETTER G WITH CEDILLA
293 (?\\e,D,\e(B . ?\x0166) ;; LATIN CAPITAL LETTER T WITH STROKE
294 (?\\e,D-\e(B . ?\x00AD) ;; SOFT HYPHEN
295 (?\\e,D.\e(B . ?\x017D) ;; LATIN CAPITAL LETTER Z WITH CARON
296 (?\\e,D/\e(B . ?\x00AF) ;; MACRON
297 (?\\e,D0\e(B . ?\x00B0) ;; DEGREE SIGN
298 (?\\e,D1\e(B . ?\x0105) ;; LATIN SMALL LETTER A WITH OGONEK
299 (?\\e,D2\e(B . ?\x02DB) ;; OGONEK
300 (?\\e,D3\e(B . ?\x0157) ;; LATIN SMALL LETTER R WITH CEDILLA
301 (?\\e,D4\e(B . ?\x00B4) ;; ACUTE ACCENT
302 (?\\e,D5\e(B . ?\x0129) ;; LATIN SMALL LETTER I WITH TILDE
303 (?\\e,D6\e(B . ?\x013C) ;; LATIN SMALL LETTER L WITH CEDILLA
304 (?\\e,D7\e(B . ?\x02C7) ;; CARON
305 (?\\e,D8\e(B . ?\x00B8) ;; CEDILLA
306 (?\\e,D9\e(B . ?\x0161) ;; LATIN SMALL LETTER S WITH CARON
307 (?\\e,D:\e(B . ?\x0113) ;; LATIN SMALL LETTER E WITH MACRON
308 (?\\e,D;\e(B . ?\x0123) ;; LATIN SMALL LETTER G WITH CEDILLA
309 (?\\e,D<\e(B . ?\x0167) ;; LATIN SMALL LETTER T WITH STROKE
310 (?\\e,D=\e(B . ?\x014A) ;; LATIN CAPITAL LETTER ENG
311 (?\\e,D>\e(B . ?\x017E) ;; LATIN SMALL LETTER Z WITH CARON
312 (?\\e,D?\e(B . ?\x014B) ;; LATIN SMALL LETTER ENG
313 (?\\e,D@\e(B . ?\x0100) ;; LATIN CAPITAL LETTER A WITH MACRON
314 (?\\e,DA\e(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
315 (?\\e,DB\e(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
316 (?\\e,DC\e(B . ?\x00C3) ;; LATIN CAPITAL LETTER A WITH TILDE
317 (?\\e,DD\e(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
318 (?\\e,DE\e(B . ?\x00C5) ;; LATIN CAPITAL LETTER A WITH RING ABOVE
319 (?\\e,DF\e(B . ?\x00C6) ;; LATIN CAPITAL LETTER AE
320 (?\\e,DG\e(B . ?\x012E) ;; LATIN CAPITAL LETTER I WITH OGONEK
321 (?\\e,DH\e(B . ?\x010C) ;; LATIN CAPITAL LETTER C WITH CARON
322 (?\\e,DI\e(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
323 (?\\e,DJ\e(B . ?\x0118) ;; LATIN CAPITAL LETTER E WITH OGONEK
324 (?\\e,DK\e(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
325 (?\\e,DL\e(B . ?\x0116) ;; LATIN CAPITAL LETTER E WITH DOT ABOVE
326 (?\\e,DM\e(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
327 (?\\e,DN\e(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
328 (?\\e,DO\e(B . ?\x012A) ;; LATIN CAPITAL LETTER I WITH MACRON
329 (?\\e,DP\e(B . ?\x0110) ;; LATIN CAPITAL LETTER D WITH STROKE
330 (?\\e,DQ\e(B . ?\x0145) ;; LATIN CAPITAL LETTER N WITH CEDILLA
331 (?\\e,DR\e(B . ?\x014C) ;; LATIN CAPITAL LETTER O WITH MACRON
332 (?\\e,DS\e(B . ?\x0136) ;; LATIN CAPITAL LETTER K WITH CEDILLA
333 (?\\e,DT\e(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
334 (?\\e,DU\e(B . ?\x00D5) ;; LATIN CAPITAL LETTER O WITH TILDE
335 (?\\e,DV\e(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
336 (?\\e,DW\e(B . ?\x00D7) ;; MULTIPLICATION SIGN
337 (?\\e,DX\e(B . ?\x00D8) ;; LATIN CAPITAL LETTER O WITH STROKE
338 (?\\e,DY\e(B . ?\x0172) ;; LATIN CAPITAL LETTER U WITH OGONEK
339 (?\\e,DZ\e(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
340 (?\\e,D[\e(B . ?\x00DB) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
341 (?\\e,D\\e(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
342 (?\\e,D]\e(B . ?\x0168) ;; LATIN CAPITAL LETTER U WITH TILDE
343 (?\\e,D^\e(B . ?\x016A) ;; LATIN CAPITAL LETTER U WITH MACRON
344 (?\\e,D_\e(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
345 (?\\e,D`\e(B . ?\x0101) ;; LATIN SMALL LETTER A WITH MACRON
346 (?\\e,Da\e(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
347 (?\\e,Db\e(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
348 (?\\e,Dc\e(B . ?\x00E3) ;; LATIN SMALL LETTER A WITH TILDE
349 (?\\e,Dd\e(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
350 (?\\e,De\e(B . ?\x00E5) ;; LATIN SMALL LETTER A WITH RING ABOVE
351 (?\\e,Df\e(B . ?\x00E6) ;; LATIN SMALL LETTER AE
352 (?\\e,Dg\e(B . ?\x012F) ;; LATIN SMALL LETTER I WITH OGONEK
353 (?\\e,Dh\e(B . ?\x010D) ;; LATIN SMALL LETTER C WITH CARON
354 (?\\e,Di\e(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
355 (?\\e,Dj\e(B . ?\x0119) ;; LATIN SMALL LETTER E WITH OGONEK
356 (?\\e,Dk\e(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
357 (?\\e,Dl\e(B . ?\x0117) ;; LATIN SMALL LETTER E WITH DOT ABOVE
358 (?\\e,Dm\e(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
359 (?\\e,Dn\e(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
360 (?\\e,Do\e(B . ?\x012B) ;; LATIN SMALL LETTER I WITH MACRON
361 (?\\e,Dp\e(B . ?\x0111) ;; LATIN SMALL LETTER D WITH STROKE
362 (?\\e,Dq\e(B . ?\x0146) ;; LATIN SMALL LETTER N WITH CEDILLA
363 (?\\e,Dr\e(B . ?\x014D) ;; LATIN SMALL LETTER O WITH MACRON
364 (?\\e,Ds\e(B . ?\x0137) ;; LATIN SMALL LETTER K WITH CEDILLA
365 (?\\e,Dt\e(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
366 (?\\e,Du\e(B . ?\x00F5) ;; LATIN SMALL LETTER O WITH TILDE
367 (?\\e,Dv\e(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
368 (?\\e,Dw\e(B . ?\x00F7) ;; DIVISION SIGN
369 (?\\e,Dx\e(B . ?\x00F8) ;; LATIN SMALL LETTER O WITH STROKE
370 (?\\e,Dy\e(B . ?\x0173) ;; LATIN SMALL LETTER U WITH OGONEK
371 (?\\e,Dz\e(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
372 (?\\e,D{\e(B . ?\x00FB) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
373 (?\\e,D|\e(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
374 (?\\e,D}\e(B . ?\x0169) ;; LATIN SMALL LETTER U WITH TILDE
375 (?\\e,D~\e(B . ?\x016B) ;; LATIN SMALL LETTER U WITH MACRON
376 (?\\e,D\x7f\e(B . ?\x02D9) ;; DOT ABOVE
377 ))
378
379 (ucs-8859-5-alist
380 '((?\\e,L \e(B . ?\x00A0) ;; NO-BREAK SPACE
381 (?\\e,L!\e(B . ?\x0401) ;; CYRILLIC CAPITAL LETTER IO
382 (?\\e,L"\e(B . ?\x0402) ;; CYRILLIC CAPITAL LETTER DJE
383 (?\\e,L#\e(B . ?\x0403) ;; CYRILLIC CAPITAL LETTER GJE
384 (?\\e,L$\e(B . ?\x0404) ;; CYRILLIC CAPITAL LETTER UKRAINIAN IE
385 (?\\e,L%\e(B . ?\x0405) ;; CYRILLIC CAPITAL LETTER DZE
386 (?\\e,L&\e(B . ?\x0406) ;; CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
387 (?\\e,L'\e(B . ?\x0407) ;; CYRILLIC CAPITAL LETTER YI
388 (?\\e,L(\e(B . ?\x0408) ;; CYRILLIC CAPITAL LETTER JE
389 (?\\e,L)\e(B . ?\x0409) ;; CYRILLIC CAPITAL LETTER LJE
390 (?\\e,L*\e(B . ?\x040A) ;; CYRILLIC CAPITAL LETTER NJE
391 (?\\e,L+\e(B . ?\x040B) ;; CYRILLIC CAPITAL LETTER TSHE
392 (?\\e,L,\e(B . ?\x040C) ;; CYRILLIC CAPITAL LETTER KJE
393 (?\\e,L-\e(B . ?\x00AD) ;; SOFT HYPHEN
394 (?\\e,L.\e(B . ?\x040E) ;; CYRILLIC CAPITAL LETTER SHORT U
395 (?\\e,L/\e(B . ?\x040F) ;; CYRILLIC CAPITAL LETTER DZHE
396 (?\\e,L0\e(B . ?\x0410) ;; CYRILLIC CAPITAL LETTER A
397 (?\\e,L1\e(B . ?\x0411) ;; CYRILLIC CAPITAL LETTER BE
398 (?\\e,L2\e(B . ?\x0412) ;; CYRILLIC CAPITAL LETTER VE
399 (?\\e,L3\e(B . ?\x0413) ;; CYRILLIC CAPITAL LETTER GHE
400 (?\\e,L4\e(B . ?\x0414) ;; CYRILLIC CAPITAL LETTER DE
401 (?\\e,L5\e(B . ?\x0415) ;; CYRILLIC CAPITAL LETTER IE
402 (?\\e,L6\e(B . ?\x0416) ;; CYRILLIC CAPITAL LETTER ZHE
403 (?\\e,L7\e(B . ?\x0417) ;; CYRILLIC CAPITAL LETTER ZE
404 (?\\e,L8\e(B . ?\x0418) ;; CYRILLIC CAPITAL LETTER I
405 (?\\e,L9\e(B . ?\x0419) ;; CYRILLIC CAPITAL LETTER SHORT I
406 (?\\e,L:\e(B . ?\x041A) ;; CYRILLIC CAPITAL LETTER KA
407 (?\\e,L;\e(B . ?\x041B) ;; CYRILLIC CAPITAL LETTER EL
408 (?\\e,L<\e(B . ?\x041C) ;; CYRILLIC CAPITAL LETTER EM
409 (?\\e,L=\e(B . ?\x041D) ;; CYRILLIC CAPITAL LETTER EN
410 (?\\e,L>\e(B . ?\x041E) ;; CYRILLIC CAPITAL LETTER O
411 (?\\e,L?\e(B . ?\x041F) ;; CYRILLIC CAPITAL LETTER PE
412 (?\\e,L@\e(B . ?\x0420) ;; CYRILLIC CAPITAL LETTER ER
413 (?\\e,LA\e(B . ?\x0421) ;; CYRILLIC CAPITAL LETTER ES
414 (?\\e,LB\e(B . ?\x0422) ;; CYRILLIC CAPITAL LETTER TE
415 (?\\e,LC\e(B . ?\x0423) ;; CYRILLIC CAPITAL LETTER U
416 (?\\e,LD\e(B . ?\x0424) ;; CYRILLIC CAPITAL LETTER EF
417 (?\\e,LE\e(B . ?\x0425) ;; CYRILLIC CAPITAL LETTER HA
418 (?\\e,LF\e(B . ?\x0426) ;; CYRILLIC CAPITAL LETTER TSE
419 (?\\e,LG\e(B . ?\x0427) ;; CYRILLIC CAPITAL LETTER CHE
420 (?\\e,LH\e(B . ?\x0428) ;; CYRILLIC CAPITAL LETTER SHA
421 (?\\e,LI\e(B . ?\x0429) ;; CYRILLIC CAPITAL LETTER SHCHA
422 (?\\e,LJ\e(B . ?\x042A) ;; CYRILLIC CAPITAL LETTER HARD SIGN
423 (?\\e,LK\e(B . ?\x042B) ;; CYRILLIC CAPITAL LETTER YERU
424 (?\\e,LL\e(B . ?\x042C) ;; CYRILLIC CAPITAL LETTER SOFT SIGN
425 (?\\e,LM\e(B . ?\x042D) ;; CYRILLIC CAPITAL LETTER E
426 (?\\e,LN\e(B . ?\x042E) ;; CYRILLIC CAPITAL LETTER YU
427 (?\\e,LO\e(B . ?\x042F) ;; CYRILLIC CAPITAL LETTER YA
428 (?\\e,LP\e(B . ?\x0430) ;; CYRILLIC SMALL LETTER A
429 (?\\e,LQ\e(B . ?\x0431) ;; CYRILLIC SMALL LETTER BE
430 (?\\e,LR\e(B . ?\x0432) ;; CYRILLIC SMALL LETTER VE
431 (?\\e,LS\e(B . ?\x0433) ;; CYRILLIC SMALL LETTER GHE
432 (?\\e,LT\e(B . ?\x0434) ;; CYRILLIC SMALL LETTER DE
433 (?\\e,LU\e(B . ?\x0435) ;; CYRILLIC SMALL LETTER IE
434 (?\\e,LV\e(B . ?\x0436) ;; CYRILLIC SMALL LETTER ZHE
435 (?\\e,LW\e(B . ?\x0437) ;; CYRILLIC SMALL LETTER ZE
436 (?\\e,LX\e(B . ?\x0438) ;; CYRILLIC SMALL LETTER I
437 (?\\e,LY\e(B . ?\x0439) ;; CYRILLIC SMALL LETTER SHORT I
438 (?\\e,LZ\e(B . ?\x043A) ;; CYRILLIC SMALL LETTER KA
439 (?\\e,L[\e(B . ?\x043B) ;; CYRILLIC SMALL LETTER EL
440 (?\\e,L\\e(B . ?\x043C) ;; CYRILLIC SMALL LETTER EM
441 (?\\e,L]\e(B . ?\x043D) ;; CYRILLIC SMALL LETTER EN
442 (?\\e,L^\e(B . ?\x043E) ;; CYRILLIC SMALL LETTER O
443 (?\\e,L_\e(B . ?\x043F) ;; CYRILLIC SMALL LETTER PE
444 (?\\e,L`\e(B . ?\x0440) ;; CYRILLIC SMALL LETTER ER
445 (?\\e,La\e(B . ?\x0441) ;; CYRILLIC SMALL LETTER ES
446 (?\\e,Lb\e(B . ?\x0442) ;; CYRILLIC SMALL LETTER TE
447 (?\\e,Lc\e(B . ?\x0443) ;; CYRILLIC SMALL LETTER U
448 (?\\e,Ld\e(B . ?\x0444) ;; CYRILLIC SMALL LETTER EF
449 (?\\e,Le\e(B . ?\x0445) ;; CYRILLIC SMALL LETTER HA
450 (?\\e,Lf\e(B . ?\x0446) ;; CYRILLIC SMALL LETTER TSE
451 (?\\e,Lg\e(B . ?\x0447) ;; CYRILLIC SMALL LETTER CHE
452 (?\\e,Lh\e(B . ?\x0448) ;; CYRILLIC SMALL LETTER SHA
453 (?\\e,Li\e(B . ?\x0449) ;; CYRILLIC SMALL LETTER SHCHA
454 (?\\e,Lj\e(B . ?\x044A) ;; CYRILLIC SMALL LETTER HARD SIGN
455 (?\\e,Lk\e(B . ?\x044B) ;; CYRILLIC SMALL LETTER YERU
456 (?\\e,Ll\e(B . ?\x044C) ;; CYRILLIC SMALL LETTER SOFT SIGN
457 (?\\e,Lm\e(B . ?\x044D) ;; CYRILLIC SMALL LETTER E
458 (?\\e,Ln\e(B . ?\x044E) ;; CYRILLIC SMALL LETTER YU
459 (?\\e,Lo\e(B . ?\x044F) ;; CYRILLIC SMALL LETTER YA
460 (?\\e,Lp\e(B . ?\x2116) ;; NUMERO SIGN
461 (?\\e,Lq\e(B . ?\x0451) ;; CYRILLIC SMALL LETTER IO
462 (?\\e,Lr\e(B . ?\x0452) ;; CYRILLIC SMALL LETTER DJE
463 (?\\e,Ls\e(B . ?\x0453) ;; CYRILLIC SMALL LETTER GJE
464 (?\\e,Lt\e(B . ?\x0454) ;; CYRILLIC SMALL LETTER UKRAINIAN IE
465 (?\\e,Lu\e(B . ?\x0455) ;; CYRILLIC SMALL LETTER DZE
466 (?\\e,Lv\e(B . ?\x0456) ;; CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
467 (?\\e,Lw\e(B . ?\x0457) ;; CYRILLIC SMALL LETTER YI
468 (?\\e,Lx\e(B . ?\x0458) ;; CYRILLIC SMALL LETTER JE
469 (?\\e,Ly\e(B . ?\x0459) ;; CYRILLIC SMALL LETTER LJE
470 (?\\e,Lz\e(B . ?\x045A) ;; CYRILLIC SMALL LETTER NJE
471 (?\\e,L{\e(B . ?\x045B) ;; CYRILLIC SMALL LETTER TSHE
472 (?\\e,L|\e(B . ?\x045C) ;; CYRILLIC SMALL LETTER KJE
473 (?\\e,L}\e(B . ?\x00A7) ;; SECTION SIGN
474 (?\\e,L~\e(B . ?\x045E) ;; CYRILLIC SMALL LETTER SHORT U
475 (?\\e,L\x7f\e(B . ?\x045F) ;; CYRILLIC SMALL LETTER DZHE
476 ))
477
478 ;; Arabic probably isn't so useful in the absence of Arabic
479 ;; language support.
480 (ucs-8859-6-alist
481 '((?\e,G \e(B . ?\x00A0) ;; NO-BREAK SPACE
482 (?\e,G$\e(B . ?\x00A4) ;; CURRENCY SIGN
483 (?\e,G,\e(B . ?\x060C) ;; ARABIC COMMA
484 (?\e,G-\e(B . ?\x00AD) ;; SOFT HYPHEN
485 (?\e,G;\e(B . ?\x061B) ;; ARABIC SEMICOLON
486 (?\e,G?\e(B . ?\x061F) ;; ARABIC QUESTION MARK
487 (?\e,GA\e(B . ?\x0621) ;; ARABIC LETTER HAMZA
488 (?\e,GB\e(B . ?\x0622) ;; ARABIC LETTER ALEF WITH MADDA ABOVE
489 (?\e,GC\e(B . ?\x0623) ;; ARABIC LETTER ALEF WITH HAMZA ABOVE
490 (?\e,GD\e(B . ?\x0624) ;; ARABIC LETTER WAW WITH HAMZA ABOVE
491 (?\e,GE\e(B . ?\x0625) ;; ARABIC LETTER ALEF WITH HAMZA BELOW
492 (?\e,GF\e(B . ?\x0626) ;; ARABIC LETTER YEH WITH HAMZA ABOVE
493 (?\e,GG\e(B . ?\x0627) ;; ARABIC LETTER ALEF
494 (?\e,GH\e(B . ?\x0628) ;; ARABIC LETTER BEH
495 (?\e,GI\e(B . ?\x0629) ;; ARABIC LETTER TEH MARBUTA
496 (?\e,GJ\e(B . ?\x062A) ;; ARABIC LETTER TEH
497 (?\e,GK\e(B . ?\x062B) ;; ARABIC LETTER THEH
498 (?\e,GL\e(B . ?\x062C) ;; ARABIC LETTER JEEM
499 (?\e,GM\e(B . ?\x062D) ;; ARABIC LETTER HAH
500 (?\e,GN\e(B . ?\x062E) ;; ARABIC LETTER KHAH
501 (?\e,GO\e(B . ?\x062F) ;; ARABIC LETTER DAL
502 (?\e,GP\e(B . ?\x0630) ;; ARABIC LETTER THAL
503 (?\e,GQ\e(B . ?\x0631) ;; ARABIC LETTER REH
504 (?\e,GR\e(B . ?\x0632) ;; ARABIC LETTER ZAIN
505 (?\e,GS\e(B . ?\x0633) ;; ARABIC LETTER SEEN
506 (?\e,GT\e(B . ?\x0634) ;; ARABIC LETTER SHEEN
507 (?\e,GU\e(B . ?\x0635) ;; ARABIC LETTER SAD
508 (?\e,GV\e(B . ?\x0636) ;; ARABIC LETTER DAD
509 (?\e,GW\e(B . ?\x0637) ;; ARABIC LETTER TAH
510 (?\e,GX\e(B . ?\x0638) ;; ARABIC LETTER ZAH
511 (?\e,GY\e(B . ?\x0639) ;; ARABIC LETTER AIN
512 (?\e,GZ\e(B . ?\x063A) ;; ARABIC LETTER GHAIN
513 (?\e,G`\e(B . ?\x0640) ;; ARABIC TATWEEL
514 (?\e,Ga\e(B . ?\x0641) ;; ARABIC LETTER FEH
515 (?\e,Gb\e(B . ?\x0642) ;; ARABIC LETTER QAF
516 (?\e,Gc\e(B . ?\x0643) ;; ARABIC LETTER KAF
517 (?\e,Gd\e(B . ?\x0644) ;; ARABIC LETTER LAM
518 (?\e,Ge\e(B . ?\x0645) ;; ARABIC LETTER MEEM
519 (?\e,Gf\e(B . ?\x0646) ;; ARABIC LETTER NOON
520 (?\e,Gg\e(B . ?\x0647) ;; ARABIC LETTER HEH
521 (?\e,Gh\e(B . ?\x0648) ;; ARABIC LETTER WAW
522 (?\e,Gi\e(B . ?\x0649) ;; ARABIC LETTER ALEF MAKSURA
523 (?\e,Gj\e(B . ?\x064A) ;; ARABIC LETTER YEH
524 (?\e,Gk\e(B . ?\x064B) ;; ARABIC FATHATAN
525 (?\e,Gl\e(B . ?\x064C) ;; ARABIC DAMMATAN
526 (?\e,Gm\e(B . ?\x064D) ;; ARABIC KASRATAN
527 (?\e,Gn\e(B . ?\x064E) ;; ARABIC FATHA
528 (?\e,Go\e(B . ?\x064F) ;; ARABIC DAMMA
529 (?\e,Gp\e(B . ?\x0650) ;; ARABIC KASRA
530 (?\e,Gq\e(B . ?\x0651) ;; ARABIC SHADDA
531 (?\e,Gr\e(B . ?\x0652) ;; ARABIC SUKUN
532 ))
533
534 (ucs-8859-7-alist
535 '((?\\e,F \e(B . ?\x00A0) ;; NO-BREAK SPACE
536 (?\\e,F!\e(B . ?\x2018) ;; LEFT SINGLE QUOTATION MARK
537 (?\\e,F"\e(B . ?\x2019) ;; RIGHT SINGLE QUOTATION MARK
538 (?\\e,F#\e(B . ?\x00A3) ;; POUND SIGN
539 (?\\e,F&\e(B . ?\x00A6) ;; BROKEN BAR
540 (?\\e,F'\e(B . ?\x00A7) ;; SECTION SIGN
541 (?\\e,F(\e(B . ?\x00A8) ;; DIAERESIS
542 (?\\e,F)\e(B . ?\x00A9) ;; COPYRIGHT SIGN
543 (?\\e,F+\e(B . ?\x00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
544 (?\\e,F,\e(B . ?\x00AC) ;; NOT SIGN
545 (?\\e,F-\e(B . ?\x00AD) ;; SOFT HYPHEN
546 (?\\e,F/\e(B . ?\x2015) ;; HORIZONTAL BAR
547 (?\\e,F0\e(B . ?\x00B0) ;; DEGREE SIGN
548 (?\\e,F1\e(B . ?\x00B1) ;; PLUS-MINUS SIGN
549 (?\\e,F2\e(B . ?\x00B2) ;; SUPERSCRIPT TWO
550 (?\\e,F3\e(B . ?\x00B3) ;; SUPERSCRIPT THREE
551 (?\\e,F4\e(B . ?\x0384) ;; GREEK TONOS
552 (?\\e,F5\e(B . ?\x0385) ;; GREEK DIALYTIKA TONOS
553 (?\\e,F6\e(B . ?\x0386) ;; GREEK CAPITAL LETTER ALPHA WITH TONOS
554 (?\\e,F7\e(B . ?\x00B7) ;; MIDDLE DOT
555 (?\\e,F8\e(B . ?\x0388) ;; GREEK CAPITAL LETTER EPSILON WITH TONOS
556 (?\\e,F9\e(B . ?\x0389) ;; GREEK CAPITAL LETTER ETA WITH TONOS
557 (?\\e,F:\e(B . ?\x038A) ;; GREEK CAPITAL LETTER IOTA WITH TONOS
558 (?\\e,F;\e(B . ?\x00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
559 (?\\e,F<\e(B . ?\x038C) ;; GREEK CAPITAL LETTER OMICRON WITH TONOS
560 (?\\e,F=\e(B . ?\x00BD) ;; VULGAR FRACTION ONE HALF
561 (?\\e,F>\e(B . ?\x038E) ;; GREEK CAPITAL LETTER UPSILON WITH TONOS
562 (?\\e,F?\e(B . ?\x038F) ;; GREEK CAPITAL LETTER OMEGA WITH TONOS
563 (?\\e,F@\e(B . ?\x0390) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS
564 (?\\e,FA\e(B . ?\x0391) ;; GREEK CAPITAL LETTER ALPHA
565 (?\\e,FB\e(B . ?\x0392) ;; GREEK CAPITAL LETTER BETA
566 (?\\e,FC\e(B . ?\x0393) ;; GREEK CAPITAL LETTER GAMMA
567 (?\\e,FD\e(B . ?\x0394) ;; GREEK CAPITAL LETTER DELTA
568 (?\\e,FE\e(B . ?\x0395) ;; GREEK CAPITAL LETTER EPSILON
569 (?\\e,FF\e(B . ?\x0396) ;; GREEK CAPITAL LETTER ZETA
570 (?\\e,FG\e(B . ?\x0397) ;; GREEK CAPITAL LETTER ETA
571 (?\\e,FH\e(B . ?\x0398) ;; GREEK CAPITAL LETTER THETA
572 (?\\e,FI\e(B . ?\x0399) ;; GREEK CAPITAL LETTER IOTA
573 (?\\e,FJ\e(B . ?\x039A) ;; GREEK CAPITAL LETTER KAPPA
574 (?\\e,FK\e(B . ?\x039B) ;; GREEK CAPITAL LETTER LAMDA
575 (?\\e,FL\e(B . ?\x039C) ;; GREEK CAPITAL LETTER MU
576 (?\\e,FM\e(B . ?\x039D) ;; GREEK CAPITAL LETTER NU
577 (?\\e,FN\e(B . ?\x039E) ;; GREEK CAPITAL LETTER XI
578 (?\\e,FO\e(B . ?\x039F) ;; GREEK CAPITAL LETTER OMICRON
579 (?\\e,FP\e(B . ?\x03A0) ;; GREEK CAPITAL LETTER PI
580 (?\\e,FQ\e(B . ?\x03A1) ;; GREEK CAPITAL LETTER RHO
581 (?\\e,FS\e(B . ?\x03A3) ;; GREEK CAPITAL LETTER SIGMA
582 (?\\e,FT\e(B . ?\x03A4) ;; GREEK CAPITAL LETTER TAU
583 (?\\e,FU\e(B . ?\x03A5) ;; GREEK CAPITAL LETTER UPSILON
584 (?\\e,FV\e(B . ?\x03A6) ;; GREEK CAPITAL LETTER PHI
585 (?\\e,FW\e(B . ?\x03A7) ;; GREEK CAPITAL LETTER CHI
586 (?\\e,FX\e(B . ?\x03A8) ;; GREEK CAPITAL LETTER PSI
587 (?\\e,FY\e(B . ?\x03A9) ;; GREEK CAPITAL LETTER OMEGA
588 (?\\e,FZ\e(B . ?\x03AA) ;; GREEK CAPITAL LETTER IOTA WITH DIALYTIKA
589 (?\\e,F[\e(B . ?\x03AB) ;; GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA
590 (?\\e,F\\e(B . ?\x03AC) ;; GREEK SMALL LETTER ALPHA WITH TONOS
591 (?\\e,F]\e(B . ?\x03AD) ;; GREEK SMALL LETTER EPSILON WITH TONOS
592 (?\\e,F^\e(B . ?\x03AE) ;; GREEK SMALL LETTER ETA WITH TONOS
593 (?\\e,F_\e(B . ?\x03AF) ;; GREEK SMALL LETTER IOTA WITH TONOS
594 (?\\e,F`\e(B . ?\x03B0) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS
595 (?\\e,Fa\e(B . ?\x03B1) ;; GREEK SMALL LETTER ALPHA
596 (?\\e,Fb\e(B . ?\x03B2) ;; GREEK SMALL LETTER BETA
597 (?\\e,Fc\e(B . ?\x03B3) ;; GREEK SMALL LETTER GAMMA
598 (?\\e,Fd\e(B . ?\x03B4) ;; GREEK SMALL LETTER DELTA
599 (?\\e,Fe\e(B . ?\x03B5) ;; GREEK SMALL LETTER EPSILON
600 (?\\e,Ff\e(B . ?\x03B6) ;; GREEK SMALL LETTER ZETA
601 (?\\e,Fg\e(B . ?\x03B7) ;; GREEK SMALL LETTER ETA
602 (?\\e,Fh\e(B . ?\x03B8) ;; GREEK SMALL LETTER THETA
603 (?\\e,Fi\e(B . ?\x03B9) ;; GREEK SMALL LETTER IOTA
604 (?\\e,Fj\e(B . ?\x03BA) ;; GREEK SMALL LETTER KAPPA
605 (?\\e,Fk\e(B . ?\x03BB) ;; GREEK SMALL LETTER LAMDA
606 (?\\e,Fl\e(B . ?\x03BC) ;; GREEK SMALL LETTER MU
607 (?\\e,Fm\e(B . ?\x03BD) ;; GREEK SMALL LETTER NU
608 (?\\e,Fn\e(B . ?\x03BE) ;; GREEK SMALL LETTER XI
609 (?\\e,Fo\e(B . ?\x03BF) ;; GREEK SMALL LETTER OMICRON
610 (?\\e,Fp\e(B . ?\x03C0) ;; GREEK SMALL LETTER PI
611 (?\\e,Fq\e(B . ?\x03C1) ;; GREEK SMALL LETTER RHO
612 (?\\e,Fr\e(B . ?\x03C2) ;; GREEK SMALL LETTER FINAL SIGMA
613 (?\\e,Fs\e(B . ?\x03C3) ;; GREEK SMALL LETTER SIGMA
614 (?\\e,Ft\e(B . ?\x03C4) ;; GREEK SMALL LETTER TAU
615 (?\\e,Fu\e(B . ?\x03C5) ;; GREEK SMALL LETTER UPSILON
616 (?\\e,Fv\e(B . ?\x03C6) ;; GREEK SMALL LETTER PHI
617 (?\\e,Fw\e(B . ?\x03C7) ;; GREEK SMALL LETTER CHI
618 (?\\e,Fx\e(B . ?\x03C8) ;; GREEK SMALL LETTER PSI
619 (?\\e,Fy\e(B . ?\x03C9) ;; GREEK SMALL LETTER OMEGA
620 (?\\e,Fz\e(B . ?\x03CA) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA
621 (?\\e,F{\e(B . ?\x03CB) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA
622 (?\\e,F|\e(B . ?\x03CC) ;; GREEK SMALL LETTER OMICRON WITH TONOS
623 (?\\e,F}\e(B . ?\x03CD) ;; GREEK SMALL LETTER UPSILON WITH TONOS
624 (?\\e,F~\e(B . ?\x03CE) ;; GREEK SMALL LETTER OMEGA WITH TONOS
625 ))
626
627 (ucs-8859-8-alist
628 '((?\\e,H \e(B . ?\x00A0) ;; NO-BREAK SPACE
629 (?\\e,H"\e(B . ?\x00A2) ;; CENT SIGN
630 (?\\e,H#\e(B . ?\x00A3) ;; POUND SIGN
631 (?\\e,H$\e(B . ?\x00A4) ;; CURRENCY SIGN
632 (?\\e,H%\e(B . ?\x00A5) ;; YEN SIGN
633 (?\\e,H&\e(B . ?\x00A6) ;; BROKEN BAR
634 (?\\e,H'\e(B . ?\x00A7) ;; SECTION SIGN
635 (?\\e,H(\e(B . ?\x00A8) ;; DIAERESIS
636 (?\\e,H)\e(B . ?\x00A9) ;; COPYRIGHT SIGN
637 (?\\e,H*\e(B . ?\x00D7) ;; MULTIPLICATION SIGN
638 (?\\e,H+\e(B . ?\x00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
639 (?\\e,H,\e(B . ?\x00AC) ;; NOT SIGN
640 (?\\e,H-\e(B . ?\x00AD) ;; SOFT HYPHEN
641 (?\\e,H.\e(B . ?\x00AE) ;; REGISTERED SIGN
642 (?\\e,H/\e(B . ?\x00AF) ;; MACRON
643 (?\\e,H0\e(B . ?\x00B0) ;; DEGREE SIGN
644 (?\\e,H1\e(B . ?\x00B1) ;; PLUS-MINUS SIGN
645 (?\\e,H2\e(B . ?\x00B2) ;; SUPERSCRIPT TWO
646 (?\\e,H3\e(B . ?\x00B3) ;; SUPERSCRIPT THREE
647 (?\\e,H4\e(B . ?\x00B4) ;; ACUTE ACCENT
648 (?\\e,H5\e(B . ?\x00B5) ;; MICRO SIGN
649 (?\\e,H6\e(B . ?\x00B6) ;; PILCROW SIGN
650 (?\\e,H7\e(B . ?\x00B7) ;; MIDDLE DOT
651 (?\\e,H8\e(B . ?\x00B8) ;; CEDILLA
652 (?\\e,H9\e(B . ?\x00B9) ;; SUPERSCRIPT ONE
653 (?\\e,H:\e(B . ?\x00F7) ;; DIVISION SIGN
654 (?\\e,H;\e(B . ?\x00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
655 (?\\e,H<\e(B . ?\x00BC) ;; VULGAR FRACTION ONE QUARTER
656 (?\\e,H=\e(B . ?\x00BD) ;; VULGAR FRACTION ONE HALF
657 (?\\e,H>\e(B . ?\x00BE) ;; VULGAR FRACTION THREE QUARTERS
658 (?\\e,H_\e(B . ?\x2017) ;; DOUBLE LOW LINE
659 (?\\e,H`\e(B . ?\x05D0) ;; HEBREW LETTER ALEF
660 (?\\e,Ha\e(B . ?\x05D1) ;; HEBREW LETTER BET
661 (?\\e,Hb\e(B . ?\x05D2) ;; HEBREW LETTER GIMEL
662 (?\\e,Hc\e(B . ?\x05D3) ;; HEBREW LETTER DALET
663 (?\\e,Hd\e(B . ?\x05D4) ;; HEBREW LETTER HE
664 (?\\e,He\e(B . ?\x05D5) ;; HEBREW LETTER VAV
665 (?\\e,Hf\e(B . ?\x05D6) ;; HEBREW LETTER ZAYIN
666 (?\\e,Hg\e(B . ?\x05D7) ;; HEBREW LETTER HET
667 (?\\e,Hh\e(B . ?\x05D8) ;; HEBREW LETTER TET
668 (?\\e,Hi\e(B . ?\x05D9) ;; HEBREW LETTER YOD
669 (?\\e,Hj\e(B . ?\x05DA) ;; HEBREW LETTER FINAL KAF
670 (?\\e,Hk\e(B . ?\x05DB) ;; HEBREW LETTER KAF
671 (?\\e,Hl\e(B . ?\x05DC) ;; HEBREW LETTER LAMED
672 (?\\e,Hm\e(B . ?\x05DD) ;; HEBREW LETTER FINAL MEM
673 (?\\e,Hn\e(B . ?\x05DE) ;; HEBREW LETTER MEM
674 (?\\e,Ho\e(B . ?\x05DF) ;; HEBREW LETTER FINAL NUN
675 (?\\e,Hp\e(B . ?\x05E0) ;; HEBREW LETTER NUN
676 (?\\e,Hq\e(B . ?\x05E1) ;; HEBREW LETTER SAMEKH
677 (?\\e,Hr\e(B . ?\x05E2) ;; HEBREW LETTER AYIN
678 (?\\e,Hs\e(B . ?\x05E3) ;; HEBREW LETTER FINAL PE
679 (?\\e,Ht\e(B . ?\x05E4) ;; HEBREW LETTER PE
680 (?\\e,Hu\e(B . ?\x05E5) ;; HEBREW LETTER FINAL TSADI
681 (?\\e,Hv\e(B . ?\x05E6) ;; HEBREW LETTER TSADI
682 (?\\e,Hw\e(B . ?\x05E7) ;; HEBREW LETTER QOF
683 (?\\e,Hx\e(B . ?\x05E8) ;; HEBREW LETTER RESH
684 (?\\e,Hy\e(B . ?\x05E9) ;; HEBREW LETTER SHIN
685 (?\\e,Hz\e(B . ?\x05EA) ;; HEBREW LETTER TAV
686 (?\\e,H}\e(B . ?\x200E) ;; LEFT-TO-RIGHT MARK
687 (?\\e,H~\e(B . ?\x200F) ;; RIGHT-TO-LEFT MARK
688 ))
689
690 (ucs-8859-9-alist
691 '((?\\e,M \e(B . ?\x00A0) ;; NO-BREAK SPACE
692 (?\\e,M!\e(B . ?\x00A1) ;; INVERTED EXCLAMATION MARK
693 (?\\e,M"\e(B . ?\x00A2) ;; CENT SIGN
694 (?\\e,M#\e(B . ?\x00A3) ;; POUND SIGN
695 (?\\e,M$\e(B . ?\x00A4) ;; CURRENCY SIGN
696 (?\\e,M%\e(B . ?\x00A5) ;; YEN SIGN
697 (?\\e,M&\e(B . ?\x00A6) ;; BROKEN BAR
698 (?\\e,M'\e(B . ?\x00A7) ;; SECTION SIGN
699 (?\\e,M(\e(B . ?\x00A8) ;; DIAERESIS
700 (?\\e,M)\e(B . ?\x00A9) ;; COPYRIGHT SIGN
701 (?\\e,M*\e(B . ?\x00AA) ;; FEMININE ORDINAL INDICATOR
702 (?\\e,M+\e(B . ?\x00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
703 (?\\e,M,\e(B . ?\x00AC) ;; NOT SIGN
704 (?\\e,M-\e(B . ?\x00AD) ;; SOFT HYPHEN
705 (?\\e,M.\e(B . ?\x00AE) ;; REGISTERED SIGN
706 (?\\e,M/\e(B . ?\x00AF) ;; MACRON
707 (?\\e,M0\e(B . ?\x00B0) ;; DEGREE SIGN
708 (?\\e,M1\e(B . ?\x00B1) ;; PLUS-MINUS SIGN
709 (?\\e,M2\e(B . ?\x00B2) ;; SUPERSCRIPT TWO
710 (?\\e,M3\e(B . ?\x00B3) ;; SUPERSCRIPT THREE
711 (?\\e,M4\e(B . ?\x00B4) ;; ACUTE ACCENT
712 (?\\e,M5\e(B . ?\x00B5) ;; MICRO SIGN
713 (?\\e,M6\e(B . ?\x00B6) ;; PILCROW SIGN
714 (?\\e,M7\e(B . ?\x00B7) ;; MIDDLE DOT
715 (?\\e,M8\e(B . ?\x00B8) ;; CEDILLA
716 (?\\e,M9\e(B . ?\x00B9) ;; SUPERSCRIPT ONE
717 (?\\e,M:\e(B . ?\x00BA) ;; MASCULINE ORDINAL INDICATOR
718 (?\\e,M;\e(B . ?\x00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
719 (?\\e,M<\e(B . ?\x00BC) ;; VULGAR FRACTION ONE QUARTER
720 (?\\e,M=\e(B . ?\x00BD) ;; VULGAR FRACTION ONE HALF
721 (?\\e,M>\e(B . ?\x00BE) ;; VULGAR FRACTION THREE QUARTERS
722 (?\\e,M?\e(B . ?\x00BF) ;; INVERTED QUESTION MARK
723 (?\\e,M@\e(B . ?\x00C0) ;; LATIN CAPITAL LETTER A WITH GRAVE
724 (?\\e,MA\e(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
725 (?\\e,MB\e(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
726 (?\\e,MC\e(B . ?\x00C3) ;; LATIN CAPITAL LETTER A WITH TILDE
727 (?\\e,MD\e(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
728 (?\\e,ME\e(B . ?\x00C5) ;; LATIN CAPITAL LETTER A WITH RING ABOVE
729 (?\\e,MF\e(B . ?\x00C6) ;; LATIN CAPITAL LETTER AE
730 (?\\e,MG\e(B . ?\x00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
731 (?\\e,MH\e(B . ?\x00C8) ;; LATIN CAPITAL LETTER E WITH GRAVE
732 (?\\e,MI\e(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
733 (?\\e,MJ\e(B . ?\x00CA) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX
734 (?\\e,MK\e(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
735 (?\\e,ML\e(B . ?\x00CC) ;; LATIN CAPITAL LETTER I WITH GRAVE
736 (?\\e,MM\e(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
737 (?\\e,MN\e(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
738 (?\\e,MO\e(B . ?\x00CF) ;; LATIN CAPITAL LETTER I WITH DIAERESIS
739 (?\\e,MP\e(B . ?\x011E) ;; LATIN CAPITAL LETTER G WITH BREVE
740 (?\\e,MQ\e(B . ?\x00D1) ;; LATIN CAPITAL LETTER N WITH TILDE
741 (?\\e,MR\e(B . ?\x00D2) ;; LATIN CAPITAL LETTER O WITH GRAVE
742 (?\\e,MS\e(B . ?\x00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
743 (?\\e,MT\e(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
744 (?\\e,MU\e(B . ?\x00D5) ;; LATIN CAPITAL LETTER O WITH TILDE
745 (?\\e,MV\e(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
746 (?\\e,MW\e(B . ?\x00D7) ;; MULTIPLICATION SIGN
747 (?\\e,MX\e(B . ?\x00D8) ;; LATIN CAPITAL LETTER O WITH STROKE
748 (?\\e,MY\e(B . ?\x00D9) ;; LATIN CAPITAL LETTER U WITH GRAVE
749 (?\\e,MZ\e(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
750 (?\\e,M[\e(B . ?\x00DB) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
751 (?\\e,M\\e(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
752 (?\\e,M]\e(B . ?\x0130) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE
753 (?\\e,M^\e(B . ?\x015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
754 (?\\e,M_\e(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
755 (?\\e,M`\e(B . ?\x00E0) ;; LATIN SMALL LETTER A WITH GRAVE
756 (?\\e,Ma\e(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
757 (?\\e,Mb\e(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
758 (?\\e,Mc\e(B . ?\x00E3) ;; LATIN SMALL LETTER A WITH TILDE
759 (?\\e,Md\e(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
760 (?\\e,Me\e(B . ?\x00E5) ;; LATIN SMALL LETTER A WITH RING ABOVE
761 (?\\e,Mf\e(B . ?\x00E6) ;; LATIN SMALL LETTER AE
762 (?\\e,Mg\e(B . ?\x00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
763 (?\\e,Mh\e(B . ?\x00E8) ;; LATIN SMALL LETTER E WITH GRAVE
764 (?\\e,Mi\e(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
765 (?\\e,Mj\e(B . ?\x00EA) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX
766 (?\\e,Mk\e(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
767 (?\\e,Ml\e(B . ?\x00EC) ;; LATIN SMALL LETTER I WITH GRAVE
768 (?\\e,Mm\e(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
769 (?\\e,Mn\e(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
770 (?\\e,Mo\e(B . ?\x00EF) ;; LATIN SMALL LETTER I WITH DIAERESIS
771 (?\\e,Mp\e(B . ?\x011F) ;; LATIN SMALL LETTER G WITH BREVE
772 (?\\e,Mq\e(B . ?\x00F1) ;; LATIN SMALL LETTER N WITH TILDE
773 (?\\e,Mr\e(B . ?\x00F2) ;; LATIN SMALL LETTER O WITH GRAVE
774 (?\\e,Ms\e(B . ?\x00F3) ;; LATIN SMALL LETTER O WITH ACUTE
775 (?\\e,Mt\e(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
776 (?\\e,Mu\e(B . ?\x00F5) ;; LATIN SMALL LETTER O WITH TILDE
777 (?\\e,Mv\e(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
778 (?\\e,Mw\e(B . ?\x00F7) ;; DIVISION SIGN
779 (?\\e,Mx\e(B . ?\x00F8) ;; LATIN SMALL LETTER O WITH STROKE
780 (?\\e,My\e(B . ?\x00F9) ;; LATIN SMALL LETTER U WITH GRAVE
781 (?\\e,Mz\e(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
782 (?\\e,M{\e(B . ?\x00FB) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
783 (?\\e,M|\e(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
784 (?\\e,M}\e(B . ?\x0131) ;; LATIN SMALL LETTER DOTLESS I
785 (?\\e,M~\e(B . ?\x015F) ;; LATIN SMALL LETTER S WITH CEDILLA
786 (?\\e,M\x7f\e(B . ?\x00FF) ;; LATIN SMALL LETTER Y WITH DIAERESIS
787 ))
788
789 (ucs-8859-14-alist
790 '((?\\e,_ \e(B . ?\x00A0) ;; NO-BREAK SPACE
791 (?\\e,_!\e(B . ?\x1E02) ;; LATIN CAPITAL LETTER B WITH DOT ABOVE
792 (?\\e,_"\e(B . ?\x1E03) ;; LATIN SMALL LETTER B WITH DOT ABOVE
793 (?\\e,_#\e(B . ?\x00A3) ;; POUND SIGN
794 (?\\e,_$\e(B . ?\x010A) ;; LATIN CAPITAL LETTER C WITH DOT ABOVE
795 (?\\e,_%\e(B . ?\x010B) ;; LATIN SMALL LETTER C WITH DOT ABOVE
796 (?\\e,_&\e(B . ?\x1E0A) ;; LATIN CAPITAL LETTER D WITH DOT ABOVE
797 (?\\e,_'\e(B . ?\x00A7) ;; SECTION SIGN
798 (?\\e,_(\e(B . ?\x1E80) ;; LATIN CAPITAL LETTER W WITH GRAVE
799 (?\\e,_)\e(B . ?\x00A9) ;; COPYRIGHT SIGN
800 (?\\e,_*\e(B . ?\x1E82) ;; LATIN CAPITAL LETTER W WITH ACUTE
801 (?\\e,_+\e(B . ?\x1E0B) ;; LATIN SMALL LETTER D WITH DOT ABOVE
802 (?\\e,_,\e(B . ?\x1EF2) ;; LATIN CAPITAL LETTER Y WITH GRAVE
803 (?\\e,_-\e(B . ?\x00AD) ;; SOFT HYPHEN
804 (?\\e,_.\e(B . ?\x00AE) ;; REGISTERED SIGN
805 (?\\e,_/\e(B . ?\x0178) ;; LATIN CAPITAL LETTER Y WITH DIAERESIS
806 (?\\e,_0\e(B . ?\x1E1E) ;; LATIN CAPITAL LETTER F WITH DOT ABOVE
807 (?\\e,_1\e(B . ?\x1E1F) ;; LATIN SMALL LETTER F WITH DOT ABOVE
808 (?\\e,_2\e(B . ?\x0120) ;; LATIN CAPITAL LETTER G WITH DOT ABOVE
809 (?\\e,_3\e(B . ?\x0121) ;; LATIN SMALL LETTER G WITH DOT ABOVE
810 (?\\e,_4\e(B . ?\x1E40) ;; LATIN CAPITAL LETTER M WITH DOT ABOVE
811 (?\\e,_5\e(B . ?\x1E41) ;; LATIN SMALL LETTER M WITH DOT ABOVE
812 (?\\e,_6\e(B . ?\x00B6) ;; PILCROW SIGN
813 (?\\e,_7\e(B . ?\x1E56) ;; LATIN CAPITAL LETTER P WITH DOT ABOVE
814 (?\\e,_8\e(B . ?\x1E81) ;; LATIN SMALL LETTER W WITH GRAVE
815 (?\\e,_9\e(B . ?\x1E57) ;; LATIN SMALL LETTER P WITH DOT ABOVE
816 (?\\e,_:\e(B . ?\x1E83) ;; LATIN SMALL LETTER W WITH ACUTE
817 (?\\e,_;\e(B . ?\x1E60) ;; LATIN CAPITAL LETTER S WITH DOT ABOVE
818 (?\\e,_<\e(B . ?\x1EF3) ;; LATIN SMALL LETTER Y WITH GRAVE
819 (?\\e,_=\e(B . ?\x1E84) ;; LATIN CAPITAL LETTER W WITH DIAERESIS
820 (?\\e,_>\e(B . ?\x1E85) ;; LATIN SMALL LETTER W WITH DIAERESIS
821 (?\\e,_?\e(B . ?\x1E61) ;; LATIN SMALL LETTER S WITH DOT ABOVE
822 (?\\e,_@\e(B . ?\x00C0) ;; LATIN CAPITAL LETTER A WITH GRAVE
823 (?\\e,_A\e(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
824 (?\\e,_B\e(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
825 (?\\e,_C\e(B . ?\x00C3) ;; LATIN CAPITAL LETTER A WITH TILDE
826 (?\\e,_D\e(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
827 (?\\e,_E\e(B . ?\x00C5) ;; LATIN CAPITAL LETTER A WITH RING ABOVE
828 (?\\e,_F\e(B . ?\x00C6) ;; LATIN CAPITAL LETTER AE
829 (?\\e,_G\e(B . ?\x00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
830 (?\\e,_H\e(B . ?\x00C8) ;; LATIN CAPITAL LETTER E WITH GRAVE
831 (?\\e,_I\e(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
832 (?\\e,_J\e(B . ?\x00CA) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX
833 (?\\e,_K\e(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
834 (?\\e,_L\e(B . ?\x00CC) ;; LATIN CAPITAL LETTER I WITH GRAVE
835 (?\\e,_M\e(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
836 (?\\e,_N\e(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
837 (?\\e,_O\e(B . ?\x00CF) ;; LATIN CAPITAL LETTER I WITH DIAERESIS
838 (?\\e,_P\e(B . ?\x0174) ;; LATIN CAPITAL LETTER W WITH CIRCUMFLEX
839 (?\\e,_Q\e(B . ?\x00D1) ;; LATIN CAPITAL LETTER N WITH TILDE
840 (?\\e,_R\e(B . ?\x00D2) ;; LATIN CAPITAL LETTER O WITH GRAVE
841 (?\\e,_S\e(B . ?\x00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
842 (?\\e,_T\e(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
843 (?\\e,_U\e(B . ?\x00D5) ;; LATIN CAPITAL LETTER O WITH TILDE
844 (?\\e,_V\e(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
845 (?\\e,_W\e(B . ?\x1E6A) ;; LATIN CAPITAL LETTER T WITH DOT ABOVE
846 (?\\e,_X\e(B . ?\x00D8) ;; LATIN CAPITAL LETTER O WITH STROKE
847 (?\\e,_Y\e(B . ?\x00D9) ;; LATIN CAPITAL LETTER U WITH GRAVE
848 (?\\e,_Z\e(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
849 (?\\e,_[\e(B . ?\x00DB) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
850 (?\\e,_\\e(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
851 (?\\e,_]\e(B . ?\x00DD) ;; LATIN CAPITAL LETTER Y WITH ACUTE
852 (?\\e,_^\e(B . ?\x0176) ;; LATIN CAPITAL LETTER Y WITH CIRCUMFLEX
853 (?\\e,__\e(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
854 (?\\e,_`\e(B . ?\x00E0) ;; LATIN SMALL LETTER A WITH GRAVE
855 (?\\e,_a\e(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
856 (?\\e,_b\e(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
857 (?\\e,_c\e(B . ?\x00E3) ;; LATIN SMALL LETTER A WITH TILDE
858 (?\\e,_d\e(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
859 (?\\e,_e\e(B . ?\x00E5) ;; LATIN SMALL LETTER A WITH RING ABOVE
860 (?\\e,_f\e(B . ?\x00E6) ;; LATIN SMALL LETTER AE
861 (?\\e,_g\e(B . ?\x00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
862 (?\\e,_h\e(B . ?\x00E8) ;; LATIN SMALL LETTER E WITH GRAVE
863 (?\\e,_i\e(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
864 (?\\e,_j\e(B . ?\x00EA) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX
865 (?\\e,_k\e(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
866 (?\\e,_l\e(B . ?\x00EC) ;; LATIN SMALL LETTER I WITH GRAVE
867 (?\\e,_m\e(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
868 (?\\e,_n\e(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
869 (?\\e,_o\e(B . ?\x00EF) ;; LATIN SMALL LETTER I WITH DIAERESIS
870 (?\\e,_p\e(B . ?\x0175) ;; LATIN SMALL LETTER W WITH CIRCUMFLEX
871 (?\\e,_q\e(B . ?\x00F1) ;; LATIN SMALL LETTER N WITH TILDE
872 (?\\e,_r\e(B . ?\x00F2) ;; LATIN SMALL LETTER O WITH GRAVE
873 (?\\e,_s\e(B . ?\x00F3) ;; LATIN SMALL LETTER O WITH ACUTE
874 (?\\e,_t\e(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
875 (?\\e,_u\e(B . ?\x00F5) ;; LATIN SMALL LETTER O WITH TILDE
876 (?\\e,_v\e(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
877 (?\\e,_w\e(B . ?\x1E6B) ;; LATIN SMALL LETTER T WITH DOT ABOVE
878 (?\\e,_x\e(B . ?\x00F8) ;; LATIN SMALL LETTER O WITH STROKE
879 (?\\e,_y\e(B . ?\x00F9) ;; LATIN SMALL LETTER U WITH GRAVE
880 (?\\e,_z\e(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
881 (?\\e,_{\e(B . ?\x00FB) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
882 (?\\e,_|\e(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
883 (?\\e,_}\e(B . ?\x00FD) ;; LATIN SMALL LETTER Y WITH ACUTE
884 (?\\e,_~\e(B . ?\x0177) ;; LATIN SMALL LETTER Y WITH CIRCUMFLEX
885 (?\\e,_\x7f\e(B . ?\x00FF) ;; LATIN SMALL LETTER Y WITH DIAERESIS
886 ))
887
888 (ucs-8859-15-alist
889 '((?\\e,b \e(B . ?\x00A0) ;; NO-BREAK SPACE
890 (?\\e,b!\e(B . ?\x00A1) ;; INVERTED EXCLAMATION MARK
891 (?\\e,b"\e(B . ?\x00A2) ;; CENT SIGN
892 (?\\e,b#\e(B . ?\x00A3) ;; POUND SIGN
893 (?\\e,b$\e(B . ?\x20AC) ;; EURO SIGN
894 (?\\e,b%\e(B . ?\x00A5) ;; YEN SIGN
895 (?\\e,b&\e(B . ?\x0160) ;; LATIN CAPITAL LETTER S WITH CARON
896 (?\\e,b'\e(B . ?\x00A7) ;; SECTION SIGN
897 (?\\e,b(\e(B . ?\x0161) ;; LATIN SMALL LETTER S WITH CARON
898 (?\\e,b)\e(B . ?\x00A9) ;; COPYRIGHT SIGN
899 (?\\e,b*\e(B . ?\x00AA) ;; FEMININE ORDINAL INDICATOR
900 (?\\e,b+\e(B . ?\x00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
901 (?\\e,b,\e(B . ?\x00AC) ;; NOT SIGN
902 (?\\e,b-\e(B . ?\x00AD) ;; SOFT HYPHEN
903 (?\\e,b.\e(B . ?\x00AE) ;; REGISTERED SIGN
904 (?\\e,b/\e(B . ?\x00AF) ;; MACRON
905 (?\\e,b0\e(B . ?\x00B0) ;; DEGREE SIGN
906 (?\\e,b1\e(B . ?\x00B1) ;; PLUS-MINUS SIGN
907 (?\\e,b2\e(B . ?\x00B2) ;; SUPERSCRIPT TWO
908 (?\\e,b3\e(B . ?\x00B3) ;; SUPERSCRIPT THREE
909 (?\\e,b4\e(B . ?\x017D) ;; LATIN CAPITAL LETTER Z WITH CARON
910 (?\\e,b5\e(B . ?\x00B5) ;; MICRO SIGN
911 (?\\e,b6\e(B . ?\x00B6) ;; PILCROW SIGN
912 (?\\e,b7\e(B . ?\x00B7) ;; MIDDLE DOT
913 (?\\e,b8\e(B . ?\x017E) ;; LATIN SMALL LETTER Z WITH CARON
914 (?\\e,b9\e(B . ?\x00B9) ;; SUPERSCRIPT ONE
915 (?\\e,b:\e(B . ?\x00BA) ;; MASCULINE ORDINAL INDICATOR
916 (?\\e,b;\e(B . ?\x00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
917 (?\\e,b<\e(B . ?\x0152) ;; LATIN CAPITAL LIGATURE OE
918 (?\\e,b=\e(B . ?\x0153) ;; LATIN SMALL LIGATURE OE
919 (?\\e,b>\e(B . ?\x0178) ;; LATIN CAPITAL LETTER Y WITH DIAERESIS
920 (?\\e,b?\e(B . ?\x00BF) ;; INVERTED QUESTION MARK
921 (?\\e,b@\e(B . ?\x00C0) ;; LATIN CAPITAL LETTER A WITH GRAVE
922 (?\\e,bA\e(B . ?\x00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
923 (?\\e,bB\e(B . ?\x00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
924 (?\\e,bC\e(B . ?\x00C3) ;; LATIN CAPITAL LETTER A WITH TILDE
925 (?\\e,bD\e(B . ?\x00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
926 (?\\e,bE\e(B . ?\x00C5) ;; LATIN CAPITAL LETTER A WITH RING ABOVE
927 (?\\e,bF\e(B . ?\x00C6) ;; LATIN CAPITAL LETTER AE
928 (?\\e,bG\e(B . ?\x00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
929 (?\\e,bH\e(B . ?\x00C8) ;; LATIN CAPITAL LETTER E WITH GRAVE
930 (?\\e,bI\e(B . ?\x00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
931 (?\\e,bJ\e(B . ?\x00CA) ;; LATIN CAPITAL LETTER E WITH CIRCUMFLEX
932 (?\\e,bK\e(B . ?\x00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
933 (?\\e,bL\e(B . ?\x00CC) ;; LATIN CAPITAL LETTER I WITH GRAVE
934 (?\\e,bM\e(B . ?\x00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
935 (?\\e,bN\e(B . ?\x00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
936 (?\\e,bO\e(B . ?\x00CF) ;; LATIN CAPITAL LETTER I WITH DIAERESIS
937 (?\\e,bP\e(B . ?\x00D0) ;; LATIN CAPITAL LETTER ETH
938 (?\\e,bQ\e(B . ?\x00D1) ;; LATIN CAPITAL LETTER N WITH TILDE
939 (?\\e,bR\e(B . ?\x00D2) ;; LATIN CAPITAL LETTER O WITH GRAVE
940 (?\\e,bS\e(B . ?\x00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
941 (?\\e,bT\e(B . ?\x00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
942 (?\\e,bU\e(B . ?\x00D5) ;; LATIN CAPITAL LETTER O WITH TILDE
943 (?\\e,bV\e(B . ?\x00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
944 (?\\e,bW\e(B . ?\x00D7) ;; MULTIPLICATION SIGN
945 (?\\e,bX\e(B . ?\x00D8) ;; LATIN CAPITAL LETTER O WITH STROKE
946 (?\\e,bY\e(B . ?\x00D9) ;; LATIN CAPITAL LETTER U WITH GRAVE
947 (?\\e,bZ\e(B . ?\x00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
948 (?\\e,b[\e(B . ?\x00DB) ;; LATIN CAPITAL LETTER U WITH CIRCUMFLEX
949 (?\\e,b\\e(B . ?\x00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
950 (?\\e,b]\e(B . ?\x00DD) ;; LATIN CAPITAL LETTER Y WITH ACUTE
951 (?\\e,b^\e(B . ?\x00DE) ;; LATIN CAPITAL LETTER THORN
952 (?\\e,b_\e(B . ?\x00DF) ;; LATIN SMALL LETTER SHARP S
953 (?\\e,b`\e(B . ?\x00E0) ;; LATIN SMALL LETTER A WITH GRAVE
954 (?\\e,ba\e(B . ?\x00E1) ;; LATIN SMALL LETTER A WITH ACUTE
955 (?\\e,bb\e(B . ?\x00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
956 (?\\e,bc\e(B . ?\x00E3) ;; LATIN SMALL LETTER A WITH TILDE
957 (?\\e,bd\e(B . ?\x00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
958 (?\\e,be\e(B . ?\x00E5) ;; LATIN SMALL LETTER A WITH RING ABOVE
959 (?\\e,bf\e(B . ?\x00E6) ;; LATIN SMALL LETTER AE
960 (?\\e,bg\e(B . ?\x00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
961 (?\\e,bh\e(B . ?\x00E8) ;; LATIN SMALL LETTER E WITH GRAVE
962 (?\\e,bi\e(B . ?\x00E9) ;; LATIN SMALL LETTER E WITH ACUTE
963 (?\\e,bj\e(B . ?\x00EA) ;; LATIN SMALL LETTER E WITH CIRCUMFLEX
964 (?\\e,bk\e(B . ?\x00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
965 (?\\e,bl\e(B . ?\x00EC) ;; LATIN SMALL LETTER I WITH GRAVE
966 (?\\e,bm\e(B . ?\x00ED) ;; LATIN SMALL LETTER I WITH ACUTE
967 (?\\e,bn\e(B . ?\x00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
968 (?\\e,bo\e(B . ?\x00EF) ;; LATIN SMALL LETTER I WITH DIAERESIS
969 (?\\e,bp\e(B . ?\x00F0) ;; LATIN SMALL LETTER ETH
970 (?\\e,bq\e(B . ?\x00F1) ;; LATIN SMALL LETTER N WITH TILDE
971 (?\\e,br\e(B . ?\x00F2) ;; LATIN SMALL LETTER O WITH GRAVE
972 (?\\e,bs\e(B . ?\x00F3) ;; LATIN SMALL LETTER O WITH ACUTE
973 (?\\e,bt\e(B . ?\x00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
974 (?\\e,bu\e(B . ?\x00F5) ;; LATIN SMALL LETTER O WITH TILDE
975 (?\\e,bv\e(B . ?\x00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
976 (?\\e,bw\e(B . ?\x00F7) ;; DIVISION SIGN
977 (?\\e,bx\e(B . ?\x00F8) ;; LATIN SMALL LETTER O WITH STROKE
978 (?\\e,by\e(B . ?\x00F9) ;; LATIN SMALL LETTER U WITH GRAVE
979 (?\\e,bz\e(B . ?\x00FA) ;; LATIN SMALL LETTER U WITH ACUTE
980 (?\\e,b{\e(B . ?\x00FB) ;; LATIN SMALL LETTER U WITH CIRCUMFLEX
981 (?\\e,b|\e(B . ?\x00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
982 (?\\e,b}\e(B . ?\x00FD) ;; LATIN SMALL LETTER Y WITH ACUTE
983 (?\\e,b~\e(B . ?\x00FE) ;; LATIN SMALL LETTER THORN
984 (?\\e,b\x7f\e(B . ?\x00FF) ;; LATIN SMALL LETTER Y WITH DIAERESIS
985 ))
986
987 (ucs-8859-1-alist
988 (let ((i 160)
989 l)
990 (while (< i 256)
991 (push (cons (make-char 'latin-iso8859-1 (- i 128)) i)
992 l)
993 (setq i (1+ i)))
994 (nreverse l)))
995 )
996
997 (dolist (cs (list ucs-8859-15-alist ucs-8859-14-alist
998 ucs-8859-9-alist ucs-8859-8-alist ucs-8859-7-alist
999 ucs-8859-6-alist ucs-8859-5-alist ucs-8859-4-alist
1000 ucs-8859-3-alist ucs-8859-2-alist
1001 (or (cdr-safe
1002 (assq ucs-preferred-8859-set
1003 '((latin-iso8859-15 . ucs-8859-15-alist)
1004 (latin-iso8859-14 . ucs-8859-14-alist)
1005 (latin-iso8859-9 . ucs-8859-9-alist)
1006 (latin-iso8859-5 . ucs-8859-5-alist)
1007 (latin-iso8859-4 . ucs-8859-4-alist)
1008 (latin-iso8859-3 . ucs-8859-3-alist)
1009 (latin-iso8859-2 . ucs-8859-2-alist))))
1010 ucs-8859-1-alist)))
1011 (dolist (pair cs)
1012 (aset ucs-mule-8859-to-ucs-table (car pair) (cdr pair))
1013 (aset ucs-ucs-to-mule-8859-table (cdr pair) (car pair))
1014 (aset ucs-mule-8859-to-mule-unicode
1015 (car pair) (decode-char 'ucs (cdr pair)))
1016 (aset ucs-mule-unicode-to-mule-8859
1017 (decode-char 'ucs (cdr pair)) (car pair))))
1018
1019 (map-char-table
1020 (lambda (c cu)
1021 (when (and cu (< cu 256))
1022 (aset ucs-latin-1-unification-table
1023 c (make-char 'latin-iso8859-1 (- cu 128)))))
1024 ucs-mule-8859-to-ucs-table)
1025 )
1026
1027 ;; Register them for use in CCL.
1028 (define-translation-table 'ucs-mule-8859-to-mule-unicode
1029 ucs-mule-8859-to-mule-unicode)
1030 (define-translation-table 'ucs-latin-1-unification-table
1031 ucs-latin-1-unification-table)
1032
1033 (defun ucs-translate-region (beg end table)
1034 (save-restriction
1035 (narrow-to-region beg end)
1036 (goto-char (point-min))
1037 (while (not (eobp))
1038 (let* ((c (char-after))
1039 (c2 (aref table c)))
1040 (if c2
1041 (progn
1042 (delete-char 1)
1043 (insert c2))
1044 (forward-char))))))
1045
1046 (defun ucs-unify-to-latin-1 (&optional arg)
1047 "Re-set up the Latin-1 coding system to encode unified characters.
1048 When this is done, text encoded using the `iso-latin-1' coding system
1049 is first translated using the translation table
1050 `ucs-latin-1-unification-table'. This converts ISO-8859-N (N>1)
1051 characters to their Latin-1 equivalents when such equivalents exist.
1052 Thus a buffer which contains a Latin-2 \"small y with acute\" (code
1053 point 253) will be safely encoded to that code point since it occurs
1054 there in Latin-1. On the other hand, \"small t with cedilla\" does
1055 not occur in Latin-1 and so can't be safely encoded when this
1056 unification is done.
1057
1058 With optional ARG, turn off such unification."
1059 (if arg
1060 (make-coding-system
1061 'iso-latin-1 2 ?1
1062 "ISO 2022 based 8-bit encoding for Latin-1 (MIME:ISO-8859-1)"
1063 '(ascii latin-iso8859-1 nil nil
1064 nil nil nil nil nil nil nil nil nil nil nil nil t)
1065 `((safe-charsets ascii latin-iso8859-1)
1066 (mime-charset . iso-8859-1)
1067 (safe-chars . ucs-latin-1-unification-table)
1068 (translation-table-for-encode . ,ucs-latin-1-unification-table)))
1069 (make-coding-system
1070 'iso-latin-1 2 ?1
1071 "ISO 2022 based 8-bit encoding for Latin-1 (MIME:ISO-8859-1)"
1072 '(ascii latin-iso8859-1 nil nil
1073 nil nil nil nil nil nil nil nil nil nil nil nil t)
1074 '((safe-charsets ascii latin-iso8859-1)
1075 (mime-charset . iso-8859-1)))))
1076
1077 (provide 'ucs-tables)
1078
1079 ;;; ucs-tables.el ends here
Emacs repository mirror