Mercurial > hg > xemacs-beta

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

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[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 b98680995adb
children 2e528ccfe690
comparison
equal deleted inserted replaced
4298:27150c937a22 4299:f4c3ffe60a4f
122 (#xDB #xFB) ;; U WITH DOUBLE ACUTE 122 (#xDB #xFB) ;; U WITH DOUBLE ACUTE
123 (#xDC #xFC) ;; U WITH DIAERESIS 123 (#xDC #xFC) ;; U WITH DIAERESIS
124 (#xDD #xFD) ;; Y WITH ACUTE 124 (#xDD #xFD) ;; Y WITH ACUTE
125 (#xDE #xFE))) ;; T WITH CEDILLA 125 (#xDE #xFE))) ;; T WITH CEDILLA
126 126
127 (make-coding-system 127 (make-8-bit-coding-system
128 'iso-8859-2 'iso2022 "ISO-8859-2 (Latin-2)" 128 'iso-8859-2
129 '(charset-g0 ascii 129 '((#xA1 ?\u0104) ;; LATIN CAPITAL LETTER A WITH OGONEK
130 charset-g1 latin-iso8859-2 130 (#xA2 ?\u02D8) ;; BREVE
131 charset-g2 t 131 (#xA3 ?\u0141) ;; LATIN CAPITAL LETTER L WITH STROKE
132 charset-g3 t 132 (#xA5 ?\u013D) ;; LATIN CAPITAL LETTER L WITH CARON
133 mnemonic "MIME/Ltn-2")) 133 (#xA6 ?\u015A) ;; LATIN CAPITAL LETTER S WITH ACUTE
134 134 (#xA9 ?\u0160) ;; LATIN CAPITAL LETTER S WITH CARON
135 (#xAA ?\u015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
136 (#xAB ?\u0164) ;; LATIN CAPITAL LETTER T WITH CARON
137 (#xAC ?\u0179) ;; LATIN CAPITAL LETTER Z WITH ACUTE
138 (#xAE ?\u017D) ;; LATIN CAPITAL LETTER Z WITH CARON
139 (#xAF ?\u017B) ;; LATIN CAPITAL LETTER Z WITH DOT ABOVE
140 (#xB1 ?\u0105) ;; LATIN SMALL LETTER A WITH OGONEK
141 (#xB2 ?\u02DB) ;; OGONEK
142 (#xB3 ?\u0142) ;; LATIN SMALL LETTER L WITH STROKE
143 (#xB5 ?\u013E) ;; LATIN SMALL LETTER L WITH CARON
144 (#xB6 ?\u015B) ;; LATIN SMALL LETTER S WITH ACUTE
145 (#xB7 ?\u02C7) ;; CARON
146 (#xB9 ?\u0161) ;; LATIN SMALL LETTER S WITH CARON
147 (#xBA ?\u015F) ;; LATIN SMALL LETTER S WITH CEDILLA
148 (#xBB ?\u0165) ;; LATIN SMALL LETTER T WITH CARON
149 (#xBC ?\u017A) ;; LATIN SMALL LETTER Z WITH ACUTE
150 (#xBD ?\u02DD) ;; DOUBLE ACUTE ACCENT
151 (#xBE ?\u017E) ;; LATIN SMALL LETTER Z WITH CARON
152 (#xBF ?\u017C) ;; LATIN SMALL LETTER Z WITH DOT ABOVE
153 (#xC0 ?\u0154) ;; LATIN CAPITAL LETTER R WITH ACUTE
154 (#xC3 ?\u0102) ;; LATIN CAPITAL LETTER A WITH BREVE
155 (#xC5 ?\u0139) ;; LATIN CAPITAL LETTER L WITH ACUTE
156 (#xC6 ?\u0106) ;; LATIN CAPITAL LETTER C WITH ACUTE
157 (#xC8 ?\u010C) ;; LATIN CAPITAL LETTER C WITH CARON
158 (#xCA ?\u0118) ;; LATIN CAPITAL LETTER E WITH OGONEK
159 (#xCC ?\u011A) ;; LATIN CAPITAL LETTER E WITH CARON
160 (#xCF ?\u010E) ;; LATIN CAPITAL LETTER D WITH CARON
161 (#xD0 ?\u0110) ;; LATIN CAPITAL LETTER D WITH STROKE
162 (#xD1 ?\u0143) ;; LATIN CAPITAL LETTER N WITH ACUTE
163 (#xD2 ?\u0147) ;; LATIN CAPITAL LETTER N WITH CARON
164 (#xD5 ?\u0150) ;; LATIN CAPITAL LETTER O WITH DOUBLE ACUTE
165 (#xD8 ?\u0158) ;; LATIN CAPITAL LETTER R WITH CARON
166 (#xD9 ?\u016E) ;; LATIN CAPITAL LETTER U WITH RING ABOVE
167 (#xDB ?\u0170) ;; LATIN CAPITAL LETTER U WITH DOUBLE ACUTE
168 (#xDE ?\u0162) ;; LATIN CAPITAL LETTER T WITH CEDILLA
169 (#xE0 ?\u0155) ;; LATIN SMALL LETTER R WITH ACUTE
170 (#xE3 ?\u0103) ;; LATIN SMALL LETTER A WITH BREVE
171 (#xE5 ?\u013A) ;; LATIN SMALL LETTER L WITH ACUTE
172 (#xE6 ?\u0107) ;; LATIN SMALL LETTER C WITH ACUTE
173 (#xE8 ?\u010D) ;; LATIN SMALL LETTER C WITH CARON
174 (#xEA ?\u0119) ;; LATIN SMALL LETTER E WITH OGONEK
175 (#xEC ?\u011B) ;; LATIN SMALL LETTER E WITH CARON
176 (#xEF ?\u010F) ;; LATIN SMALL LETTER D WITH CARON
177 (#xF0 ?\u0111) ;; LATIN SMALL LETTER D WITH STROKE
178 (#xF1 ?\u0144) ;; LATIN SMALL LETTER N WITH ACUTE
179 (#xF2 ?\u0148) ;; LATIN SMALL LETTER N WITH CARON
180 (#xF5 ?\u0151) ;; LATIN SMALL LETTER O WITH DOUBLE ACUTE
181 (#xF8 ?\u0159) ;; LATIN SMALL LETTER R WITH CARON
182 (#xF9 ?\u016F) ;; LATIN SMALL LETTER U WITH RING ABOVE
183 (#xFB ?\u0171) ;; LATIN SMALL LETTER U WITH DOUBLE ACUTE
184 (#xFE ?\u0163) ;; LATIN SMALL LETTER T WITH CEDILLA
185 (#xFF ?\u02D9));; DOT ABOVE
186 "ISO-8859-2 (Latin-2) for Central Europe.
187 See also `windows-1250', and `iso-8859-1', which is compatible with Latin 2
188 when used to write German (or English, of course). "
189 '(mnemonic "Latin 2"
190 aliases (iso-latin-2 latin-2)))
135 191
136 ;; 192 ;;
137 ;; Latin-3 (ISO-8859-3). Esperanto, Maltese and Turkish. Obsolescent. 193 ;; Latin-3 (ISO-8859-3). Esperanto, Maltese and Turkish. Obsolescent.
138 194
139 ;; Initialise the non-word syntax codes in ISO-8859-3, copying them from 195 ;; Initialise the non-word syntax codes in ISO-8859-3, copying them from
200 (#xDB #xFB) ;; U WITH CIRCUMFLEX 256 (#xDB #xFB) ;; U WITH CIRCUMFLEX
201 (#xDC #xFC) ;; U WITH DIAERESIS 257 (#xDC #xFC) ;; U WITH DIAERESIS
202 (#xDD #xFD) ;; U WITH BREVE 258 (#xDD #xFD) ;; U WITH BREVE
203 (#xDE #xFE))) ;; S WITH CIRCUMFLEX 259 (#xDE #xFE))) ;; S WITH CIRCUMFLEX
204 260
205 (make-coding-system 261 (make-8-bit-coding-system
206 'iso-8859-3 'iso2022 "ISO-8859-3 (Latin-3)" 262 'iso-8859-3
207 '(charset-g0 ascii 263 '((#xA1 ?\u0126) ;; LATIN CAPITAL LETTER H WITH STROKE
208 charset-g1 latin-iso8859-3 264 (#xA2 ?\u02D8) ;; BREVE
209 charset-g2 t 265 (#xA6 ?\u0124) ;; LATIN CAPITAL LETTER H WITH CIRCUMFLEX
210 charset-g3 t 266 (#xA9 ?\u0130) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE
211 mnemonic "MIME/Ltn-3")) 267 (#xAA ?\u015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
268 (#xAB ?\u011E) ;; LATIN CAPITAL LETTER G WITH BREVE
269 (#xAC ?\u0134) ;; LATIN CAPITAL LETTER J WITH CIRCUMFLEX
270 (#xAF ?\u017B) ;; LATIN CAPITAL LETTER Z WITH DOT ABOVE
271 (#xB1 ?\u0127) ;; LATIN SMALL LETTER H WITH STROKE
272 (#xB6 ?\u0125) ;; LATIN SMALL LETTER H WITH CIRCUMFLEX
273 (#xB9 ?\u0131) ;; LATIN SMALL LETTER DOTLESS I
274 (#xBA ?\u015F) ;; LATIN SMALL LETTER S WITH CEDILLA
275 (#xBB ?\u011F) ;; LATIN SMALL LETTER G WITH BREVE
276 (#xBC ?\u0135) ;; LATIN SMALL LETTER J WITH CIRCUMFLEX
277 (#xBF ?\u017C) ;; LATIN SMALL LETTER Z WITH DOT ABOVE
278 (#xC5 ?\u010A) ;; LATIN CAPITAL LETTER C WITH DOT ABOVE
279 (#xC6 ?\u0108) ;; LATIN CAPITAL LETTER C WITH CIRCUMFLEX
280 (#xD5 ?\u0120) ;; LATIN CAPITAL LETTER G WITH DOT ABOVE
281 (#xD8 ?\u011C) ;; LATIN CAPITAL LETTER G WITH CIRCUMFLEX
282 (#xDD ?\u016C) ;; LATIN CAPITAL LETTER U WITH BREVE
283 (#xDE ?\u015C) ;; LATIN CAPITAL LETTER S WITH CIRCUMFLEX
284 (#xE5 ?\u010B) ;; LATIN SMALL LETTER C WITH DOT ABOVE
285 (#xE6 ?\u0109) ;; LATIN SMALL LETTER C WITH CIRCUMFLEX
286 (#xF5 ?\u0121) ;; LATIN SMALL LETTER G WITH DOT ABOVE
287 (#xF8 ?\u011D) ;; LATIN SMALL LETTER G WITH CIRCUMFLEX
288 (#xFD ?\u016D) ;; LATIN SMALL LETTER U WITH BREVE
289 (#xFE ?\u015D) ;; LATIN SMALL LETTER S WITH CIRCUMFLEX
290 (#xFF ?\u02D9)) ;; DOT ABOVE
291 "ISO-8859-3 (Latin-3)"
292 '(mnemonic "Latin 3"
293 documentation "Aimed at Turkish, Maltese and Esperanto. "
294 aliases (iso-latin-3 latin-3)))
212 295
213 296
214 ;; Latin-4 (ISO-8859-4) 297 ;; Latin-4 (ISO-8859-4)
215 298
216 ;; Estonian, Latvian, Lithuanian, Greenlandic, and Sami. Obsolescent. 299 ;; Estonian, Latvian, Lithuanian, Greenlandic, and Sami. Obsolescent.
280 (#xDB #xFB) ;; U WITH CIRCUMFLEX 363 (#xDB #xFB) ;; U WITH CIRCUMFLEX
281 (#xDC #xFC) ;; U WITH DIAERESIS 364 (#xDC #xFC) ;; U WITH DIAERESIS
282 (#xDD #xFD) ;; U WITH TILDE 365 (#xDD #xFD) ;; U WITH TILDE
283 (#xDE #xFE))) ;; U WITH MACRON 366 (#xDE #xFE))) ;; U WITH MACRON
284 367
285 (make-coding-system 368 (make-8-bit-coding-system
286 'iso-8859-4 'iso2022 "ISO-8859-4 (Latin-4)" 369 'iso-8859-4
287 '(charset-g0 ascii 370 '((#xA1 ?\u0104) ;; LATIN CAPITAL LETTER A WITH OGONEK
288 charset-g1 latin-iso8859-4 371 (#xA2 ?\u0138) ;; LATIN SMALL LETTER KRA
289 charset-g2 t 372 (#xA3 ?\u0156) ;; LATIN CAPITAL LETTER R WITH CEDILLA
290 charset-g3 t 373 (#xA5 ?\u0128) ;; LATIN CAPITAL LETTER I WITH TILDE
291 mnemonic "MIME/Ltn-4")) 374 (#xA6 ?\u013B) ;; LATIN CAPITAL LETTER L WITH CEDILLA
375 (#xA9 ?\u0160) ;; LATIN CAPITAL LETTER S WITH CARON
376 (#xAA ?\u0112) ;; LATIN CAPITAL LETTER E WITH MACRON
377 (#xAB ?\u0122) ;; LATIN CAPITAL LETTER G WITH CEDILLA
378 (#xAC ?\u0166) ;; LATIN CAPITAL LETTER T WITH STROKE
379 (#xAE ?\u017D) ;; LATIN CAPITAL LETTER Z WITH CARON
380 (#xB1 ?\u0105) ;; LATIN SMALL LETTER A WITH OGONEK
381 (#xB2 ?\u02DB) ;; OGONEK
382 (#xB3 ?\u0157) ;; LATIN SMALL LETTER R WITH CEDILLA
383 (#xB5 ?\u0129) ;; LATIN SMALL LETTER I WITH TILDE
384 (#xB6 ?\u013C) ;; LATIN SMALL LETTER L WITH CEDILLA
385 (#xB7 ?\u02C7) ;; CARON
386 (#xB9 ?\u0161) ;; LATIN SMALL LETTER S WITH CARON
387 (#xBA ?\u0113) ;; LATIN SMALL LETTER E WITH MACRON
388 (#xBB ?\u0123) ;; LATIN SMALL LETTER G WITH CEDILLA
389 (#xBC ?\u0167) ;; LATIN SMALL LETTER T WITH STROKE
390 (#xBD ?\u014A) ;; LATIN CAPITAL LETTER ENG
391 (#xBE ?\u017E) ;; LATIN SMALL LETTER Z WITH CARON
392 (#xBF ?\u014B) ;; LATIN SMALL LETTER ENG
393 (#xC0 ?\u0100) ;; LATIN CAPITAL LETTER A WITH MACRON
394 (#xC7 ?\u012E) ;; LATIN CAPITAL LETTER I WITH OGONEK
395 (#xC8 ?\u010C) ;; LATIN CAPITAL LETTER C WITH CARON
396 (#xCA ?\u0118) ;; LATIN CAPITAL LETTER E WITH OGONEK
397 (#xCC ?\u0116) ;; LATIN CAPITAL LETTER E WITH DOT ABOVE
398 (#xCF ?\u012A) ;; LATIN CAPITAL LETTER I WITH MACRON
399 (#xD0 ?\u0110) ;; LATIN CAPITAL LETTER D WITH STROKE
400 (#xD1 ?\u0145) ;; LATIN CAPITAL LETTER N WITH CEDILLA
401 (#xD2 ?\u014C) ;; LATIN CAPITAL LETTER O WITH MACRON
402 (#xD3 ?\u0136) ;; LATIN CAPITAL LETTER K WITH CEDILLA
403 (#xD9 ?\u0172) ;; LATIN CAPITAL LETTER U WITH OGONEK
404 (#xDD ?\u0168) ;; LATIN CAPITAL LETTER U WITH TILDE
405 (#xDE ?\u016A) ;; LATIN CAPITAL LETTER U WITH MACRON
406 (#xE0 ?\u0101) ;; LATIN SMALL LETTER A WITH MACRON
407 (#xE7 ?\u012F) ;; LATIN SMALL LETTER I WITH OGONEK
408 (#xE8 ?\u010D) ;; LATIN SMALL LETTER C WITH CARON
409 (#xEA ?\u0119) ;; LATIN SMALL LETTER E WITH OGONEK
410 (#xEC ?\u0117) ;; LATIN SMALL LETTER E WITH DOT ABOVE
411 (#xEF ?\u012B) ;; LATIN SMALL LETTER I WITH MACRON
412 (#xF0 ?\u0111) ;; LATIN SMALL LETTER D WITH STROKE
413 (#xF1 ?\u0146) ;; LATIN SMALL LETTER N WITH CEDILLA
414 (#xF2 ?\u014D) ;; LATIN SMALL LETTER O WITH MACRON
415 (#xF3 ?\u0137) ;; LATIN SMALL LETTER K WITH CEDILLA
416 (#xF9 ?\u0173) ;; LATIN SMALL LETTER U WITH OGONEK
417 (#xFD ?\u0169) ;; LATIN SMALL LETTER U WITH TILDE
418 (#xFE ?\u016B) ;; LATIN SMALL LETTER U WITH MACRON
419 (#xFF ?\u02D9));; DOT ABOVE
420 "ISO-8859-4 (Latin-4)"
421 '(mnemonic "Latin 4"
422 aliases (iso-latin-4 latin-4)
423 documentation "Obsolete coding system for the Baltic rim. "))
292 424
293 425
294 ;; Latin-8 (ISO 8859-14) Celtic. 426 ;; Latin-8 (ISO 8859-14) Celtic.
295 427
296 ;; Never widely used. Current-orthography Gaelic, both Irish and Scots, is 428 ;; Never widely used. Current-orthography Gaelic, both Irish and Scots, is
438 (#xDB #xFB) ;; U WITH CIRCUMFLEX 570 (#xDB #xFB) ;; U WITH CIRCUMFLEX
439 (#xDC #xFC) ;; U WITH DIAERESIS 571 (#xDC #xFC) ;; U WITH DIAERESIS
440 (#xDD #xFD) ;; Y WITH ACUTE 572 (#xDD #xFD) ;; Y WITH ACUTE
441 (#xDE #xFE))) ;; THORN 573 (#xDE #xFE))) ;; THORN
442 574
443 (make-coding-system 575 (make-8-bit-coding-system
444 'iso-8859-15 'iso2022 576 'iso-8859-15
445 "ISO 4873 conforming 8-bit code (ASCII + Latin 9; aka Latin-1 with Euro)" 577 '((#xA4 ?\u20AC) ;; EURO SIGN
446 '(mnemonic "MIME/Ltn-9" ; bletch 578 (#xA6 ?\u0160) ;; LATIN CAPITAL LETTER S WITH CARON
447 eol-type nil 579 (#xA8 ?\u0161) ;; LATIN SMALL LETTER S WITH CARON
448 charset-g0 ascii 580 (#xB4 ?\u017D) ;; LATIN CAPITAL LETTER Z WITH CARON
449 charset-g1 latin-iso8859-15 581 (#xB8 ?\u017E) ;; LATIN SMALL LETTER Z WITH CARON
450 charset-g2 t 582 (#xBC ?\u0152) ;; LATIN CAPITAL LIGATURE OE
451 charset-g3 t)) 583 (#xBD ?\u0153) ;; LATIN SMALL LIGATURE OE
584 (#xBE ?\u0178)) ;; LATIN CAPITAL LETTER Y WITH DIAERESIS
585 "ISO 4873 conforming 8-bit code (ASCII + Latin 9; aka Latin-1 with Euro)"
586 '(mnemonic "Latin 9"
587 aliases (iso-latin-9 latin-9 latin-0)))
452 588
453 ;; end of ISO 8859-15. 589 ;; end of ISO 8859-15.
454 590
455 ;; 591 ;;
456 ;; Latin-10 (ISO 8859-16). 592 ;; Latin-10 (ISO 8859-16).
544 (#xDC #xFC) ;; U WITH DIAERESIS 680 (#xDC #xFC) ;; U WITH DIAERESIS
545 (#xDD #xFD) ;; E WITH OGONEK 681 (#xDD #xFD) ;; E WITH OGONEK
546 (#xDE #xFE))) ;; T WITH COMMA BELOW 682 (#xDE #xFE))) ;; T WITH COMMA BELOW
547 683
548 ;; Add a coding system for ISO 8859-16. 684 ;; Add a coding system for ISO 8859-16.
549 (make-coding-system 685 (make-8-bit-coding-system
550 'iso-8859-16 'iso2022 "MIME ISO-8859-16" 686 'iso-8859-16
551 '(charset-g0 ascii 687 '((#xA1 ?\u0104) ;; LATIN CAPITAL LETTER A WITH OGONEK
552 charset-g1 latin-iso8859-16 688 (#xA2 ?\u0105) ;; LATIN SMALL LETTER A WITH OGONEK
553 charset-g2 t ; grrr 689 (#xA3 ?\u0141) ;; LATIN CAPITAL LETTER L WITH STROKE
554 charset-g3 t ; grrr 690 (#xA4 ?\u20AC) ;; EURO SIGN
555 mnemonic "MIME/Ltn-10")) 691 (#xA5 ?\u201E) ;; DOUBLE LOW-9 QUOTATION MARK
692 (#xA6 ?\u0160) ;; LATIN CAPITAL LETTER S WITH CARON
693 (#xA8 ?\u0161) ;; LATIN SMALL LETTER S WITH CARON
694 (#xAA ?\u0218) ;; LATIN CAPITAL LETTER S WITH COMMA BELOW
695 (#xAC ?\u0179) ;; LATIN CAPITAL LETTER Z WITH ACUTE
696 (#xAE ?\u017A) ;; LATIN SMALL LETTER Z WITH ACUTE
697 (#xAF ?\u017B) ;; LATIN CAPITAL LETTER Z WITH DOT ABOVE
698 (#xB2 ?\u010C) ;; LATIN CAPITAL LETTER C WITH CARON
699 (#xB3 ?\u0142) ;; LATIN SMALL LETTER L WITH STROKE
700 (#xB4 ?\u017D) ;; LATIN CAPITAL LETTER Z WITH CARON
701 (#xB5 ?\u201D) ;; RIGHT DOUBLE QUOTATION MARK
702 (#xB8 ?\u017E) ;; LATIN SMALL LETTER Z WITH CARON
703 (#xB9 ?\u010D) ;; LATIN SMALL LETTER C WITH CARON
704 (#xBA ?\u0219) ;; LATIN SMALL LETTER S WITH COMMA BELOW
705 (#xBC ?\u0152) ;; LATIN CAPITAL LIGATURE OE
706 (#xBD ?\u0153) ;; LATIN SMALL LIGATURE OE
707 (#xBE ?\u0178) ;; LATIN CAPITAL LETTER Y WITH DIAERESIS
708 (#xBF ?\u017C) ;; LATIN SMALL LETTER Z WITH DOT ABOVE
709 (#xC3 ?\u0102) ;; LATIN CAPITAL LETTER A WITH BREVE
710 (#xC5 ?\u0106) ;; LATIN CAPITAL LETTER C WITH ACUTE
711 (#xD0 ?\u0110) ;; LATIN CAPITAL LETTER D WITH STROKE
712 (#xD1 ?\u0143) ;; LATIN CAPITAL LETTER N WITH ACUTE
713 (#xD5 ?\u0150) ;; LATIN CAPITAL LETTER O WITH DOUBLE ACUTE
714 (#xD7 ?\u015A) ;; LATIN CAPITAL LETTER S WITH ACUTE
715 (#xD8 ?\u0170) ;; LATIN CAPITAL LETTER U WITH DOUBLE ACUTE
716 (#xDD ?\u0118) ;; LATIN CAPITAL LETTER E WITH OGONEK
717 (#xDE ?\u021A) ;; LATIN CAPITAL LETTER T WITH COMMA BELOW
718 (#xE3 ?\u0103) ;; LATIN SMALL LETTER A WITH BREVE
719 (#xE5 ?\u0107) ;; LATIN SMALL LETTER C WITH ACUTE
720 (#xF0 ?\u0111) ;; LATIN SMALL LETTER D WITH STROKE
721 (#xF1 ?\u0144) ;; LATIN SMALL LETTER N WITH ACUTE
722 (#xF5 ?\u0151) ;; LATIN SMALL LETTER O WITH DOUBLE ACUTE
723 (#xF7 ?\u015B) ;; LATIN SMALL LETTER S WITH ACUTE
724 (#xF8 ?\u0171) ;; LATIN SMALL LETTER U WITH DOUBLE ACUTE
725 (#xFD ?\u0119) ;; LATIN SMALL LETTER E WITH OGONEK
726 (#xFE ?\u021B)) ;; LATIN SMALL LETTER T WITH COMMA BELOW
727 "ISO-8859-16 (Latin-10)"
728 '(mnemonic "Latin 10"
729 aliases (iso-latin-10)))
556 730
557 ;; end of ISO 8859-16. 731 ;; end of ISO 8859-16.
558 732
559 733
560 (provide 'romanian) 734 (provide 'romanian)
626 ;; LATIN SMALL LETTER DOTLESS I 800 ;; LATIN SMALL LETTER DOTLESS I
627 (put-case-table 'upcase 801 (put-case-table 'upcase
628 (make-char 'latin-iso8859-9 #xfd) 802 (make-char 'latin-iso8859-9 #xfd)
629 ?I (standard-case-table)) 803 ?I (standard-case-table))
630 804
631 (make-coding-system 805 (make-8-bit-coding-system
632 'iso-8859-9 'iso2022 "ISO-8859-9 (Latin-5)" 806 'iso-8859-9
633 '(charset-g0 ascii 807 '((#xD0 ?\u011E) ;; LATIN CAPITAL LETTER G WITH BREVE
634 charset-g1 latin-iso8859-9 808 (#xDD ?\u0130) ;; LATIN CAPITAL LETTER I WITH DOT ABOVE
635 charset-g2 t 809 (#xDE ?\u015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
636 charset-g3 t 810 (#xF0 ?\u011F) ;; LATIN SMALL LETTER G WITH BREVE
637 mnemonic "MIME/Ltn-5")) 811 (#xFD ?\u0131) ;; LATIN SMALL LETTER DOTLESS I
812 (#xFE ?\u015F)) ;; LATIN SMALL LETTER S WITH CEDILLA
813 "ISO-8859-9 (Latin-5)"
814 '(mnemonic "Latin 5"
815 aliases (iso-latin-5 latin-5)))
638 816
639 ;; end of ISO-8859-9 817 ;; end of ISO-8859-9
640 818
641 ;; This is a utility function; we don't want it in the dumped XEmacs. 819 ;; This is a utility function; we don't want it in the dumped XEmacs.
642 820