comparison lisp/mule/greek.el @ 4299:f4c3ffe60a4f

[xemacs-hg @ 2007-12-01 14:24:46 by aidan] Switch away from ISO 2022 for the ISO-8859 character sets.
author aidan
date Sat, 01 Dec 2007 14:24:52 +0000
parents 751ae075e76e
children b75b075a9041
comparison
equal deleted inserted replaced
4298:27150c937a22 4299:f4c3ffe60a4f
116 do (modify-syntax-entry 116 do (modify-syntax-entry
117 (make-char 'greek-iso8859-7 greek) 117 (make-char 'greek-iso8859-7 greek)
118 (string (char-syntax (make-char 'latin-iso8859-1 latin-1))) 118 (string (char-syntax (make-char 'latin-iso8859-1 latin-1)))
119 syntax-table)) 119 syntax-table))
120 120
121 (make-coding-system 121 (make-8-bit-coding-system
122 'iso-8859-7 'iso2022 "ISO-8859-7 (Greek)" 122 'iso-8859-7
123 '(charset-g0 ascii 123 '((#xA1 ?\u2018) ;; LEFT SINGLE QUOTATION MARK
124 charset-g1 greek-iso8859-7 124 (#xA2 ?\u2019) ;; RIGHT SINGLE QUOTATION MARK
125 charset-g2 t 125 (#xA4 ?\u20AC) ;; EURO SIGN
126 charset-g3 t 126 (#xA5 ?\u20AF) ;; DRACHMA SIGN
127 mnemonic "Grk")) 127 (#xAA ?\u037A) ;; GREEK YPOGEGRAMMENI
128 128 (#xAF ?\u2015) ;; HORIZONTAL BAR
129 ;; Windows 1253 may be provided automatically on Windows, in which case 129 (#xB4 ?\u0384) ;; GREEK TONOS
130 ;; we don't need to provide it. 130 (#xB5 ?\u0385) ;; GREEK DIALYTIKA TONOS
131 (unless (find-coding-system 'windows-1253) 131 (#xB6 ?\u0386) ;; GREEK CAPITAL LETTER ALPHA WITH TONOS
132 (make-8-bit-coding-system 132 (#xB8 ?\u0388) ;; GREEK CAPITAL LETTER EPSILON WITH TONOS
133 'windows-1253 133 (#xB9 ?\u0389) ;; GREEK CAPITAL LETTER ETA WITH TONOS
134 '((#x80 ?\u20AC) ;; EURO SIGN 134 (#xBA ?\u038A) ;; GREEK CAPITAL LETTER IOTA WITH TONOS
135 (#x82 ?\u201A) ;; SINGLE LOW-9 QUOTATION MARK 135 (#xBC ?\u038C) ;; GREEK CAPITAL LETTER OMICRON WITH TONOS
136 (#x83 ?\u0192) ;; LATIN SMALL LETTER F WITH HOOK 136 (#xBE ?\u038E) ;; GREEK CAPITAL LETTER UPSILON WITH TONOS
137 (#x84 ?\u201E) ;; DOUBLE LOW-9 QUOTATION MARK 137 (#xBF ?\u038F) ;; GREEK CAPITAL LETTER OMEGA WITH TONOS
138 (#x85 ?\u2026) ;; HORIZONTAL ELLIPSIS 138 (#xC0 ?\u0390) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS
139 (#x86 ?\u2020) ;; DAGGER 139 (#xC1 ?\u0391) ;; GREEK CAPITAL LETTER ALPHA
140 (#x87 ?\u2021) ;; DOUBLE DAGGER 140 (#xC2 ?\u0392) ;; GREEK CAPITAL LETTER BETA
141 (#x89 ?\u2030) ;; PER MILLE SIGN 141 (#xC3 ?\u0393) ;; GREEK CAPITAL LETTER GAMMA
142 (#x8B ?\u2039) ;; SINGLE LEFT-POINTING ANGLE QUOTATION MARK 142 (#xC4 ?\u0394) ;; GREEK CAPITAL LETTER DELTA
143 (#x91 ?\u2018) ;; LEFT SINGLE QUOTATION MARK 143 (#xC5 ?\u0395) ;; GREEK CAPITAL LETTER EPSILON
144 (#x92 ?\u2019) ;; RIGHT SINGLE QUOTATION MARK 144 (#xC6 ?\u0396) ;; GREEK CAPITAL LETTER ZETA
145 (#x93 ?\u201C) ;; LEFT DOUBLE QUOTATION MARK 145 (#xC7 ?\u0397) ;; GREEK CAPITAL LETTER ETA
146 (#x94 ?\u201D) ;; RIGHT DOUBLE QUOTATION MARK 146 (#xC8 ?\u0398) ;; GREEK CAPITAL LETTER THETA
147 (#x95 ?\u2022) ;; BULLET 147 (#xC9 ?\u0399) ;; GREEK CAPITAL LETTER IOTA
148 (#x96 ?\u2013) ;; EN DASH 148 (#xCA ?\u039A) ;; GREEK CAPITAL LETTER KAPPA
149 (#x97 ?\u2014) ;; EM DASH 149 (#xCB ?\u039B) ;; GREEK CAPITAL LETTER LAMDA
150 (#x99 ?\u2122) ;; TRADE MARK SIGN 150 (#xCC ?\u039C) ;; GREEK CAPITAL LETTER MU
151 (#x9B ?\u203A) ;; SINGLE RIGHT-POINTING ANGLE QUOTATION MARK 151 (#xCD ?\u039D) ;; GREEK CAPITAL LETTER NU
152 (#xA0 ?\u00A0) ;; NO-BREAK SPACE 152 (#xCE ?\u039E) ;; GREEK CAPITAL LETTER XI
153 (#xA1 ?\u0385) ;; GREEK DIALYTIKA TONOS 153 (#xCF ?\u039F) ;; GREEK CAPITAL LETTER OMICRON
154 (#xA2 ?\u0386) ;; GREEK CAPITAL LETTER ALPHA WITH TONOS 154 (#xD0 ?\u03A0) ;; GREEK CAPITAL LETTER PI
155 (#xA3 ?\u00A3) ;; POUND SIGN 155 (#xD1 ?\u03A1) ;; GREEK CAPITAL LETTER RHO
156 (#xA4 ?\u00A4) ;; CURRENCY SIGN 156 (#xD3 ?\u03A3) ;; GREEK CAPITAL LETTER SIGMA
157 (#xA5 ?\u00A5) ;; YEN SIGN 157 (#xD4 ?\u03A4) ;; GREEK CAPITAL LETTER TAU
158 (#xA6 ?\u00A6) ;; BROKEN BAR 158 (#xD5 ?\u03A5) ;; GREEK CAPITAL LETTER UPSILON
159 (#xA7 ?\u00A7) ;; SECTION SIGN 159 (#xD6 ?\u03A6) ;; GREEK CAPITAL LETTER PHI
160 (#xA8 ?\u00A8) ;; DIAERESIS 160 (#xD7 ?\u03A7) ;; GREEK CAPITAL LETTER CHI
161 (#xA9 ?\u00A9) ;; COPYRIGHT SIGN 161 (#xD8 ?\u03A8) ;; GREEK CAPITAL LETTER PSI
162 (#xAB ?\u00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK 162 (#xD9 ?\u03A9) ;; GREEK CAPITAL LETTER OMEGA
163 (#xAC ?\u00AC) ;; NOT SIGN 163 (#xDA ?\u03AA) ;; GREEK CAPITAL LETTER IOTA WITH DIALYTIKA
164 (#xAD ?\u00AD) ;; SOFT HYPHEN 164 (#xDB ?\u03AB) ;; GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA
165 (#xAE ?\u00AE) ;; REGISTERED SIGN 165 (#xDC ?\u03AC) ;; GREEK SMALL LETTER ALPHA WITH TONOS
166 (#xAF ?\u2015) ;; HORIZONTAL BAR 166 (#xDD ?\u03AD) ;; GREEK SMALL LETTER EPSILON WITH TONOS
167 (#xB0 ?\u00B0) ;; DEGREE SIGN 167 (#xDE ?\u03AE) ;; GREEK SMALL LETTER ETA WITH TONOS
168 (#xB1 ?\u00B1) ;; PLUS-MINUS SIGN 168 (#xDF ?\u03AF) ;; GREEK SMALL LETTER IOTA WITH TONOS
169 (#xB2 ?\u00B2) ;; SUPERSCRIPT TWO 169 (#xE0 ?\u03B0) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS
170 (#xB3 ?\u00B3) ;; SUPERSCRIPT THREE 170 (#xE1 ?\u03B1) ;; GREEK SMALL LETTER ALPHA
171 (#xB4 ?\u0384) ;; GREEK TONOS 171 (#xE2 ?\u03B2) ;; GREEK SMALL LETTER BETA
172 (#xB5 ?\u00B5) ;; MICRO SIGN 172 (#xE3 ?\u03B3) ;; GREEK SMALL LETTER GAMMA
173 (#xB6 ?\u00B6) ;; PILCROW SIGN 173 (#xE4 ?\u03B4) ;; GREEK SMALL LETTER DELTA
174 (#xB7 ?\u00B7) ;; MIDDLE DOT 174 (#xE5 ?\u03B5) ;; GREEK SMALL LETTER EPSILON
175 (#xB8 ?\u0388) ;; GREEK CAPITAL LETTER EPSILON WITH TONOS 175 (#xE6 ?\u03B6) ;; GREEK SMALL LETTER ZETA
176 (#xB9 ?\u0389) ;; GREEK CAPITAL LETTER ETA WITH TONOS 176 (#xE7 ?\u03B7) ;; GREEK SMALL LETTER ETA
177 (#xBA ?\u038A) ;; GREEK CAPITAL LETTER IOTA WITH TONOS 177 (#xE8 ?\u03B8) ;; GREEK SMALL LETTER THETA
178 (#xBB ?\u00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK 178 (#xE9 ?\u03B9) ;; GREEK SMALL LETTER IOTA
179 (#xBC ?\u038C) ;; GREEK CAPITAL LETTER OMICRON WITH TONOS 179 (#xEA ?\u03BA) ;; GREEK SMALL LETTER KAPPA
180 (#xBD ?\u00BD) ;; VULGAR FRACTION ONE HALF 180 (#xEB ?\u03BB) ;; GREEK SMALL LETTER LAMDA
181 (#xBE ?\u038E) ;; GREEK CAPITAL LETTER UPSILON WITH TONOS 181 (#xEC ?\u03BC) ;; GREEK SMALL LETTER MU
182 (#xBF ?\u038F) ;; GREEK CAPITAL LETTER OMEGA WITH TONOS 182 (#xED ?\u03BD) ;; GREEK SMALL LETTER NU
183 (#xC0 ?\u0390) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS 183 (#xEE ?\u03BE) ;; GREEK SMALL LETTER XI
184 (#xC1 ?\u0391) ;; GREEK CAPITAL LETTER ALPHA 184 (#xEF ?\u03BF) ;; GREEK SMALL LETTER OMICRON
185 (#xC2 ?\u0392) ;; GREEK CAPITAL LETTER BETA 185 (#xF0 ?\u03C0) ;; GREEK SMALL LETTER PI
186 (#xC3 ?\u0393) ;; GREEK CAPITAL LETTER GAMMA 186 (#xF1 ?\u03C1) ;; GREEK SMALL LETTER RHO
187 (#xC4 ?\u0394) ;; GREEK CAPITAL LETTER DELTA 187 (#xF2 ?\u03C2) ;; GREEK SMALL LETTER FINAL SIGMA
188 (#xC5 ?\u0395) ;; GREEK CAPITAL LETTER EPSILON 188 (#xF3 ?\u03C3) ;; GREEK SMALL LETTER SIGMA
189 (#xC6 ?\u0396) ;; GREEK CAPITAL LETTER ZETA 189 (#xF4 ?\u03C4) ;; GREEK SMALL LETTER TAU
190 (#xC7 ?\u0397) ;; GREEK CAPITAL LETTER ETA 190 (#xF5 ?\u03C5) ;; GREEK SMALL LETTER UPSILON
191 (#xC8 ?\u0398) ;; GREEK CAPITAL LETTER THETA 191 (#xF6 ?\u03C6) ;; GREEK SMALL LETTER PHI
192 (#xC9 ?\u0399) ;; GREEK CAPITAL LETTER IOTA 192 (#xF7 ?\u03C7) ;; GREEK SMALL LETTER CHI
193 (#xCA ?\u039A) ;; GREEK CAPITAL LETTER KAPPA 193 (#xF8 ?\u03C8) ;; GREEK SMALL LETTER PSI
194 (#xCB ?\u039B) ;; GREEK CAPITAL LETTER LAMDA 194 (#xF9 ?\u03C9) ;; GREEK SMALL LETTER OMEGA
195 (#xCC ?\u039C) ;; GREEK CAPITAL LETTER MU 195 (#xFA ?\u03CA) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA
196 (#xCD ?\u039D) ;; GREEK CAPITAL LETTER NU 196 (#xFB ?\u03CB) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA
197 (#xCE ?\u039E) ;; GREEK CAPITAL LETTER XI 197 (#xFC ?\u03CC) ;; GREEK SMALL LETTER OMICRON WITH TONOS
198 (#xCF ?\u039F) ;; GREEK CAPITAL LETTER OMICRON 198 (#xFD ?\u03CD) ;; GREEK SMALL LETTER UPSILON WITH TONOS
199 (#xD0 ?\u03A0) ;; GREEK CAPITAL LETTER PI 199 (#xFE ?\u03CE)) ;; GREEK SMALL LETTER OMEGA WITH TONOS
200 (#xD1 ?\u03A1) ;; GREEK CAPITAL LETTER RHO 200 "ISO-8859-7 (Greek)"
201 (#xD3 ?\u03A3) ;; GREEK CAPITAL LETTER SIGMA 201 '(mnemonic "Grk"
202 (#xD4 ?\u03A4) ;; GREEK CAPITAL LETTER TAU 202 aliases (greek-iso-8bit)))
203 (#xD5 ?\u03A5) ;; GREEK CAPITAL LETTER UPSILON 203
204 (#xD6 ?\u03A6) ;; GREEK CAPITAL LETTER PHI 204 (make-8-bit-coding-system
205 (#xD7 ?\u03A7) ;; GREEK CAPITAL LETTER CHI 205 'windows-1253
206 (#xD8 ?\u03A8) ;; GREEK CAPITAL LETTER PSI 206 '((#x80 ?\u20AC) ;; EURO SIGN
207 (#xD9 ?\u03A9) ;; GREEK CAPITAL LETTER OMEGA 207 (#x82 ?\u201A) ;; SINGLE LOW-9 QUOTATION MARK
208 (#xDA ?\u03AA) ;; GREEK CAPITAL LETTER IOTA WITH DIALYTIKA 208 (#x83 ?\u0192) ;; LATIN SMALL LETTER F WITH HOOK
209 (#xDB ?\u03AB) ;; GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA 209 (#x84 ?\u201E) ;; DOUBLE LOW-9 QUOTATION MARK
210 (#xDC ?\u03AC) ;; GREEK SMALL LETTER ALPHA WITH TONOS 210 (#x85 ?\u2026) ;; HORIZONTAL ELLIPSIS
211 (#xDD ?\u03AD) ;; GREEK SMALL LETTER EPSILON WITH TONOS 211 (#x86 ?\u2020) ;; DAGGER
212 (#xDE ?\u03AE) ;; GREEK SMALL LETTER ETA WITH TONOS 212 (#x87 ?\u2021) ;; DOUBLE DAGGER
213 (#xDF ?\u03AF) ;; GREEK SMALL LETTER IOTA WITH TONOS 213 (#x89 ?\u2030) ;; PER MILLE SIGN
214 (#xE0 ?\u03B0) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS 214 (#x8B ?\u2039) ;; SINGLE LEFT-POINTING ANGLE QUOTATION MARK
215 (#xE1 ?\u03B1) ;; GREEK SMALL LETTER ALPHA 215 (#x91 ?\u2018) ;; LEFT SINGLE QUOTATION MARK
216 (#xE2 ?\u03B2) ;; GREEK SMALL LETTER BETA 216 (#x92 ?\u2019) ;; RIGHT SINGLE QUOTATION MARK
217 (#xE3 ?\u03B3) ;; GREEK SMALL LETTER GAMMA 217 (#x93 ?\u201C) ;; LEFT DOUBLE QUOTATION MARK
218 (#xE4 ?\u03B4) ;; GREEK SMALL LETTER DELTA 218 (#x94 ?\u201D) ;; RIGHT DOUBLE QUOTATION MARK
219 (#xE5 ?\u03B5) ;; GREEK SMALL LETTER EPSILON 219 (#x95 ?\u2022) ;; BULLET
220 (#xE6 ?\u03B6) ;; GREEK SMALL LETTER ZETA 220 (#x96 ?\u2013) ;; EN DASH
221 (#xE7 ?\u03B7) ;; GREEK SMALL LETTER ETA 221 (#x97 ?\u2014) ;; EM DASH
222 (#xE8 ?\u03B8) ;; GREEK SMALL LETTER THETA 222 (#x99 ?\u2122) ;; TRADE MARK SIGN
223 (#xE9 ?\u03B9) ;; GREEK SMALL LETTER IOTA 223 (#x9B ?\u203A) ;; SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
224 (#xEA ?\u03BA) ;; GREEK SMALL LETTER KAPPA 224 (#xA0 ?\u00A0) ;; NO-BREAK SPACE
225 (#xEB ?\u03BB) ;; GREEK SMALL LETTER LAMDA 225 (#xA1 ?\u0385) ;; GREEK DIALYTIKA TONOS
226 (#xEC ?\u03BC) ;; GREEK SMALL LETTER MU 226 (#xA2 ?\u0386) ;; GREEK CAPITAL LETTER ALPHA WITH TONOS
227 (#xED ?\u03BD) ;; GREEK SMALL LETTER NU 227 (#xA3 ?\u00A3) ;; POUND SIGN
228 (#xEE ?\u03BE) ;; GREEK SMALL LETTER XI 228 (#xA4 ?\u00A4) ;; CURRENCY SIGN
229 (#xEF ?\u03BF) ;; GREEK SMALL LETTER OMICRON 229 (#xA5 ?\u00A5) ;; YEN SIGN
230 (#xF0 ?\u03C0) ;; GREEK SMALL LETTER PI 230 (#xA6 ?\u00A6) ;; BROKEN BAR
231 (#xF1 ?\u03C1) ;; GREEK SMALL LETTER RHO 231 (#xA7 ?\u00A7) ;; SECTION SIGN
232 (#xF2 ?\u03C2) ;; GREEK SMALL LETTER FINAL SIGMA 232 (#xA8 ?\u00A8) ;; DIAERESIS
233 (#xF3 ?\u03C3) ;; GREEK SMALL LETTER SIGMA 233 (#xA9 ?\u00A9) ;; COPYRIGHT SIGN
234 (#xF4 ?\u03C4) ;; GREEK SMALL LETTER TAU 234 (#xAB ?\u00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
235 (#xF5 ?\u03C5) ;; GREEK SMALL LETTER UPSILON 235 (#xAC ?\u00AC) ;; NOT SIGN
236 (#xF6 ?\u03C6) ;; GREEK SMALL LETTER PHI 236 (#xAD ?\u00AD) ;; SOFT HYPHEN
237 (#xF7 ?\u03C7) ;; GREEK SMALL LETTER CHI 237 (#xAE ?\u00AE) ;; REGISTERED SIGN
238 (#xF8 ?\u03C8) ;; GREEK SMALL LETTER PSI 238 (#xAF ?\u2015) ;; HORIZONTAL BAR
239 (#xF9 ?\u03C9) ;; GREEK SMALL LETTER OMEGA 239 (#xB0 ?\u00B0) ;; DEGREE SIGN
240 (#xFA ?\u03CA) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA 240 (#xB1 ?\u00B1) ;; PLUS-MINUS SIGN
241 (#xFB ?\u03CB) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA 241 (#xB2 ?\u00B2) ;; SUPERSCRIPT TWO
242 (#xFC ?\u03CC) ;; GREEK SMALL LETTER OMICRON WITH TONOS 242 (#xB3 ?\u00B3) ;; SUPERSCRIPT THREE
243 (#xFD ?\u03CD) ;; GREEK SMALL LETTER UPSILON WITH TONOS 243 (#xB4 ?\u0384) ;; GREEK TONOS
244 (#xFE ?\u03CE)) ;; GREEK SMALL LETTER OMEGA WITH TONOS 244 (#xB5 ?\u00B5) ;; MICRO SIGN
245 "Microsoft's Code Page 1253, for monotonic Greek. " 245 (#xB6 ?\u00B6) ;; PILCROW SIGN
246 '(mnemonic "GrkW" 246 (#xB7 ?\u00B7) ;; MIDDLE DOT
247 documentation 247 (#xB8 ?\u0388) ;; GREEK CAPITAL LETTER EPSILON WITH TONOS
248 "This ASCII-compatible encoding is slightly incompatibile with 248 (#xB9 ?\u0389) ;; GREEK CAPITAL LETTER ETA WITH TONOS
249 (#xBA ?\u038A) ;; GREEK CAPITAL LETTER IOTA WITH TONOS
250 (#xBB ?\u00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
251 (#xBC ?\u038C) ;; GREEK CAPITAL LETTER OMICRON WITH TONOS
252 (#xBD ?\u00BD) ;; VULGAR FRACTION ONE HALF
253 (#xBE ?\u038E) ;; GREEK CAPITAL LETTER UPSILON WITH TONOS
254 (#xBF ?\u038F) ;; GREEK CAPITAL LETTER OMEGA WITH TONOS
255 (#xC0 ?\u0390) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS
256 (#xC1 ?\u0391) ;; GREEK CAPITAL LETTER ALPHA
257 (#xC2 ?\u0392) ;; GREEK CAPITAL LETTER BETA
258 (#xC3 ?\u0393) ;; GREEK CAPITAL LETTER GAMMA
259 (#xC4 ?\u0394) ;; GREEK CAPITAL LETTER DELTA
260 (#xC5 ?\u0395) ;; GREEK CAPITAL LETTER EPSILON
261 (#xC6 ?\u0396) ;; GREEK CAPITAL LETTER ZETA
262 (#xC7 ?\u0397) ;; GREEK CAPITAL LETTER ETA
263 (#xC8 ?\u0398) ;; GREEK CAPITAL LETTER THETA
264 (#xC9 ?\u0399) ;; GREEK CAPITAL LETTER IOTA
265 (#xCA ?\u039A) ;; GREEK CAPITAL LETTER KAPPA
266 (#xCB ?\u039B) ;; GREEK CAPITAL LETTER LAMDA
267 (#xCC ?\u039C) ;; GREEK CAPITAL LETTER MU
268 (#xCD ?\u039D) ;; GREEK CAPITAL LETTER NU
269 (#xCE ?\u039E) ;; GREEK CAPITAL LETTER XI
270 (#xCF ?\u039F) ;; GREEK CAPITAL LETTER OMICRON
271 (#xD0 ?\u03A0) ;; GREEK CAPITAL LETTER PI
272 (#xD1 ?\u03A1) ;; GREEK CAPITAL LETTER RHO
273 (#xD3 ?\u03A3) ;; GREEK CAPITAL LETTER SIGMA
274 (#xD4 ?\u03A4) ;; GREEK CAPITAL LETTER TAU
275 (#xD5 ?\u03A5) ;; GREEK CAPITAL LETTER UPSILON
276 (#xD6 ?\u03A6) ;; GREEK CAPITAL LETTER PHI
277 (#xD7 ?\u03A7) ;; GREEK CAPITAL LETTER CHI
278 (#xD8 ?\u03A8) ;; GREEK CAPITAL LETTER PSI
279 (#xD9 ?\u03A9) ;; GREEK CAPITAL LETTER OMEGA
280 (#xDA ?\u03AA) ;; GREEK CAPITAL LETTER IOTA WITH DIALYTIKA
281 (#xDB ?\u03AB) ;; GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA
282 (#xDC ?\u03AC) ;; GREEK SMALL LETTER ALPHA WITH TONOS
283 (#xDD ?\u03AD) ;; GREEK SMALL LETTER EPSILON WITH TONOS
284 (#xDE ?\u03AE) ;; GREEK SMALL LETTER ETA WITH TONOS
285 (#xDF ?\u03AF) ;; GREEK SMALL LETTER IOTA WITH TONOS
286 (#xE0 ?\u03B0) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS
287 (#xE1 ?\u03B1) ;; GREEK SMALL LETTER ALPHA
288 (#xE2 ?\u03B2) ;; GREEK SMALL LETTER BETA
289 (#xE3 ?\u03B3) ;; GREEK SMALL LETTER GAMMA
290 (#xE4 ?\u03B4) ;; GREEK SMALL LETTER DELTA
291 (#xE5 ?\u03B5) ;; GREEK SMALL LETTER EPSILON
292 (#xE6 ?\u03B6) ;; GREEK SMALL LETTER ZETA
293 (#xE7 ?\u03B7) ;; GREEK SMALL LETTER ETA
294 (#xE8 ?\u03B8) ;; GREEK SMALL LETTER THETA
295 (#xE9 ?\u03B9) ;; GREEK SMALL LETTER IOTA
296 (#xEA ?\u03BA) ;; GREEK SMALL LETTER KAPPA
297 (#xEB ?\u03BB) ;; GREEK SMALL LETTER LAMDA
298 (#xEC ?\u03BC) ;; GREEK SMALL LETTER MU
299 (#xED ?\u03BD) ;; GREEK SMALL LETTER NU
300 (#xEE ?\u03BE) ;; GREEK SMALL LETTER XI
301 (#xEF ?\u03BF) ;; GREEK SMALL LETTER OMICRON
302 (#xF0 ?\u03C0) ;; GREEK SMALL LETTER PI
303 (#xF1 ?\u03C1) ;; GREEK SMALL LETTER RHO
304 (#xF2 ?\u03C2) ;; GREEK SMALL LETTER FINAL SIGMA
305 (#xF3 ?\u03C3) ;; GREEK SMALL LETTER SIGMA
306 (#xF4 ?\u03C4) ;; GREEK SMALL LETTER TAU
307 (#xF5 ?\u03C5) ;; GREEK SMALL LETTER UPSILON
308 (#xF6 ?\u03C6) ;; GREEK SMALL LETTER PHI
309 (#xF7 ?\u03C7) ;; GREEK SMALL LETTER CHI
310 (#xF8 ?\u03C8) ;; GREEK SMALL LETTER PSI
311 (#xF9 ?\u03C9) ;; GREEK SMALL LETTER OMEGA
312 (#xFA ?\u03CA) ;; GREEK SMALL LETTER IOTA WITH DIALYTIKA
313 (#xFB ?\u03CB) ;; GREEK SMALL LETTER UPSILON WITH DIALYTIKA
314 (#xFC ?\u03CC) ;; GREEK SMALL LETTER OMICRON WITH TONOS
315 (#xFD ?\u03CD) ;; GREEK SMALL LETTER UPSILON WITH TONOS
316 (#xFE ?\u03CE)) ;; GREEK SMALL LETTER OMEGA WITH TONOS
317 "Microsoft's Code Page 1253, for monotonic Greek. "
318 '(mnemonic "GrkW"
319 documentation
320 "This ASCII-compatible encoding is slightly incompatibile with
249 ISO-8859-7; it provides several widely-used punctuation marks in the C1 321 ISO-8859-7; it provides several widely-used punctuation marks in the C1
250 ISO-2022 area, which makes it incompatbile with the latter standard, but 322 ISO-2022 area, which makes it incompatbile with the latter standard, but
251 that latter standard is not used in Greece, " 323 that latter standard is not used in Greece, "
252 aliases (cp1253)))) 324 aliases (cp1253)))
253 325
254 (set-language-info-alist 326 (set-language-info-alist
255 "Greek" '((charset greek-iso8859-7) 327 "Greek" '((charset greek-iso8859-7)
256 (coding-system iso-8859-7) 328 (coding-system iso-8859-7)
257 (coding-priority iso-8859-7) 329 (coding-priority iso-8859-7)