src/code/external-formats/enc-iso.lisp

   1 (in-package "SB!IMPL")
   2
   3 (define-unibyte-mapping-external-format :iso-8859-2
   4     (:|iso-8859-2| :latin-2 :|latin-2|)
   5   (#xA1 #x0104) ; LATIN CAPITAL LETTER A WITH OGONEK
   6   (#xA2 #x02D8) ; BREVE
   7   (#xA3 #x0141) ; LATIN CAPITAL LETTER L WITH STROKE
   8   (#xA5 #x013D) ; LATIN CAPITAL LETTER L WITH CARON
   9   (#xA6 #x015A) ; LATIN CAPITAL LETTER S WITH ACUTE
  10   (#xA9 #x0160) ; LATIN CAPITAL LETTER S WITH CARON
  11   (#xAA #x015E) ; LATIN CAPITAL LETTER S WITH CEDILLA
  12   (#xAB #x0164) ; LATIN CAPITAL LETTER T WITH CARON
  13   (#xAC #x0179) ; LATIN CAPITAL LETTER Z WITH ACUTE
  14   (#xAE #x017D) ; LATIN CAPITAL LETTER Z WITH CARON
  15   (#xAF #x017B) ; LATIN CAPITAL LETTER Z WITH DOT ABOVE
  16   (#xB1 #x0105) ; LATIN SMALL LETTER A WITH OGONEK
  17   (#xB2 #x02DB) ; OGONEK
  18   (#xB3 #x0142) ; LATIN SMALL LETTER L WITH STROKE
  19   (#xB5 #x013E) ; LATIN SMALL LETTER L WITH CARON
  20   (#xB6 #x015B) ; LATIN SMALL LETTER S WITH ACUTE
  21   (#xB7 #x02C7) ; CARON
  22   (#xB9 #x0161) ; LATIN SMALL LETTER S WITH CARON
  23   (#xBA #x015F) ; LATIN SMALL LETTER S WITH CEDILLA
  24   (#xBB #x0165) ; LATIN SMALL LETTER T WITH CARON
  25   (#xBC #x017A) ; LATIN SMALL LETTER Z WITH ACUTE
  26   (#xBD #x02DD) ; DOUBLE ACUTE ACCENT
  27   (#xBE #x017E) ; LATIN SMALL LETTER Z WITH CARON
  28   (#xBF #x017C) ; LATIN SMALL LETTER Z WITH DOT ABOVE
  29   (#xC0 #x0154) ; LATIN CAPITAL LETTER R WITH ACUTE
  30   (#xC3 #x0102) ; LATIN CAPITAL LETTER A WITH BREVE
  31   (#xC5 #x0139) ; LATIN CAPITAL LETTER L WITH ACUTE
  32   (#xC6 #x0106) ; LATIN CAPITAL LETTER C WITH ACUTE
  33   (#xC8 #x010C) ; LATIN CAPITAL LETTER C WITH CARON
  34   (#xCA #x0118) ; LATIN CAPITAL LETTER E WITH OGONEK
  35   (#xCC #x011A) ; LATIN CAPITAL LETTER E WITH CARON
  36   (#xCF #x010E) ; LATIN CAPITAL LETTER D WITH CARON
  37   (#xD0 #x0110) ; LATIN CAPITAL LETTER D WITH STROKE
  38   (#xD1 #x0143) ; LATIN CAPITAL LETTER N WITH ACUTE
  39   (#xD2 #x0147) ; LATIN CAPITAL LETTER N WITH CARON
  40   (#xD5 #x0150) ; LATIN CAPITAL LETTER O WITH DOUBLE ACUTE
  41   (#xD8 #x0158) ; LATIN CAPITAL LETTER R WITH CARON
  42   (#xD9 #x016E) ; LATIN CAPITAL LETTER U WITH RING ABOVE
  43   (#xDB #x0170) ; LATIN CAPITAL LETTER U WITH DOUBLE ACUTE
  44   (#xDE #x0162) ; LATIN CAPITAL LETTER T WITH CEDILLA
  45   (#xE0 #x0155) ; LATIN SMALL LETTER R WITH ACUTE
  46   (#xE3 #x0103) ; LATIN SMALL LETTER A WITH BREVE
  47   (#xE5 #x013A) ; LATIN SMALL LETTER L WITH ACUTE
  48   (#xE6 #x0107) ; LATIN SMALL LETTER C WITH ACUTE
  49   (#xE8 #x010D) ; LATIN SMALL LETTER C WITH CARON
  50   (#xEA #x0119) ; LATIN SMALL LETTER E WITH OGONEK
  51   (#xEC #x011B) ; LATIN SMALL LETTER E WITH CARON
  52   (#xEF #x010F) ; LATIN SMALL LETTER D WITH CARON
  53   (#xF0 #x0111) ; LATIN SMALL LETTER D WITH STROKE
  54   (#xF1 #x0144) ; LATIN SMALL LETTER N WITH ACUTE
  55   (#xF2 #x0148) ; LATIN SMALL LETTER N WITH CARON
  56   (#xF5 #x0151) ; LATIN SMALL LETTER O WITH DOUBLE ACUTE
  57   (#xF8 #x0159) ; LATIN SMALL LETTER R WITH CARON
  58   (#xF9 #x016F) ; LATIN SMALL LETTER U WITH RING ABOVE
  59   (#xFB #x0171) ; LATIN SMALL LETTER U WITH DOUBLE ACUTE
  60   (#xFE #x0163) ; LATIN SMALL LETTER T WITH CEDILLA
  61   (#xFF #x02D9) ; DOT ABOVE
  62 )
  63
  64 (define-unibyte-mapping-external-format :iso-8859-3
  65     (:|iso-8859-3| :latin-3 :|latin-3|)
  66   (#xA1 #x0126) ; LATIN CAPITAL LETTER H WITH STROKE
  67   (#xA2 #x02D8) ; BREVE
  68   (#xA5 nil)
  69   (#xA6 #x0124) ; LATIN CAPITAL LETTER H WITH CIRCUMFLEX
  70   (#xA9 #x0130) ; LATIN CAPITAL LETTER I WITH DOT ABOVE
  71   (#xAA #x015E) ; LATIN CAPITAL LETTER S WITH CEDILLA
  72   (#xAB #x011E) ; LATIN CAPITAL LETTER G WITH BREVE
  73   (#xAC #x0134) ; LATIN CAPITAL LETTER J WITH CIRCUMFLEX
  74   (#xAE nil)
  75   (#xAF #x017B) ; LATIN CAPITAL LETTER Z WITH DOT ABOVE
  76   (#xB1 #x0127) ; LATIN SMALL LETTER H WITH STROKE
  77   (#xB6 #x0125) ; LATIN SMALL LETTER H WITH CIRCUMFLEX
  78   (#xB9 #x0131) ; LATIN SMALL LETTER DOTLESS I
  79   (#xBA #x015F) ; LATIN SMALL LETTER S WITH CEDILLA
  80   (#xBB #x011F) ; LATIN SMALL LETTER G WITH BREVE
  81   (#xBC #x0135) ; LATIN SMALL LETTER J WITH CIRCUMFLEX
  82   (#xBE nil)
  83   (#xBF #x017C) ; LATIN SMALL LETTER Z WITH DOT ABOVE
  84   (#xC3 nil)
  85   (#xC5 #x010A) ; LATIN CAPITAL LETTER C WITH DOT ABOVE
  86   (#xC6 #x0108) ; LATIN CAPITAL LETTER C WITH CIRCUMFLEX
  87   (#xD0 nil)
  88   (#xD5 #x0120) ; LATIN CAPITAL LETTER G WITH DOT ABOVE
  89   (#xD8 #x011C) ; LATIN CAPITAL LETTER G WITH CIRCUMFLEX
  90   (#xDD #x016C) ; LATIN CAPITAL LETTER U WITH BREVE
  91   (#xDE #x015C) ; LATIN CAPITAL LETTER S WITH CIRCUMFLEX
  92   (#xE3 nil)
  93   (#xE5 #x010B) ; LATIN SMALL LETTER C WITH DOT ABOVE
  94   (#xE6 #x0109) ; LATIN SMALL LETTER C WITH CIRCUMFLEX
  95   (#xF0 nil)
  96   (#xF5 #x0121) ; LATIN SMALL LETTER G WITH DOT ABOVE
  97   (#xF8 #x011D) ; LATIN SMALL LETTER G WITH CIRCUMFLEX
  98   (#xFD #x016D) ; LATIN SMALL LETTER U WITH BREVE
  99   (#xFE #x015D) ; LATIN SMALL LETTER S WITH CIRCUMFLEX
 100   (#xFF #x02D9) ; DOT ABOVE
 101 )
 102
 103 (define-unibyte-mapping-external-format :iso-8859-4
 104     (:|iso-8859-4| :latin-4 :|latin-4|)
 105   (#xA1 #x0104) ; LATIN CAPITAL LETTER A WITH OGONEK
 106   (#xA2 #x0138) ; LATIN SMALL LETTER KRA
 107   (#xA3 #x0156) ; LATIN CAPITAL LETTER R WITH CEDILLA
 108   (#xA5 #x0128) ; LATIN CAPITAL LETTER I WITH TILDE
 109   (#xA6 #x013B) ; LATIN CAPITAL LETTER L WITH CEDILLA
 110   (#xA9 #x0160) ; LATIN CAPITAL LETTER S WITH CARON
 111   (#xAA #x0112) ; LATIN CAPITAL LETTER E WITH MACRON
 112   (#xAB #x0122) ; LATIN CAPITAL LETTER G WITH CEDILLA
 113   (#xAC #x0166) ; LATIN CAPITAL LETTER T WITH STROKE
 114   (#xAE #x017D) ; LATIN CAPITAL LETTER Z WITH CARON
 115   (#xB1 #x0105) ; LATIN SMALL LETTER A WITH OGONEK
 116   (#xB2 #x02DB) ; OGONEK
 117   (#xB3 #x0157) ; LATIN SMALL LETTER R WITH CEDILLA
 118   (#xB5 #x0129) ; LATIN SMALL LETTER I WITH TILDE
 119   (#xB6 #x013C) ; LATIN SMALL LETTER L WITH CEDILLA
 120   (#xB7 #x02C7) ; CARON
 121   (#xB9 #x0161) ; LATIN SMALL LETTER S WITH CARON
 122   (#xBA #x0113) ; LATIN SMALL LETTER E WITH MACRON
 123   (#xBB #x0123) ; LATIN SMALL LETTER G WITH CEDILLA
 124   (#xBC #x0167) ; LATIN SMALL LETTER T WITH STROKE
 125   (#xBD #x014A) ; LATIN CAPITAL LETTER ENG
 126   (#xBE #x017E) ; LATIN SMALL LETTER Z WITH CARON
 127   (#xBF #x014B) ; LATIN SMALL LETTER ENG
 128   (#xC0 #x0100) ; LATIN CAPITAL LETTER A WITH MACRON
 129   (#xC7 #x012E) ; LATIN CAPITAL LETTER I WITH OGONEK
 130   (#xC8 #x010C) ; LATIN CAPITAL LETTER C WITH CARON
 131   (#xCA #x0118) ; LATIN CAPITAL LETTER E WITH OGONEK
 132   (#xCC #x0116) ; LATIN CAPITAL LETTER E WITH DOT ABOVE
 133   (#xCF #x012A) ; LATIN CAPITAL LETTER I WITH MACRON
 134   (#xD0 #x0110) ; LATIN CAPITAL LETTER D WITH STROKE
 135   (#xD1 #x0145) ; LATIN CAPITAL LETTER N WITH CEDILLA
 136   (#xD2 #x014C) ; LATIN CAPITAL LETTER O WITH MACRON
 137   (#xD3 #x0136) ; LATIN CAPITAL LETTER K WITH CEDILLA
 138   (#xD9 #x0172) ; LATIN CAPITAL LETTER U WITH OGONEK
 139   (#xDD #x0168) ; LATIN CAPITAL LETTER U WITH TILDE
 140   (#xDE #x016A) ; LATIN CAPITAL LETTER U WITH MACRON
 141   (#xE0 #x0101) ; LATIN SMALL LETTER A WITH MACRON
 142   (#xE7 #x012F) ; LATIN SMALL LETTER I WITH OGONEK
 143   (#xE8 #x010D) ; LATIN SMALL LETTER C WITH CARON
 144   (#xEA #x0119) ; LATIN SMALL LETTER E WITH OGONEK
 145   (#xEC #x0117) ; LATIN SMALL LETTER E WITH DOT ABOVE
 146   (#xEF #x012B) ; LATIN SMALL LETTER I WITH MACRON
 147   (#xF0 #x0111) ; LATIN SMALL LETTER D WITH STROKE
 148   (#xF1 #x0146) ; LATIN SMALL LETTER N WITH CEDILLA
 149   (#xF2 #x014D) ; LATIN SMALL LETTER O WITH MACRON
 150   (#xF3 #x0137) ; LATIN SMALL LETTER K WITH CEDILLA
 151   (#xF9 #x0173) ; LATIN SMALL LETTER U WITH OGONEK
 152   (#xFD #x0169) ; LATIN SMALL LETTER U WITH TILDE
 153   (#xFE #x016B) ; LATIN SMALL LETTER U WITH MACRON
 154   (#xFF #x02D9) ; DOT ABOVE
 155 )
 156
 157 (define-unibyte-mapping-external-format :iso-8859-5 (:|iso-8859-5|)
 158   (#xA1 #x0401) ; CYRILLIC CAPITAL LETTER IO
 159   (#xA2 #x0402) ; CYRILLIC CAPITAL LETTER DJE
 160   (#xA3 #x0403) ; CYRILLIC CAPITAL LETTER GJE
 161   (#xA4 #x0404) ; CYRILLIC CAPITAL LETTER UKRAINIAN IE
 162   (#xA5 #x0405) ; CYRILLIC CAPITAL LETTER DZE
 163   (#xA6 #x0406) ; CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
 164   (#xA7 #x0407) ; CYRILLIC CAPITAL LETTER YI
 165   (#xA8 #x0408) ; CYRILLIC CAPITAL LETTER JE
 166   (#xA9 #x0409) ; CYRILLIC CAPITAL LETTER LJE
 167   (#xAA #x040A) ; CYRILLIC CAPITAL LETTER NJE
 168   (#xAB #x040B) ; CYRILLIC CAPITAL LETTER TSHE
 169   (#xAC #x040C) ; CYRILLIC CAPITAL LETTER KJE
 170   (#xAE #x040E) ; CYRILLIC CAPITAL LETTER SHORT U
 171   (#xAF #x040F) ; CYRILLIC CAPITAL LETTER DZHE
 172   (#xB0 #x0410) ; CYRILLIC CAPITAL LETTER A
 173   (#xB1 #x0411) ; CYRILLIC CAPITAL LETTER BE
 174   (#xB2 #x0412) ; CYRILLIC CAPITAL LETTER VE
 175   (#xB3 #x0413) ; CYRILLIC CAPITAL LETTER GHE
 176   (#xB4 #x0414) ; CYRILLIC CAPITAL LETTER DE
 177   (#xB5 #x0415) ; CYRILLIC CAPITAL LETTER IE
 178   (#xB6 #x0416) ; CYRILLIC CAPITAL LETTER ZHE
 179   (#xB7 #x0417) ; CYRILLIC CAPITAL LETTER ZE
 180   (#xB8 #x0418) ; CYRILLIC CAPITAL LETTER I
 181   (#xB9 #x0419) ; CYRILLIC CAPITAL LETTER SHORT I
 182   (#xBA #x041A) ; CYRILLIC CAPITAL LETTER KA
 183   (#xBB #x041B) ; CYRILLIC CAPITAL LETTER EL
 184   (#xBC #x041C) ; CYRILLIC CAPITAL LETTER EM
 185   (#xBD #x041D) ; CYRILLIC CAPITAL LETTER EN
 186   (#xBE #x041E) ; CYRILLIC CAPITAL LETTER O
 187   (#xBF #x041F) ; CYRILLIC CAPITAL LETTER PE
 188   (#xC0 #x0420) ; CYRILLIC CAPITAL LETTER ER
 189   (#xC1 #x0421) ; CYRILLIC CAPITAL LETTER ES
 190   (#xC2 #x0422) ; CYRILLIC CAPITAL LETTER TE
 191   (#xC3 #x0423) ; CYRILLIC CAPITAL LETTER U
 192   (#xC4 #x0424) ; CYRILLIC CAPITAL LETTER EF
 193   (#xC5 #x0425) ; CYRILLIC CAPITAL LETTER HA
 194   (#xC6 #x0426) ; CYRILLIC CAPITAL LETTER TSE
 195   (#xC7 #x0427) ; CYRILLIC CAPITAL LETTER CHE
 196   (#xC8 #x0428) ; CYRILLIC CAPITAL LETTER SHA
 197   (#xC9 #x0429) ; CYRILLIC CAPITAL LETTER SHCHA
 198   (#xCA #x042A) ; CYRILLIC CAPITAL LETTER HARD SIGN
 199   (#xCB #x042B) ; CYRILLIC CAPITAL LETTER YERU
 200   (#xCC #x042C) ; CYRILLIC CAPITAL LETTER SOFT SIGN
 201   (#xCD #x042D) ; CYRILLIC CAPITAL LETTER E
 202   (#xCE #x042E) ; CYRILLIC CAPITAL LETTER YU
 203   (#xCF #x042F) ; CYRILLIC CAPITAL LETTER YA
 204   (#xD0 #x0430) ; CYRILLIC SMALL LETTER A
 205   (#xD1 #x0431) ; CYRILLIC SMALL LETTER BE
 206   (#xD2 #x0432) ; CYRILLIC SMALL LETTER VE
 207   (#xD3 #x0433) ; CYRILLIC SMALL LETTER GHE
 208   (#xD4 #x0434) ; CYRILLIC SMALL LETTER DE
 209   (#xD5 #x0435) ; CYRILLIC SMALL LETTER IE
 210   (#xD6 #x0436) ; CYRILLIC SMALL LETTER ZHE
 211   (#xD7 #x0437) ; CYRILLIC SMALL LETTER ZE
 212   (#xD8 #x0438) ; CYRILLIC SMALL LETTER I
 213   (#xD9 #x0439) ; CYRILLIC SMALL LETTER SHORT I
 214   (#xDA #x043A) ; CYRILLIC SMALL LETTER KA
 215   (#xDB #x043B) ; CYRILLIC SMALL LETTER EL
 216   (#xDC #x043C) ; CYRILLIC SMALL LETTER EM
 217   (#xDD #x043D) ; CYRILLIC SMALL LETTER EN
 218   (#xDE #x043E) ; CYRILLIC SMALL LETTER O
 219   (#xDF #x043F) ; CYRILLIC SMALL LETTER PE
 220   (#xE0 #x0440) ; CYRILLIC SMALL LETTER ER
 221   (#xE1 #x0441) ; CYRILLIC SMALL LETTER ES
 222   (#xE2 #x0442) ; CYRILLIC SMALL LETTER TE
 223   (#xE3 #x0443) ; CYRILLIC SMALL LETTER U
 224   (#xE4 #x0444) ; CYRILLIC SMALL LETTER EF
 225   (#xE5 #x0445) ; CYRILLIC SMALL LETTER HA
 226   (#xE6 #x0446) ; CYRILLIC SMALL LETTER TSE
 227   (#xE7 #x0447) ; CYRILLIC SMALL LETTER CHE
 228   (#xE8 #x0448) ; CYRILLIC SMALL LETTER SHA
 229   (#xE9 #x0449) ; CYRILLIC SMALL LETTER SHCHA
 230   (#xEA #x044A) ; CYRILLIC SMALL LETTER HARD SIGN
 231   (#xEB #x044B) ; CYRILLIC SMALL LETTER YERU
 232   (#xEC #x044C) ; CYRILLIC SMALL LETTER SOFT SIGN
 233   (#xED #x044D) ; CYRILLIC SMALL LETTER E
 234   (#xEE #x044E) ; CYRILLIC SMALL LETTER YU
 235   (#xEF #x044F) ; CYRILLIC SMALL LETTER YA
 236   (#xF0 #x2116) ; NUMERO SIGN
 237   (#xF1 #x0451) ; CYRILLIC SMALL LETTER IO
 238   (#xF2 #x0452) ; CYRILLIC SMALL LETTER DJE
 239   (#xF3 #x0453) ; CYRILLIC SMALL LETTER GJE
 240   (#xF4 #x0454) ; CYRILLIC SMALL LETTER UKRAINIAN IE
 241   (#xF5 #x0455) ; CYRILLIC SMALL LETTER DZE
 242   (#xF6 #x0456) ; CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
 243   (#xF7 #x0457) ; CYRILLIC SMALL LETTER YI
 244   (#xF8 #x0458) ; CYRILLIC SMALL LETTER JE
 245   (#xF9 #x0459) ; CYRILLIC SMALL LETTER LJE
 246   (#xFA #x045A) ; CYRILLIC SMALL LETTER NJE
 247   (#xFB #x045B) ; CYRILLIC SMALL LETTER TSHE
 248   (#xFC #x045C) ; CYRILLIC SMALL LETTER KJE
 249   (#xFD #x00A7) ; SECTION SIGN
 250   (#xFE #x045E) ; CYRILLIC SMALL LETTER SHORT U
 251   (#xFF #x045F) ; CYRILLIC SMALL LETTER DZHE
 252 )
 253
 254 (define-unibyte-mapping-external-format :iso-8859-6 (:|iso-8859-6|)
 255   (#xA1 nil)
 256   (#xA2 nil)
 257   (#xA3 nil)
 258   (#xA5 nil)
 259   (#xA6 nil)
 260   (#xA7 nil)
 261   (#xA8 nil)
 262   (#xA9 nil)
 263   (#xAA nil)
 264   (#xAB nil)
 265   (#xAC #x060C) ; ARABIC COMMA
 266   (#xAE nil)
 267   (#xAF nil)
 268   (#xB0 nil)
 269   (#xB1 nil)
 270   (#xB2 nil)
 271   (#xB3 nil)
 272   (#xB4 nil)
 273   (#xB5 nil)
 274   (#xB6 nil)
 275   (#xB7 nil)
 276   (#xB8 nil)
 277   (#xB9 nil)
 278   (#xBA nil)
 279   (#xBB #x061B) ; ARABIC SEMICOLON
 280   (#xBC nil)
 281   (#xBD nil)
 282   (#xBE nil)
 283   (#xBF #x061F) ; ARABIC QUESTION MARK
 284   (#xC0 nil)
 285   (#xC1 #x0621) ; ARABIC LETTER HAMZA
 286   (#xC2 #x0622) ; ARABIC LETTER ALEF WITH MADDA ABOVE
 287   (#xC3 #x0623) ; ARABIC LETTER ALEF WITH HAMZA ABOVE
 288   (#xC4 #x0624) ; ARABIC LETTER WAW WITH HAMZA ABOVE
 289   (#xC5 #x0625) ; ARABIC LETTER ALEF WITH HAMZA BELOW
 290   (#xC6 #x0626) ; ARABIC LETTER YEH WITH HAMZA ABOVE
 291   (#xC7 #x0627) ; ARABIC LETTER ALEF
 292   (#xC8 #x0628) ; ARABIC LETTER BEH
 293   (#xC9 #x0629) ; ARABIC LETTER TEH MARBUTA
 294   (#xCA #x062A) ; ARABIC LETTER TEH
 295   (#xCB #x062B) ; ARABIC LETTER THEH
 296   (#xCC #x062C) ; ARABIC LETTER JEEM
 297   (#xCD #x062D) ; ARABIC LETTER HAH
 298   (#xCE #x062E) ; ARABIC LETTER KHAH
 299   (#xCF #x062F) ; ARABIC LETTER DAL
 300   (#xD0 #x0630) ; ARABIC LETTER THAL
 301   (#xD1 #x0631) ; ARABIC LETTER REH
 302   (#xD2 #x0632) ; ARABIC LETTER ZAIN
 303   (#xD3 #x0633) ; ARABIC LETTER SEEN
 304   (#xD4 #x0634) ; ARABIC LETTER SHEEN
 305   (#xD5 #x0635) ; ARABIC LETTER SAD
 306   (#xD6 #x0636) ; ARABIC LETTER DAD
 307   (#xD7 #x0637) ; ARABIC LETTER TAH
 308   (#xD8 #x0638) ; ARABIC LETTER ZAH
 309   (#xD9 #x0639) ; ARABIC LETTER AIN
 310   (#xDA #x063A) ; ARABIC LETTER GHAIN
 311   (#xDB nil)
 312   (#xDC nil)
 313   (#xDD nil)
 314   (#xDE nil)
 315   (#xDF nil)
 316   (#xE0 #x0640) ; ARABIC TATWEEL
 317   (#xE1 #x0641) ; ARABIC LETTER FEH
 318   (#xE2 #x0642) ; ARABIC LETTER QAF
 319   (#xE3 #x0643) ; ARABIC LETTER KAF
 320   (#xE4 #x0644) ; ARABIC LETTER LAM
 321   (#xE5 #x0645) ; ARABIC LETTER MEEM
 322   (#xE6 #x0646) ; ARABIC LETTER NOON
 323   (#xE7 #x0647) ; ARABIC LETTER HEH
 324   (#xE8 #x0648) ; ARABIC LETTER WAW
 325   (#xE9 #x0649) ; ARABIC LETTER ALEF MAKSURA
 326   (#xEA #x064A) ; ARABIC LETTER YEH
 327   (#xEB #x064B) ; ARABIC FATHATAN
 328   (#xEC #x064C) ; ARABIC DAMMATAN
 329   (#xED #x064D) ; ARABIC KASRATAN
 330   (#xEE #x064E) ; ARABIC FATHA
 331   (#xEF #x064F) ; ARABIC DAMMA
 332   (#xF0 #x0650) ; ARABIC KASRA
 333   (#xF1 #x0651) ; ARABIC SHADDA
 334   (#xF2 #x0652) ; ARABIC SUKUN
 335   (#xF3 nil)
 336   (#xF4 nil)
 337   (#xF5 nil)
 338   (#xF6 nil)
 339   (#xF7 nil)
 340   (#xF8 nil)
 341   (#xF9 nil)
 342   (#xFA nil)
 343   (#xFB nil)
 344   (#xFC nil)
 345   (#xFD nil)
 346   (#xFE nil)
 347   (#xFF nil)
 348 )
 349
 350 (define-unibyte-mapping-external-format :iso-8859-7 (:|iso-8859-7|)
 351   (#xA1 #x02BD) ; MODIFIER LETTER REVERSED COMMA
 352   (#xA2 #x02BC) ; MODIFIER LETTER APOSTROPHE
 353   (#xA4 nil)
 354   (#xA5 nil)
 355   (#xAA nil)
 356   (#xAE nil)
 357   (#xAF #x2015) ; HORIZONTAL BAR
 358   (#xB4 #x0384) ; GREEK TONOS
 359   (#xB5 #x0385) ; GREEK DIALYTIKA TONOS
 360   (#xB6 #x0386) ; GREEK CAPITAL LETTER ALPHA WITH TONOS
 361   (#xB8 #x0388) ; GREEK CAPITAL LETTER EPSILON WITH TONOS
 362   (#xB9 #x0389) ; GREEK CAPITAL LETTER ETA WITH TONOS
 363   (#xBA #x038A) ; GREEK CAPITAL LETTER IOTA WITH TONOS
 364   (#xBC #x038C) ; GREEK CAPITAL LETTER OMICRON WITH TONOS
 365   (#xBE #x038E) ; GREEK CAPITAL LETTER UPSILON WITH TONOS
 366   (#xBF #x038F) ; GREEK CAPITAL LETTER OMEGA WITH TONOS
 367   (#xC0 #x0390) ; GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS
 368   (#xC1 #x0391) ; GREEK CAPITAL LETTER ALPHA
 369   (#xC2 #x0392) ; GREEK CAPITAL LETTER BETA
 370   (#xC3 #x0393) ; GREEK CAPITAL LETTER GAMMA
 371   (#xC4 #x0394) ; GREEK CAPITAL LETTER DELTA
 372   (#xC5 #x0395) ; GREEK CAPITAL LETTER EPSILON
 373   (#xC6 #x0396) ; GREEK CAPITAL LETTER ZETA
 374   (#xC7 #x0397) ; GREEK CAPITAL LETTER ETA
 375   (#xC8 #x0398) ; GREEK CAPITAL LETTER THETA
 376   (#xC9 #x0399) ; GREEK CAPITAL LETTER IOTA
 377   (#xCA #x039A) ; GREEK CAPITAL LETTER KAPPA
 378   (#xCB #x039B) ; GREEK CAPITAL LETTER LAMDA
 379   (#xCC #x039C) ; GREEK CAPITAL LETTER MU
 380   (#xCD #x039D) ; GREEK CAPITAL LETTER NU
 381   (#xCE #x039E) ; GREEK CAPITAL LETTER XI
 382   (#xCF #x039F) ; GREEK CAPITAL LETTER OMICRON
 383   (#xD0 #x03A0) ; GREEK CAPITAL LETTER PI
 384   (#xD1 #x03A1) ; GREEK CAPITAL LETTER RHO
 385   (#xD2 nil)
 386   (#xD3 #x03A3) ; GREEK CAPITAL LETTER SIGMA
 387   (#xD4 #x03A4) ; GREEK CAPITAL LETTER TAU
 388   (#xD5 #x03A5) ; GREEK CAPITAL LETTER UPSILON
 389   (#xD6 #x03A6) ; GREEK CAPITAL LETTER PHI
 390   (#xD7 #x03A7) ; GREEK CAPITAL LETTER CHI
 391   (#xD8 #x03A8) ; GREEK CAPITAL LETTER PSI
 392   (#xD9 #x03A9) ; GREEK CAPITAL LETTER OMEGA
 393   (#xDA #x03AA) ; GREEK CAPITAL LETTER IOTA WITH DIALYTIKA
 394   (#xDB #x03AB) ; GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA
 395   (#xDC #x03AC) ; GREEK SMALL LETTER ALPHA WITH TONOS
 396   (#xDD #x03AD) ; GREEK SMALL LETTER EPSILON WITH TONOS
 397   (#xDE #x03AE) ; GREEK SMALL LETTER ETA WITH TONOS
 398   (#xDF #x03AF) ; GREEK SMALL LETTER IOTA WITH TONOS
 399   (#xE0 #x03B0) ; GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS
 400   (#xE1 #x03B1) ; GREEK SMALL LETTER ALPHA
 401   (#xE2 #x03B2) ; GREEK SMALL LETTER BETA
 402   (#xE3 #x03B3) ; GREEK SMALL LETTER GAMMA
 403   (#xE4 #x03B4) ; GREEK SMALL LETTER DELTA
 404   (#xE5 #x03B5) ; GREEK SMALL LETTER EPSILON
 405   (#xE6 #x03B6) ; GREEK SMALL LETTER ZETA
 406   (#xE7 #x03B7) ; GREEK SMALL LETTER ETA
 407   (#xE8 #x03B8) ; GREEK SMALL LETTER THETA
 408   (#xE9 #x03B9) ; GREEK SMALL LETTER IOTA
 409   (#xEA #x03BA) ; GREEK SMALL LETTER KAPPA
 410   (#xEB #x03BB) ; GREEK SMALL LETTER LAMDA
 411   (#xEC #x03BC) ; GREEK SMALL LETTER MU
 412   (#xED #x03BD) ; GREEK SMALL LETTER NU
 413   (#xEE #x03BE) ; GREEK SMALL LETTER XI
 414   (#xEF #x03BF) ; GREEK SMALL LETTER OMICRON
 415   (#xF0 #x03C0) ; GREEK SMALL LETTER PI
 416   (#xF1 #x03C1) ; GREEK SMALL LETTER RHO
 417   (#xF2 #x03C2) ; GREEK SMALL LETTER FINAL SIGMA
 418   (#xF3 #x03C3) ; GREEK SMALL LETTER SIGMA
 419   (#xF4 #x03C4) ; GREEK SMALL LETTER TAU
 420   (#xF5 #x03C5) ; GREEK SMALL LETTER UPSILON
 421   (#xF6 #x03C6) ; GREEK SMALL LETTER PHI
 422   (#xF7 #x03C7) ; GREEK SMALL LETTER CHI
 423   (#xF8 #x03C8) ; GREEK SMALL LETTER PSI
 424   (#xF9 #x03C9) ; GREEK SMALL LETTER OMEGA
 425   (#xFA #x03CA) ; GREEK SMALL LETTER IOTA WITH DIALYTIKA
 426   (#xFB #x03CB) ; GREEK SMALL LETTER UPSILON WITH DIALYTIKA
 427   (#xFC #x03CC) ; GREEK SMALL LETTER OMICRON WITH TONOS
 428   (#xFD #x03CD) ; GREEK SMALL LETTER UPSILON WITH TONOS
 429   (#xFE #x03CE) ; GREEK SMALL LETTER OMEGA WITH TONOS
 430   (#xFF nil)
 431 )
 432
 433 (define-unibyte-mapping-external-format :iso-8859-8 (:|iso-8859-8|)
 434   (#xA1 nil)
 435   (#xAA #x00D7) ; MULTIPLICATION SIGN
 436   (#xAF #x203E) ; OVERLINE
 437   (#xBA #x00F7) ; DIVISION SIGN
 438   (#xBF nil)
 439   (#xC0 nil)
 440   (#xC1 nil)
 441   (#xC2 nil)
 442   (#xC3 nil)
 443   (#xC4 nil)
 444   (#xC5 nil)
 445   (#xC6 nil)
 446   (#xC7 nil)
 447   (#xC8 nil)
 448   (#xC9 nil)
 449   (#xCA nil)
 450   (#xCB nil)
 451   (#xCC nil)
 452   (#xCD nil)
 453   (#xCE nil)
 454   (#xCF nil)
 455   (#xD0 nil)
 456   (#xD1 nil)
 457   (#xD2 nil)
 458   (#xD3 nil)
 459   (#xD4 nil)
 460   (#xD5 nil)
 461   (#xD6 nil)
 462   (#xD7 nil)
 463   (#xD8 nil)
 464   (#xD9 nil)
 465   (#xDA nil)
 466   (#xDB nil)
 467   (#xDC nil)
 468   (#xDD nil)
 469   (#xDE nil)
 470   (#xDF #x2017) ; DOUBLE LOW LINE
 471   (#xE0 #x05D0) ; HEBREW LETTER ALEF
 472   (#xE1 #x05D1) ; HEBREW LETTER BET
 473   (#xE2 #x05D2) ; HEBREW LETTER GIMEL
 474   (#xE3 #x05D3) ; HEBREW LETTER DALET
 475   (#xE4 #x05D4) ; HEBREW LETTER HE
 476   (#xE5 #x05D5) ; HEBREW LETTER VAV
 477   (#xE6 #x05D6) ; HEBREW LETTER ZAYIN
 478   (#xE7 #x05D7) ; HEBREW LETTER HET
 479   (#xE8 #x05D8) ; HEBREW LETTER TET
 480   (#xE9 #x05D9) ; HEBREW LETTER YOD
 481   (#xEA #x05DA) ; HEBREW LETTER FINAL KAF
 482   (#xEB #x05DB) ; HEBREW LETTER KAF
 483   (#xEC #x05DC) ; HEBREW LETTER LAMED
 484   (#xED #x05DD) ; HEBREW LETTER FINAL MEM
 485   (#xEE #x05DE) ; HEBREW LETTER MEM
 486   (#xEF #x05DF) ; HEBREW LETTER FINAL NUN
 487   (#xF0 #x05E0) ; HEBREW LETTER NUN
 488   (#xF1 #x05E1) ; HEBREW LETTER SAMEKH
 489   (#xF2 #x05E2) ; HEBREW LETTER AYIN
 490   (#xF3 #x05E3) ; HEBREW LETTER FINAL PE
 491   (#xF4 #x05E4) ; HEBREW LETTER PE
 492   (#xF5 #x05E5) ; HEBREW LETTER FINAL TSADI
 493   (#xF6 #x05E6) ; HEBREW LETTER TSADI
 494   (#xF7 #x05E7) ; HEBREW LETTER QOF
 495   (#xF8 #x05E8) ; HEBREW LETTER RESH
 496   (#xF9 #x05E9) ; HEBREW LETTER SHIN
 497   (#xFA #x05EA) ; HEBREW LETTER TAV
 498   (#xFB nil)
 499   (#xFC nil)
 500   (#xFD nil)
 501   (#xFE nil)
 502   (#xFF nil)
 503 )
 504
 505 (define-unibyte-mapping-external-format :iso-8859-9
 506     (:|iso-8859-9| :latin-5 :|latin-5|)
 507   (#xD0 #x011E) ; LATIN CAPITAL LETTER G WITH BREVE
 508   (#xDD #x0130) ; LATIN CAPITAL LETTER I WITH DOT ABOVE
 509   (#xDE #x015E) ; LATIN CAPITAL LETTER S WITH CEDILLA
 510   (#xF0 #x011F) ; LATIN SMALL LETTER G WITH BREVE
 511   (#xFD #x0131) ; LATIN SMALL LETTER DOTLESS I
 512   (#xFE #x015F) ; LATIN SMALL LETTER S WITH CEDILLA
 513 )
 514
 515 (define-unibyte-mapping-external-format :iso-8859-10
 516     (:|iso-8859-10| :latin-6 :|latin-6|)
 517   (#xA1 #x0104) ; LATIN CAPITAL LETTER A WITH OGONEK
 518   (#xA2 #x0112) ; LATIN CAPITAL LETTER E WITH MACRON
 519   (#xA3 #x0122) ; LATIN CAPITAL LETTER G WITH CEDILLA
 520   (#xA4 #x012A) ; LATIN CAPITAL LETTER I WITH MACRON
 521   (#xA5 #x0128) ; LATIN CAPITAL LETTER I WITH TILDE
 522   (#xA6 #x0136) ; LATIN CAPITAL LETTER K WITH CEDILLA
 523   (#xA8 #x013B) ; LATIN CAPITAL LETTER L WITH CEDILLA
 524   (#xA9 #x0110) ; LATIN CAPITAL LETTER D WITH STROKE
 525   (#xAA #x0160) ; LATIN CAPITAL LETTER S WITH CARON
 526   (#xAB #x0166) ; LATIN CAPITAL LETTER T WITH STROKE
 527   (#xAC #x017D) ; LATIN CAPITAL LETTER Z WITH CARON
 528   (#xAE #x016A) ; LATIN CAPITAL LETTER U WITH MACRON
 529   (#xAF #x014A) ; LATIN CAPITAL LETTER ENG
 530   (#xB1 #x0105) ; LATIN SMALL LETTER A WITH OGONEK
 531   (#xB2 #x0113) ; LATIN SMALL LETTER E WITH MACRON
 532   (#xB3 #x0123) ; LATIN SMALL LETTER G WITH CEDILLA
 533   (#xB4 #x012B) ; LATIN SMALL LETTER I WITH MACRON
 534   (#xB5 #x0129) ; LATIN SMALL LETTER I WITH TILDE
 535   (#xB6 #x0137) ; LATIN SMALL LETTER K WITH CEDILLA
 536   (#xB8 #x013C) ; LATIN SMALL LETTER L WITH CEDILLA
 537   (#xB9 #x0111) ; LATIN SMALL LETTER D WITH STROKE
 538   (#xBA #x0161) ; LATIN SMALL LETTER S WITH CARON
 539   (#xBB #x0167) ; LATIN SMALL LETTER T WITH STROKE
 540   (#xBC #x017E) ; LATIN SMALL LETTER Z WITH CARON
 541   (#xBD #x2015) ; HORIZONTAL BAR
 542   (#xBE #x016B) ; LATIN SMALL LETTER U WITH MACRON
 543   (#xBF #x014B) ; LATIN SMALL LETTER ENG
 544   (#xC0 #x0100) ; LATIN CAPITAL LETTER A WITH MACRON
 545   (#xC7 #x012E) ; LATIN CAPITAL LETTER I WITH OGONEK
 546   (#xC8 #x010C) ; LATIN CAPITAL LETTER C WITH CARON
 547   (#xCA #x0118) ; LATIN CAPITAL LETTER E WITH OGONEK
 548   (#xCC #x0116) ; LATIN CAPITAL LETTER E WITH DOT ABOVE
 549   (#xD1 #x0145) ; LATIN CAPITAL LETTER N WITH CEDILLA
 550   (#xD2 #x014C) ; LATIN CAPITAL LETTER O WITH MACRON
 551   (#xD7 #x0168) ; LATIN CAPITAL LETTER U WITH TILDE
 552   (#xD9 #x0172) ; LATIN CAPITAL LETTER U WITH OGONEK
 553   (#xE0 #x0101) ; LATIN SMALL LETTER A WITH MACRON
 554   (#xE7 #x012F) ; LATIN SMALL LETTER I WITH OGONEK
 555   (#xE8 #x010D) ; LATIN SMALL LETTER C WITH CARON
 556   (#xEA #x0119) ; LATIN SMALL LETTER E WITH OGONEK
 557   (#xEC #x0117) ; LATIN SMALL LETTER E WITH DOT ABOVE
 558   (#xF1 #x0146) ; LATIN SMALL LETTER N WITH CEDILLA
 559   (#xF2 #x014D) ; LATIN SMALL LETTER O WITH MACRON
 560   (#xF7 #x0169) ; LATIN SMALL LETTER U WITH TILDE
 561   (#xF9 #x0173) ; LATIN SMALL LETTER U WITH OGONEK
 562   (#xFF #x0138) ; LATIN SMALL LETTER KRA
 563 )
 564
 565 (define-unibyte-mapping-external-format :iso-8859-11 (:|iso-8859-11|)
 566   (#xA1 #x0E01) ; THAI CHARACTER KO KAI
 567   (#xA2 #x0E02) ; THAI CHARACTER KHO KHAI
 568   (#xA3 #x0E03) ; THAI CHARACTER KHO KHUAT
 569   (#xA4 #x0E04) ; THAI CHARACTER KHO KHWAI
 570   (#xA5 #x0E05) ; THAI CHARACTER KHO KHON
 571   (#xA6 #x0E06) ; THAI CHARACTER KHO RAKHANG
 572   (#xA7 #x0E07) ; THAI CHARACTER NGO NGU
 573   (#xA8 #x0E08) ; THAI CHARACTER CHO CHAN
 574   (#xA9 #x0E09) ; THAI CHARACTER CHO CHING
 575   (#xAA #x0E0A) ; THAI CHARACTER CHO CHANG
 576   (#xAB #x0E0B) ; THAI CHARACTER SO SO
 577   (#xAC #x0E0C) ; THAI CHARACTER CHO CHOE
 578   (#xAD #x0E0D) ; THAI CHARACTER YO YING
 579   (#xAE #x0E0E) ; THAI CHARACTER DO CHADA
 580   (#xAF #x0E0F) ; THAI CHARACTER TO PATAK
 581   (#xB0 #x0E10) ; THAI CHARACTER THO THAN
 582   (#xB1 #x0E11) ; THAI CHARACTER THO NANGMONTHO
 583   (#xB2 #x0E12) ; THAI CHARACTER THO PHUTHAO
 584   (#xB3 #x0E13) ; THAI CHARACTER NO NEN
 585   (#xB4 #x0E14) ; THAI CHARACTER DO DEK
 586   (#xB5 #x0E15) ; THAI CHARACTER TO TAO
 587   (#xB6 #x0E16) ; THAI CHARACTER THO THUNG
 588   (#xB7 #x0E17) ; THAI CHARACTER THO THAHAN
 589   (#xB8 #x0E18) ; THAI CHARACTER THO THONG
 590   (#xB9 #x0E19) ; THAI CHARACTER NO NU
 591   (#xBA #x0E1A) ; THAI CHARACTER BO BAIMAI
 592   (#xBB #x0E1B) ; THAI CHARACTER PO PLA
 593   (#xBC #x0E1C) ; THAI CHARACTER PHO PHUNG
 594   (#xBD #x0E1D) ; THAI CHARACTER FO FA
 595   (#xBE #x0E1E) ; THAI CHARACTER PHO PHAN
 596   (#xBF #x0E1F) ; THAI CHARACTER FO FAN
 597   (#xC0 #x0E20) ; THAI CHARACTER PHO SAMPHAO
 598   (#xC1 #x0E21) ; THAI CHARACTER MO MA
 599   (#xC2 #x0E22) ; THAI CHARACTER YO YAK
 600   (#xC3 #x0E23) ; THAI CHARACTER RO RUA
 601   (#xC4 #x0E24) ; THAI CHARACTER RU
 602   (#xC5 #x0E25) ; THAI CHARACTER LO LING
 603   (#xC6 #x0E26) ; THAI CHARACTER LU
 604   (#xC7 #x0E27) ; THAI CHARACTER WO WAEN
 605   (#xC8 #x0E28) ; THAI CHARACTER SO SALA
 606   (#xC9 #x0E29) ; THAI CHARACTER SO RUSI
 607   (#xCA #x0E2A) ; THAI CHARACTER SO SUA
 608   (#xCB #x0E2B) ; THAI CHARACTER HO HIP
 609   (#xCC #x0E2C) ; THAI CHARACTER LO CHULA
 610   (#xCD #x0E2D) ; THAI CHARACTER O ANG
 611   (#xCE #x0E2E) ; THAI CHARACTER HO NOKHUK
 612   (#xCF #x0E2F) ; THAI CHARACTER PAIYANNOI
 613   (#xD0 #x0E30) ; THAI CHARACTER SARA A
 614   (#xD1 #x0E31) ; THAI CHARACTER MAI HAN-AKAT
 615   (#xD2 #x0E32) ; THAI CHARACTER SARA AA
 616   (#xD3 #x0E33) ; THAI CHARACTER SARA AM
 617   (#xD4 #x0E34) ; THAI CHARACTER SARA I
 618   (#xD5 #x0E35) ; THAI CHARACTER SARA II
 619   (#xD6 #x0E36) ; THAI CHARACTER SARA UE
 620   (#xD7 #x0E37) ; THAI CHARACTER SARA UEE
 621   (#xD8 #x0E38) ; THAI CHARACTER SARA U
 622   (#xD9 #x0E39) ; THAI CHARACTER SARA UU
 623   (#xDA #x0E3A) ; THAI CHARACTER PHINTHU
 624   (#xDB nil)
 625   (#xDC nil)
 626   (#xDD nil)
 627   (#xDE nil)
 628   (#xDF #x0E3F) ; THAI CURRENCY SYMBOL BAHT
 629   (#xE0 #x0E40) ; THAI CHARACTER SARA E
 630   (#xE1 #x0E41) ; THAI CHARACTER SARA AE
 631   (#xE2 #x0E42) ; THAI CHARACTER SARA O
 632   (#xE3 #x0E43) ; THAI CHARACTER SARA AI MAIMUAN
 633   (#xE4 #x0E44) ; THAI CHARACTER SARA AI MAIMALAI
 634   (#xE5 #x0E45) ; THAI CHARACTER LAKKHANGYAO
 635   (#xE6 #x0E46) ; THAI CHARACTER MAIYAMOK
 636   (#xE7 #x0E47) ; THAI CHARACTER MAITAIKHU
 637   (#xE8 #x0E48) ; THAI CHARACTER MAI EK
 638   (#xE9 #x0E49) ; THAI CHARACTER MAI THO
 639   (#xEA #x0E4A) ; THAI CHARACTER MAI TRI
 640   (#xEB #x0E4B) ; THAI CHARACTER MAI CHATTAWA
 641   (#xEC #x0E4C) ; THAI CHARACTER THANTHAKHAT
 642   (#xED #x0E4D) ; THAI CHARACTER NIKHAHIT
 643   (#xEE #x0E4E) ; THAI CHARACTER YAMAKKAN
 644   (#xEF #x0E4F) ; THAI CHARACTER FONGMAN
 645   (#xF0 #x0E50) ; THAI DIGIT ZERO
 646   (#xF1 #x0E51) ; THAI DIGIT ONE
 647   (#xF2 #x0E52) ; THAI DIGIT TWO
 648   (#xF3 #x0E53) ; THAI DIGIT THREE
 649   (#xF4 #x0E54) ; THAI DIGIT FOUR
 650   (#xF5 #x0E55) ; THAI DIGIT FIVE
 651   (#xF6 #x0E56) ; THAI DIGIT SIX
 652   (#xF7 #x0E57) ; THAI DIGIT SEVEN
 653   (#xF8 #x0E58) ; THAI DIGIT EIGHT
 654   (#xF9 #x0E59) ; THAI DIGIT NINE
 655   (#xFA #x0E5A) ; THAI CHARACTER ANGKHANKHU
 656   (#xFB #x0E5B) ; THAI CHARACTER KHOMUT
 657   (#xFC nil)
 658   (#xFD nil)
 659   (#xFE nil)
 660   (#xFF nil)
 661 )
 662
 663 (define-unibyte-mapping-external-format :iso-8859-13
 664     (:|iso-8859-13| :latin-7 :|latin-7|)
 665   (#xA1 #x201D) ; RIGHT DOUBLE QUOTATION MARK
 666   (#xA5 #x201E) ; DOUBLE LOW-9 QUOTATION MARK
 667   (#xA8 #x00D8) ; LATIN CAPITAL LETTER O WITH STROKE
 668   (#xAA #x0156) ; LATIN CAPITAL LETTER R WITH CEDILLA
 669   (#xAF #x00C6) ; LATIN CAPITAL LETTER AE
 670   (#xB4 #x201C) ; LEFT DOUBLE QUOTATION MARK
 671   (#xB8 #x00F8) ; LATIN SMALL LETTER O WITH STROKE
 672   (#xBA #x0157) ; LATIN SMALL LETTER R WITH CEDILLA
 673   (#xBF #x00E6) ; LATIN SMALL LETTER AE
 674   (#xC0 #x0104) ; LATIN CAPITAL LETTER A WITH OGONEK
 675   (#xC1 #x012E) ; LATIN CAPITAL LETTER I WITH OGONEK
 676   (#xC2 #x0100) ; LATIN CAPITAL LETTER A WITH MACRON
 677   (#xC3 #x0106) ; LATIN CAPITAL LETTER C WITH ACUTE
 678   (#xC6 #x0118) ; LATIN CAPITAL LETTER E WITH OGONEK
 679   (#xC7 #x0112) ; LATIN CAPITAL LETTER E WITH MACRON
 680   (#xC8 #x010C) ; LATIN CAPITAL LETTER C WITH CARON
 681   (#xCA #x0179) ; LATIN CAPITAL LETTER Z WITH ACUTE
 682   (#xCB #x0116) ; LATIN CAPITAL LETTER E WITH DOT ABOVE
 683   (#xCC #x0122) ; LATIN CAPITAL LETTER G WITH CEDILLA
 684   (#xCD #x0136) ; LATIN CAPITAL LETTER K WITH CEDILLA
 685   (#xCE #x012A) ; LATIN CAPITAL LETTER I WITH MACRON
 686   (#xCF #x013B) ; LATIN CAPITAL LETTER L WITH CEDILLA
 687   (#xD0 #x0160) ; LATIN CAPITAL LETTER S WITH CARON
 688   (#xD1 #x0143) ; LATIN CAPITAL LETTER N WITH ACUTE
 689   (#xD2 #x0145) ; LATIN CAPITAL LETTER N WITH CEDILLA
 690   (#xD4 #x014C) ; LATIN CAPITAL LETTER O WITH MACRON
 691   (#xD8 #x0172) ; LATIN CAPITAL LETTER U WITH OGONEK
 692   (#xD9 #x0141) ; LATIN CAPITAL LETTER L WITH STROKE
 693   (#xDA #x015A) ; LATIN CAPITAL LETTER S WITH ACUTE
 694   (#xDB #x016A) ; LATIN CAPITAL LETTER U WITH MACRON
 695   (#xDD #x017B) ; LATIN CAPITAL LETTER Z WITH DOT ABOVE
 696   (#xDE #x017D) ; LATIN CAPITAL LETTER Z WITH CARON
 697   (#xE0 #x0105) ; LATIN SMALL LETTER A WITH OGONEK
 698   (#xE1 #x012F) ; LATIN SMALL LETTER I WITH OGONEK
 699   (#xE2 #x0101) ; LATIN SMALL LETTER A WITH MACRON
 700   (#xE3 #x0107) ; LATIN SMALL LETTER C WITH ACUTE
 701   (#xE6 #x0119) ; LATIN SMALL LETTER E WITH OGONEK
 702   (#xE7 #x0113) ; LATIN SMALL LETTER E WITH MACRON
 703   (#xE8 #x010D) ; LATIN SMALL LETTER C WITH CARON
 704   (#xEA #x017A) ; LATIN SMALL LETTER Z WITH ACUTE
 705   (#xEB #x0117) ; LATIN SMALL LETTER E WITH DOT ABOVE
 706   (#xEC #x0123) ; LATIN SMALL LETTER G WITH CEDILLA
 707   (#xED #x0137) ; LATIN SMALL LETTER K WITH CEDILLA
 708   (#xEE #x012B) ; LATIN SMALL LETTER I WITH MACRON
 709   (#xEF #x013C) ; LATIN SMALL LETTER L WITH CEDILLA
 710   (#xF0 #x0161) ; LATIN SMALL LETTER S WITH CARON
 711   (#xF1 #x0144) ; LATIN SMALL LETTER N WITH ACUTE
 712   (#xF2 #x0146) ; LATIN SMALL LETTER N WITH CEDILLA
 713   (#xF4 #x014D) ; LATIN SMALL LETTER O WITH MACRON
 714   (#xF8 #x0173) ; LATIN SMALL LETTER U WITH OGONEK
 715   (#xF9 #x0142) ; LATIN SMALL LETTER L WITH STROKE
 716   (#xFA #x015B) ; LATIN SMALL LETTER S WITH ACUTE
 717   (#xFB #x016B) ; LATIN SMALL LETTER U WITH MACRON
 718   (#xFD #x017C) ; LATIN SMALL LETTER Z WITH DOT ABOVE
 719   (#xFE #x017E) ; LATIN SMALL LETTER Z WITH CARON
 720   (#xFF #x2019) ; RIGHT SINGLE QUOTATION MARK
 721 )
 722
 723 (define-unibyte-mapping-external-format :iso-8859-14
 724     (:|iso-8859-14| :latin-8 :|latin-8|)
 725   (#xA1 #x1E02) ; LATIN CAPITAL LETTER B WITH DOT ABOVE
 726   (#xA2 #x1E03) ; LATIN SMALL LETTER B WITH DOT ABOVE
 727   (#xA4 #x010A) ; LATIN CAPITAL LETTER C WITH DOT ABOVE
 728   (#xA5 #x010B) ; LATIN SMALL LETTER C WITH DOT ABOVE
 729   (#xA6 #x1E0A) ; LATIN CAPITAL LETTER D WITH DOT ABOVE
 730   (#xA8 #x1E80) ; LATIN CAPITAL LETTER W WITH GRAVE
 731   (#xAA #x1E82) ; LATIN CAPITAL LETTER W WITH ACUTE
 732   (#xAB #x1E0B) ; LATIN SMALL LETTER D WITH DOT ABOVE
 733   (#xAC #x1EF2) ; LATIN CAPITAL LETTER Y WITH GRAVE
 734   (#xAF #x0178) ; LATIN CAPITAL LETTER Y WITH DIAERESIS
 735   (#xB0 #x1E1E) ; LATIN CAPITAL LETTER F WITH DOT ABOVE
 736   (#xB1 #x1E1F) ; LATIN SMALL LETTER F WITH DOT ABOVE
 737   (#xB2 #x0120) ; LATIN CAPITAL LETTER G WITH DOT ABOVE
 738   (#xB3 #x0121) ; LATIN SMALL LETTER G WITH DOT ABOVE
 739   (#xB4 #x1E40) ; LATIN CAPITAL LETTER M WITH DOT ABOVE
 740   (#xB5 #x1E41) ; LATIN SMALL LETTER M WITH DOT ABOVE
 741   (#xB7 #x1E56) ; LATIN CAPITAL LETTER P WITH DOT ABOVE
 742   (#xB8 #x1E81) ; LATIN SMALL LETTER W WITH GRAVE
 743   (#xB9 #x1E57) ; LATIN SMALL LETTER P WITH DOT ABOVE
 744   (#xBA #x1E83) ; LATIN SMALL LETTER W WITH ACUTE
 745   (#xBB #x1E60) ; LATIN CAPITAL LETTER S WITH DOT ABOVE
 746   (#xBC #x1EF3) ; LATIN SMALL LETTER Y WITH GRAVE
 747   (#xBD #x1E84) ; LATIN CAPITAL LETTER W WITH DIAERESIS
 748   (#xBE #x1E85) ; LATIN SMALL LETTER W WITH DIAERESIS
 749   (#xBF #x1E61) ; LATIN SMALL LETTER S WITH DOT ABOVE
 750   (#xD0 #x0174) ; LATIN CAPITAL LETTER W WITH CIRCUMFLEX
 751   (#xD7 #x1E6A) ; LATIN CAPITAL LETTER T WITH DOT ABOVE
 752   (#xDE #x0176) ; LATIN CAPITAL LETTER Y WITH CIRCUMFLEX
 753   (#xF0 #x0175) ; LATIN SMALL LETTER W WITH CIRCUMFLEX
 754   (#xF7 #x1E6B) ; LATIN SMALL LETTER T WITH DOT ABOVE
 755   (#xFE #x0177) ; LATIN SMALL LETTER Y WITH CIRCUMFLEX
 756 )
 757
 758 ;;; The names for latin9 are different due to a historical accident.
 759 (define-unibyte-mapping-external-format :latin-9
 760     (:latin9 :iso-8859-15 :iso8859-15)
 761   (#xA4 #x20AC)
 762   (#xA6 #x0160)
 763   (#xA8 #x0161)
 764   (#xB4 #x017D)
 765   (#xB8 #x017E)
 766   (#xBC #x0152)
 767   (#xBD #x0153)
 768   (#xBE #x0178)
 769 )