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