author | Jan Vrany <jan.vrany@fit.cvut.cz> |
Wed, 19 Aug 2009 17:14:36 +0100 | |
branch | jv |
changeset 17728 | bbc5fa73dfab |
parent 17711 | 39faaaf888b4 |
child 17845 | 7e0cfaac936d |
permissions | -rw-r--r-- |
8148 | 1 |
" |
2 |
COPYRIGHT (c) 2004 by eXept Software AG |
|
3 |
All Rights Reserved |
|
4 |
||
5 |
This software is furnished under a license and may be used |
|
6 |
only in accordance with the terms of that license and with the |
|
7 |
inclusion of the above copyright notice. This software may not |
|
8 |
be provided or otherwise made available to, or used by, any |
|
9 |
other person. No title to or ownership of the software is |
|
10 |
hereby transferred. |
|
11 |
" |
|
12 |
||
8081 | 13 |
"{ Package: 'stx:libbasic' }" |
14 |
||
15 |
"{ NameSpace: CharacterEncoderImplementations }" |
|
16 |
||
17 |
SingleByteEncoder subclass:#MAC_Greek |
|
18 |
instanceVariableNames:'' |
|
19 |
classVariableNames:'' |
|
20 |
poolDictionaries:'' |
|
21 |
category:'Collections-Text-Encodings' |
|
22 |
! |
|
23 |
||
8148 | 24 |
!MAC_Greek class methodsFor:'documentation'! |
25 |
||
26 |
copyright |
|
27 |
" |
|
28 |
COPYRIGHT (c) 2004 by eXept Software AG |
|
29 |
All Rights Reserved |
|
30 |
||
31 |
This software is furnished under a license and may be used |
|
32 |
only in accordance with the terms of that license and with the |
|
33 |
inclusion of the above copyright notice. This software may not |
|
34 |
be provided or otherwise made available to, or used by, any |
|
35 |
other person. No title to or ownership of the software is |
|
36 |
hereby transferred. |
|
37 |
" |
|
38 |
! ! |
|
8081 | 39 |
|
40 |
!MAC_Greek class methodsFor:'mapping'! |
|
41 |
||
42 |
mapFileURL1_relativePathName |
|
43 |
^ 'VENDORS/APPLE/GREEK.TXT' |
|
44 |
! |
|
45 |
||
46 |
mapping |
|
47 |
" |
|
48 |
# From: http://www.unicode.org/Public/MAPPINGS/VENDORS/APPLE/GREEK.TXT |
|
49 |
||
50 |
#======================================================================= |
|
51 |
# File name: GREEK.TXT |
|
52 |
# |
|
53 |
# Contents: Map (external version) from Mac OS Greek |
|
54 |
# character set to Unicode 2.1 through Unicode 3.2 |
|
55 |
# |
|
56 |
# Copyright: (c) 1995-2002 by Apple Computer, Inc., all rights |
|
57 |
# reserved. |
|
58 |
# |
|
59 |
# Contact: charsets@apple.com |
|
60 |
# |
|
61 |
# Changes: |
|
62 |
# |
|
63 |
# b3,c1 2002-Dec-19 Update to match changes in Mac OS Greek |
|
64 |
# encoding for Mac OS 9.2.2 and later. |
|
65 |
# Update URLs, notes. Matches internal |
|
66 |
# utom<b3>. |
|
67 |
# b02 1999-Sep-22 Update contact e-mail address. Matches |
|
68 |
# internal utom<b1>, ufrm<b1>, and Text |
|
69 |
# Encoding Converter version 1.5. |
|
70 |
# n06 1998-Feb-05 Update to match internal utom<n4>, ufrm<n17>, |
|
71 |
# and Text Encoding Converter versions 1.3: |
|
72 |
# Change mapping for 0xAF from U+0387 to its |
|
73 |
# canonical decomposition, U+00B7. Also |
|
74 |
# update header comments to new format. |
|
75 |
# n04 1995-Apr-15 First version (after fixing some typos). |
|
76 |
# Matches internal ufrm<n7>. |
|
77 |
# |
|
78 |
# Standard header: |
|
79 |
# ---------------- |
|
80 |
# |
|
81 |
# Apple, the Apple logo, and Macintosh are trademarks of Apple |
|
82 |
# Computer, Inc., registered in the United States and other countries. |
|
83 |
# Unicode is a trademark of Unicode Inc. For the sake of brevity, |
|
84 |
# throughout this document, 'Macintosh' can be used to refer to |
|
85 |
# Macintosh computers and 'Unicode' can be used to refer to the |
|
86 |
# Unicode standard. |
|
87 |
# |
|
88 |
# Apple makes no warranty or representation, either express or |
|
89 |
# implied, with respect to these tables, their quality, accuracy, or |
|
90 |
# fitness for a particular purpose. In no event will Apple be liable |
|
91 |
# for direct, indirect, special, incidental, or consequential damages |
|
92 |
# resulting from any defect or inaccuracy in this document or the |
|
93 |
# accompanying tables. |
|
94 |
# |
|
95 |
# These mapping tables and character lists are subject to change. |
|
96 |
# The latest tables should be available from the following: |
|
97 |
# |
|
98 |
# <http://www.unicode.org/Public/MAPPINGS/VENDORS/APPLE/> |
|
99 |
# |
|
100 |
# For general information about Mac OS encodings and these mapping |
|
101 |
# tables, see the file 'README.TXT'. |
|
102 |
# |
|
103 |
# Format: |
|
104 |
# ------- |
|
105 |
# |
|
106 |
# Three tab-separated columns; |
|
107 |
# '#' begins a comment which continues to the end of the line. |
|
108 |
# Column #1 is the Mac OS Greek code (in hex as 0xNN) |
|
109 |
# Column #2 is the corresponding Unicode (in hex as 0xNNNN) |
|
110 |
# Column #3 is a comment containing the Unicode name |
|
111 |
# |
|
112 |
# The entries are in Mac OS Greek code order. |
|
113 |
# |
|
114 |
# One of these mappings requires the use of a corporate character. |
|
115 |
# See the file 'CORPCHAR.TXT' and notes below. |
|
116 |
# |
|
117 |
# Control character mappings are not shown in this table, following |
|
118 |
# the conventions of the standard UTC mapping tables. However, the |
|
119 |
# Mac OS Greek character set uses the standard control characters at |
|
120 |
# 0x00-0x1F and 0x7F. |
|
121 |
# |
|
122 |
# Notes on Mac OS Greek: |
|
123 |
# ---------------------- |
|
124 |
# |
|
125 |
# Although a Mac OS script code is defined for Greek (smGreek = 6), |
|
126 |
# the Greek localized system does not currently use it (the font |
|
127 |
# family IDs are in the Mac OS Roman range). To determine if the |
|
128 |
# Greek encoding is being used when the script code is smRoman (0), |
|
129 |
# you must check if the system region code is 20, verGreece. |
|
130 |
# |
|
131 |
# The Mac OS Greek encoding is a superset of the repertoire of |
|
132 |
# ISO 8859-7 (although characters are not at the same code points), |
|
133 |
# except that LEFT & RIGHT SINGLE QUOTATION MARK replace the |
|
134 |
# MODIFIER LETTER REVERSED COMMA & APOSTROPHE (spacing versions of |
|
135 |
# Greek rough & smooth breathing marks) that are in ISO 8859-7. |
|
136 |
# The added characters in Mac OS Greek include more punctuation and |
|
137 |
# symbols and several accented Latin letters. |
|
138 |
# |
|
139 |
# Before Mac OS 9.2.2, code point 0x9C was SOFT HYPHEN (U+00AD), and |
|
140 |
# code point 0xFF was undefined. In Mac OS 9.2.2 and later versions, |
|
141 |
# SOFT HYPHEN was moved to 0xFF, and code point 0x9C was changed to be |
|
142 |
# EURO SIGN (U+20AC); the standard Apple fonts are updated for Mac OS |
|
143 |
# 9.2.2 to reflect this. There is a 'no Euro sign' variant of the Mac |
|
144 |
# OS Greek encoding that uses the older mapping; this can be used for |
|
145 |
# older fonts. |
|
146 |
# |
|
147 |
# This 'no Euro sign' variant of Mac OS Greek was the character set |
|
148 |
# used by Mac OS Greek systems before 9.2.2 except for system 6.0.7, |
|
149 |
# which used a variant character set but was quickly replaced with |
|
150 |
# Greek system 6.0.7.1 using the no Euro sign' character set |
|
151 |
# documented here. Greek system 4.1 used a variant Greek set that had |
|
152 |
# ISO 8859-7 in 0xA0-0xFF (with some holes filled in with DTP |
|
153 |
# characters), and Mac OS Roman accented Roman letters in 0x80-0x9F. |
|
154 |
# |
|
155 |
# Unicode mapping issues and notes: |
|
156 |
# --------------------------------- |
|
157 |
# |
|
158 |
# Details of mapping changes in each version: |
|
159 |
# ------------------------------------------- |
|
160 |
# |
|
161 |
# Changes from version b02 to version b03/c01: |
|
162 |
# |
|
163 |
# - The Mac OS Greek encoding changed for Mac OS 9.2.2 and later |
|
164 |
# as follows: |
|
165 |
# 0x9C, changed from 0x00AD SOFT HYPHEN to 0x20AC EURO SIGN |
|
166 |
# 0xFF, changed from undefined to 0x00AD SOFT HYPHEN |
|
167 |
# |
|
168 |
# Changes from version n04 to version n06: |
|
169 |
# |
|
170 |
# - Change mapping of 0xAF from U+0387 to its canonical |
|
171 |
# decomposition, U+00B7. |
|
172 |
# |
|
173 |
################## |
|
174 |
||
175 |
0x20 0x0020 # SPACE |
|
176 |
0x21 0x0021 # EXCLAMATION MARK |
|
177 |
0x22 0x0022 # QUOTATION MARK |
|
178 |
0x23 0x0023 # NUMBER SIGN |
|
179 |
0x24 0x0024 # DOLLAR SIGN |
|
180 |
0x25 0x0025 # PERCENT SIGN |
|
181 |
0x26 0x0026 # AMPERSAND |
|
182 |
0x27 0x0027 # APOSTROPHE |
|
183 |
0x28 0x0028 # LEFT PARENTHESIS |
|
184 |
0x29 0x0029 # RIGHT PARENTHESIS |
|
185 |
0x2A 0x002A # ASTERISK |
|
186 |
0x2B 0x002B # PLUS SIGN |
|
187 |
0x2C 0x002C # COMMA |
|
188 |
0x2D 0x002D # HYPHEN-MINUS |
|
189 |
0x2E 0x002E # FULL STOP |
|
190 |
0x2F 0x002F # SOLIDUS |
|
191 |
0x30 0x0030 # DIGIT ZERO |
|
192 |
0x31 0x0031 # DIGIT ONE |
|
193 |
0x32 0x0032 # DIGIT TWO |
|
194 |
0x33 0x0033 # DIGIT THREE |
|
195 |
0x34 0x0034 # DIGIT FOUR |
|
196 |
0x35 0x0035 # DIGIT FIVE |
|
197 |
0x36 0x0036 # DIGIT SIX |
|
198 |
0x37 0x0037 # DIGIT SEVEN |
|
199 |
0x38 0x0038 # DIGIT EIGHT |
|
200 |
0x39 0x0039 # DIGIT NINE |
|
201 |
0x3A 0x003A # COLON |
|
202 |
0x3B 0x003B # SEMICOLON |
|
203 |
0x3C 0x003C # LESS-THAN SIGN |
|
204 |
0x3D 0x003D # EQUALS SIGN |
|
205 |
0x3E 0x003E # GREATER-THAN SIGN |
|
206 |
0x3F 0x003F # QUESTION MARK |
|
207 |
0x40 0x0040 # COMMERCIAL AT |
|
208 |
0x41 0x0041 # LATIN CAPITAL LETTER A |
|
209 |
0x42 0x0042 # LATIN CAPITAL LETTER B |
|
210 |
0x43 0x0043 # LATIN CAPITAL LETTER C |
|
211 |
0x44 0x0044 # LATIN CAPITAL LETTER D |
|
212 |
0x45 0x0045 # LATIN CAPITAL LETTER E |
|
213 |
0x46 0x0046 # LATIN CAPITAL LETTER F |
|
214 |
0x47 0x0047 # LATIN CAPITAL LETTER G |
|
215 |
0x48 0x0048 # LATIN CAPITAL LETTER H |
|
216 |
0x49 0x0049 # LATIN CAPITAL LETTER I |
|
217 |
0x4A 0x004A # LATIN CAPITAL LETTER J |
|
218 |
0x4B 0x004B # LATIN CAPITAL LETTER K |
|
219 |
0x4C 0x004C # LATIN CAPITAL LETTER L |
|
220 |
0x4D 0x004D # LATIN CAPITAL LETTER M |
|
221 |
0x4E 0x004E # LATIN CAPITAL LETTER N |
|
222 |
0x4F 0x004F # LATIN CAPITAL LETTER O |
|
223 |
0x50 0x0050 # LATIN CAPITAL LETTER P |
|
224 |
0x51 0x0051 # LATIN CAPITAL LETTER Q |
|
225 |
0x52 0x0052 # LATIN CAPITAL LETTER R |
|
226 |
0x53 0x0053 # LATIN CAPITAL LETTER S |
|
227 |
0x54 0x0054 # LATIN CAPITAL LETTER T |
|
228 |
0x55 0x0055 # LATIN CAPITAL LETTER U |
|
229 |
0x56 0x0056 # LATIN CAPITAL LETTER V |
|
230 |
0x57 0x0057 # LATIN CAPITAL LETTER W |
|
231 |
0x58 0x0058 # LATIN CAPITAL LETTER X |
|
232 |
0x59 0x0059 # LATIN CAPITAL LETTER Y |
|
233 |
0x5A 0x005A # LATIN CAPITAL LETTER Z |
|
234 |
0x5B 0x005B # LEFT SQUARE BRACKET |
|
235 |
0x5C 0x005C # REVERSE SOLIDUS |
|
236 |
0x5D 0x005D # RIGHT SQUARE BRACKET |
|
237 |
0x5E 0x005E # CIRCUMFLEX ACCENT |
|
238 |
0x5F 0x005F # LOW LINE |
|
239 |
0x60 0x0060 # GRAVE ACCENT |
|
240 |
0x61 0x0061 # LATIN SMALL LETTER A |
|
241 |
0x62 0x0062 # LATIN SMALL LETTER B |
|
242 |
0x63 0x0063 # LATIN SMALL LETTER C |
|
243 |
0x64 0x0064 # LATIN SMALL LETTER D |
|
244 |
0x65 0x0065 # LATIN SMALL LETTER E |
|
245 |
0x66 0x0066 # LATIN SMALL LETTER F |
|
246 |
0x67 0x0067 # LATIN SMALL LETTER G |
|
247 |
0x68 0x0068 # LATIN SMALL LETTER H |
|
248 |
0x69 0x0069 # LATIN SMALL LETTER I |
|
249 |
0x6A 0x006A # LATIN SMALL LETTER J |
|
250 |
0x6B 0x006B # LATIN SMALL LETTER K |
|
251 |
0x6C 0x006C # LATIN SMALL LETTER L |
|
252 |
0x6D 0x006D # LATIN SMALL LETTER M |
|
253 |
0x6E 0x006E # LATIN SMALL LETTER N |
|
254 |
0x6F 0x006F # LATIN SMALL LETTER O |
|
255 |
0x70 0x0070 # LATIN SMALL LETTER P |
|
256 |
0x71 0x0071 # LATIN SMALL LETTER Q |
|
257 |
0x72 0x0072 # LATIN SMALL LETTER R |
|
258 |
0x73 0x0073 # LATIN SMALL LETTER S |
|
259 |
0x74 0x0074 # LATIN SMALL LETTER T |
|
260 |
0x75 0x0075 # LATIN SMALL LETTER U |
|
261 |
0x76 0x0076 # LATIN SMALL LETTER V |
|
262 |
0x77 0x0077 # LATIN SMALL LETTER W |
|
263 |
0x78 0x0078 # LATIN SMALL LETTER X |
|
264 |
0x79 0x0079 # LATIN SMALL LETTER Y |
|
265 |
0x7A 0x007A # LATIN SMALL LETTER Z |
|
266 |
0x7B 0x007B # LEFT CURLY BRACKET |
|
267 |
0x7C 0x007C # VERTICAL LINE |
|
268 |
0x7D 0x007D # RIGHT CURLY BRACKET |
|
269 |
0x7E 0x007E # TILDE |
|
270 |
# |
|
271 |
0x80 0x00C4 # LATIN CAPITAL LETTER A WITH DIAERESIS |
|
272 |
0x81 0x00B9 # SUPERSCRIPT ONE |
|
273 |
0x82 0x00B2 # SUPERSCRIPT TWO |
|
274 |
0x83 0x00C9 # LATIN CAPITAL LETTER E WITH ACUTE |
|
275 |
0x84 0x00B3 # SUPERSCRIPT THREE |
|
276 |
0x85 0x00D6 # LATIN CAPITAL LETTER O WITH DIAERESIS |
|
277 |
0x86 0x00DC # LATIN CAPITAL LETTER U WITH DIAERESIS |
|
278 |
0x87 0x0385 # GREEK DIALYTIKA TONOS |
|
279 |
0x88 0x00E0 # LATIN SMALL LETTER A WITH GRAVE |
|
280 |
0x89 0x00E2 # LATIN SMALL LETTER A WITH CIRCUMFLEX |
|
281 |
0x8A 0x00E4 # LATIN SMALL LETTER A WITH DIAERESIS |
|
282 |
0x8B 0x0384 # GREEK TONOS |
|
283 |
0x8C 0x00A8 # DIAERESIS |
|
284 |
0x8D 0x00E7 # LATIN SMALL LETTER C WITH CEDILLA |
|
285 |
0x8E 0x00E9 # LATIN SMALL LETTER E WITH ACUTE |
|
286 |
0x8F 0x00E8 # LATIN SMALL LETTER E WITH GRAVE |
|
287 |
0x90 0x00EA # LATIN SMALL LETTER E WITH CIRCUMFLEX |
|
288 |
0x91 0x00EB # LATIN SMALL LETTER E WITH DIAERESIS |
|
289 |
0x92 0x00A3 # POUND SIGN |
|
290 |
0x93 0x2122 # TRADE MARK SIGN |
|
291 |
0x94 0x00EE # LATIN SMALL LETTER I WITH CIRCUMFLEX |
|
292 |
0x95 0x00EF # LATIN SMALL LETTER I WITH DIAERESIS |
|
293 |
0x96 0x2022 # BULLET |
|
294 |
0x97 0x00BD # VULGAR FRACTION ONE HALF |
|
295 |
0x98 0x2030 # PER MILLE SIGN |
|
296 |
0x99 0x00F4 # LATIN SMALL LETTER O WITH CIRCUMFLEX |
|
297 |
0x9A 0x00F6 # LATIN SMALL LETTER O WITH DIAERESIS |
|
298 |
0x9B 0x00A6 # BROKEN BAR |
|
299 |
0x9C 0x20AC # EURO SIGN # before Mac OS 9.2.2, was SOFT HYPHEN |
|
300 |
0x9D 0x00F9 # LATIN SMALL LETTER U WITH GRAVE |
|
301 |
0x9E 0x00FB # LATIN SMALL LETTER U WITH CIRCUMFLEX |
|
302 |
0x9F 0x00FC # LATIN SMALL LETTER U WITH DIAERESIS |
|
303 |
0xA0 0x2020 # DAGGER |
|
304 |
0xA1 0x0393 # GREEK CAPITAL LETTER GAMMA |
|
305 |
0xA2 0x0394 # GREEK CAPITAL LETTER DELTA |
|
306 |
0xA3 0x0398 # GREEK CAPITAL LETTER THETA |
|
307 |
0xA4 0x039B # GREEK CAPITAL LETTER LAMDA |
|
308 |
0xA5 0x039E # GREEK CAPITAL LETTER XI |
|
309 |
0xA6 0x03A0 # GREEK CAPITAL LETTER PI |
|
310 |
0xA7 0x00DF # LATIN SMALL LETTER SHARP S |
|
311 |
0xA8 0x00AE # REGISTERED SIGN |
|
312 |
0xA9 0x00A9 # COPYRIGHT SIGN |
|
313 |
0xAA 0x03A3 # GREEK CAPITAL LETTER SIGMA |
|
314 |
0xAB 0x03AA # GREEK CAPITAL LETTER IOTA WITH DIALYTIKA |
|
315 |
0xAC 0x00A7 # SECTION SIGN |
|
316 |
0xAD 0x2260 # NOT EQUAL TO |
|
317 |
0xAE 0x00B0 # DEGREE SIGN |
|
318 |
0xAF 0x00B7 # MIDDLE DOT |
|
319 |
0xB0 0x0391 # GREEK CAPITAL LETTER ALPHA |
|
320 |
0xB1 0x00B1 # PLUS-MINUS SIGN |
|
321 |
0xB2 0x2264 # LESS-THAN OR EQUAL TO |
|
322 |
0xB3 0x2265 # GREATER-THAN OR EQUAL TO |
|
323 |
0xB4 0x00A5 # YEN SIGN |
|
324 |
0xB5 0x0392 # GREEK CAPITAL LETTER BETA |
|
325 |
0xB6 0x0395 # GREEK CAPITAL LETTER EPSILON |
|
326 |
0xB7 0x0396 # GREEK CAPITAL LETTER ZETA |
|
327 |
0xB8 0x0397 # GREEK CAPITAL LETTER ETA |
|
328 |
0xB9 0x0399 # GREEK CAPITAL LETTER IOTA |
|
329 |
0xBA 0x039A # GREEK CAPITAL LETTER KAPPA |
|
330 |
0xBB 0x039C # GREEK CAPITAL LETTER MU |
|
331 |
0xBC 0x03A6 # GREEK CAPITAL LETTER PHI |
|
332 |
0xBD 0x03AB # GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA |
|
333 |
0xBE 0x03A8 # GREEK CAPITAL LETTER PSI |
|
334 |
0xBF 0x03A9 # GREEK CAPITAL LETTER OMEGA |
|
335 |
0xC0 0x03AC # GREEK SMALL LETTER ALPHA WITH TONOS |
|
336 |
0xC1 0x039D # GREEK CAPITAL LETTER NU |
|
337 |
0xC2 0x00AC # NOT SIGN |
|
338 |
0xC3 0x039F # GREEK CAPITAL LETTER OMICRON |
|
339 |
0xC4 0x03A1 # GREEK CAPITAL LETTER RHO |
|
340 |
0xC5 0x2248 # ALMOST EQUAL TO |
|
341 |
0xC6 0x03A4 # GREEK CAPITAL LETTER TAU |
|
342 |
0xC7 0x00AB # LEFT-POINTING DOUBLE ANGLE QUOTATION MARK |
|
343 |
0xC8 0x00BB # RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK |
|
344 |
0xC9 0x2026 # HORIZONTAL ELLIPSIS |
|
345 |
0xCA 0x00A0 # NO-BREAK SPACE |
|
346 |
0xCB 0x03A5 # GREEK CAPITAL LETTER UPSILON |
|
347 |
0xCC 0x03A7 # GREEK CAPITAL LETTER CHI |
|
348 |
0xCD 0x0386 # GREEK CAPITAL LETTER ALPHA WITH TONOS |
|
349 |
0xCE 0x0388 # GREEK CAPITAL LETTER EPSILON WITH TONOS |
|
350 |
0xCF 0x0153 # LATIN SMALL LIGATURE OE |
|
351 |
0xD0 0x2013 # EN DASH |
|
352 |
0xD1 0x2015 # HORIZONTAL BAR |
|
353 |
0xD2 0x201C # LEFT DOUBLE QUOTATION MARK |
|
354 |
0xD3 0x201D # RIGHT DOUBLE QUOTATION MARK |
|
355 |
0xD4 0x2018 # LEFT SINGLE QUOTATION MARK |
|
356 |
0xD5 0x2019 # RIGHT SINGLE QUOTATION MARK |
|
357 |
0xD6 0x00F7 # DIVISION SIGN |
|
358 |
0xD7 0x0389 # GREEK CAPITAL LETTER ETA WITH TONOS |
|
359 |
0xD8 0x038A # GREEK CAPITAL LETTER IOTA WITH TONOS |
|
360 |
0xD9 0x038C # GREEK CAPITAL LETTER OMICRON WITH TONOS |
|
361 |
0xDA 0x038E # GREEK CAPITAL LETTER UPSILON WITH TONOS |
|
362 |
0xDB 0x03AD # GREEK SMALL LETTER EPSILON WITH TONOS |
|
363 |
0xDC 0x03AE # GREEK SMALL LETTER ETA WITH TONOS |
|
364 |
0xDD 0x03AF # GREEK SMALL LETTER IOTA WITH TONOS |
|
365 |
0xDE 0x03CC # GREEK SMALL LETTER OMICRON WITH TONOS |
|
366 |
0xDF 0x038F # GREEK CAPITAL LETTER OMEGA WITH TONOS |
|
367 |
0xE0 0x03CD # GREEK SMALL LETTER UPSILON WITH TONOS |
|
368 |
0xE1 0x03B1 # GREEK SMALL LETTER ALPHA |
|
369 |
0xE2 0x03B2 # GREEK SMALL LETTER BETA |
|
370 |
0xE3 0x03C8 # GREEK SMALL LETTER PSI |
|
371 |
0xE4 0x03B4 # GREEK SMALL LETTER DELTA |
|
372 |
0xE5 0x03B5 # GREEK SMALL LETTER EPSILON |
|
373 |
0xE6 0x03C6 # GREEK SMALL LETTER PHI |
|
374 |
0xE7 0x03B3 # GREEK SMALL LETTER GAMMA |
|
375 |
0xE8 0x03B7 # GREEK SMALL LETTER ETA |
|
376 |
0xE9 0x03B9 # GREEK SMALL LETTER IOTA |
|
377 |
0xEA 0x03BE # GREEK SMALL LETTER XI |
|
378 |
0xEB 0x03BA # GREEK SMALL LETTER KAPPA |
|
379 |
0xEC 0x03BB # GREEK SMALL LETTER LAMDA |
|
380 |
0xED 0x03BC # GREEK SMALL LETTER MU |
|
381 |
0xEE 0x03BD # GREEK SMALL LETTER NU |
|
382 |
0xEF 0x03BF # GREEK SMALL LETTER OMICRON |
|
383 |
0xF0 0x03C0 # GREEK SMALL LETTER PI |
|
384 |
0xF1 0x03CE # GREEK SMALL LETTER OMEGA WITH TONOS |
|
385 |
0xF2 0x03C1 # GREEK SMALL LETTER RHO |
|
386 |
0xF3 0x03C3 # GREEK SMALL LETTER SIGMA |
|
387 |
0xF4 0x03C4 # GREEK SMALL LETTER TAU |
|
388 |
0xF5 0x03B8 # GREEK SMALL LETTER THETA |
|
389 |
0xF6 0x03C9 # GREEK SMALL LETTER OMEGA |
|
390 |
0xF7 0x03C2 # GREEK SMALL LETTER FINAL SIGMA |
|
391 |
0xF8 0x03C7 # GREEK SMALL LETTER CHI |
|
392 |
0xF9 0x03C5 # GREEK SMALL LETTER UPSILON |
|
393 |
0xFA 0x03B6 # GREEK SMALL LETTER ZETA |
|
394 |
0xFB 0x03CA # GREEK SMALL LETTER IOTA WITH DIALYTIKA |
|
395 |
0xFC 0x03CB # GREEK SMALL LETTER UPSILON WITH DIALYTIKA |
|
396 |
0xFD 0x0390 # GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS |
|
397 |
0xFE 0x03B0 # GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS |
|
398 |
0xFF 0x00AD # SOFT HYPHEN # before Mac OS 9.2.2, was undefined |
|
399 |
||
400 |
" |
|
401 |
! ! |
|
402 |
||
403 |
!MAC_Greek methodsFor:'encoding & decoding'! |
|
404 |
||
405 |
decode:codeArg |
|
406 |
"Automagically generated by generateCode - do not modify. |
|
407 |
Decode from my encoding into unicode." |
|
408 |
||
409 |
|code "{ Class: SmallInteger }"| |
|
410 |
||
411 |
code := codeArg. |
|
412 |
code <= 16r1F ifTrue:[ |
|
413 |
^ self decodingError. |
|
414 |
]. |
|
415 |
code <= 16r7E ifTrue:[ ^ code ]. |
|
416 |
code > 16rFF ifTrue:[ |
|
417 |
^ self decodingError. |
|
418 |
]. |
|
419 |
[ |
|
420 |
|t| |
|
421 |
t := #( |
|
422 |
"16r007F" 16r0000 " invalid " |
|
423 |
"16r0080" 16r00C4 " LATIN CAPITAL LETTER A WITH DIAERESIS " |
|
424 |
"16r0081" 16r00B9 " SUPERSCRIPT ONE " |
|
425 |
"16r0082" 16r00B2 " SUPERSCRIPT TWO " |
|
426 |
"16r0083" 16r00C9 " LATIN CAPITAL LETTER E WITH ACUTE " |
|
427 |
"16r0084" 16r00B3 " SUPERSCRIPT THREE " |
|
428 |
"16r0085" 16r00D6 " LATIN CAPITAL LETTER O WITH DIAERESIS " |
|
429 |
"16r0086" 16r00DC " LATIN CAPITAL LETTER U WITH DIAERESIS " |
|
430 |
"16r0087" 16r0385 " GREEK DIALYTIKA TONOS " |
|
431 |
"16r0088" 16r00E0 " LATIN SMALL LETTER A WITH GRAVE " |
|
432 |
"16r0089" 16r00E2 " LATIN SMALL LETTER A WITH CIRCUMFLEX " |
|
433 |
"16r008A" 16r00E4 " LATIN SMALL LETTER A WITH DIAERESIS " |
|
434 |
"16r008B" 16r0384 " GREEK TONOS " |
|
435 |
"16r008C" 16r00A8 " DIAERESIS " |
|
436 |
"16r008D" 16r00E7 " LATIN SMALL LETTER C WITH CEDILLA " |
|
437 |
"16r008E" 16r00E9 " LATIN SMALL LETTER E WITH ACUTE " |
|
438 |
"16r008F" 16r00E8 " LATIN SMALL LETTER E WITH GRAVE " |
|
439 |
"16r0090" 16r00EA " LATIN SMALL LETTER E WITH CIRCUMFLEX " |
|
440 |
"16r0091" 16r00EB " LATIN SMALL LETTER E WITH DIAERESIS " |
|
441 |
"16r0092" 16r00A3 " POUND SIGN " |
|
442 |
"16r0093" 16r2122 " TRADE MARK SIGN " |
|
443 |
"16r0094" 16r00EE " LATIN SMALL LETTER I WITH CIRCUMFLEX " |
|
444 |
"16r0095" 16r00EF " LATIN SMALL LETTER I WITH DIAERESIS " |
|
445 |
"16r0096" 16r2022 " BULLET " |
|
446 |
"16r0097" 16r00BD " VULGAR FRACTION ONE HALF " |
|
447 |
"16r0098" 16r2030 " PER MILLE SIGN " |
|
448 |
"16r0099" 16r00F4 " LATIN SMALL LETTER O WITH CIRCUMFLEX " |
|
449 |
"16r009A" 16r00F6 " LATIN SMALL LETTER O WITH DIAERESIS " |
|
450 |
"16r009B" 16r00A6 " BROKEN BAR " |
|
451 |
"16r009C" 16r20AC " EURO SIGN # before Mac OS 9.2.2, was SOFT HYPHEN " |
|
452 |
"16r009D" 16r00F9 " LATIN SMALL LETTER U WITH GRAVE " |
|
453 |
"16r009E" 16r00FB " LATIN SMALL LETTER U WITH CIRCUMFLEX " |
|
454 |
"16r009F" 16r00FC " LATIN SMALL LETTER U WITH DIAERESIS " |
|
455 |
"16r00A0" 16r2020 " DAGGER " |
|
456 |
"16r00A1" 16r0393 " GREEK CAPITAL LETTER GAMMA " |
|
457 |
"16r00A2" 16r0394 " GREEK CAPITAL LETTER DELTA " |
|
458 |
"16r00A3" 16r0398 " GREEK CAPITAL LETTER THETA " |
|
459 |
"16r00A4" 16r039B " GREEK CAPITAL LETTER LAMDA " |
|
460 |
"16r00A5" 16r039E " GREEK CAPITAL LETTER XI " |
|
461 |
"16r00A6" 16r03A0 " GREEK CAPITAL LETTER PI " |
|
462 |
"16r00A7" 16r00DF " LATIN SMALL LETTER SHARP S " |
|
463 |
"16r00A8" 16r00AE " REGISTERED SIGN " |
|
464 |
"16r00A9" 16r00A9 " COPYRIGHT SIGN " |
|
465 |
"16r00AA" 16r03A3 " GREEK CAPITAL LETTER SIGMA " |
|
466 |
"16r00AB" 16r03AA " GREEK CAPITAL LETTER IOTA WITH DIALYTIKA " |
|
467 |
"16r00AC" 16r00A7 " SECTION SIGN " |
|
468 |
"16r00AD" 16r2260 " NOT EQUAL TO " |
|
469 |
"16r00AE" 16r00B0 " DEGREE SIGN " |
|
470 |
"16r00AF" 16r00B7 " MIDDLE DOT " |
|
471 |
"16r00B0" 16r0391 " GREEK CAPITAL LETTER ALPHA " |
|
472 |
"16r00B1" 16r00B1 " PLUS-MINUS SIGN " |
|
473 |
"16r00B2" 16r2264 " LESS-THAN OR EQUAL TO " |
|
474 |
"16r00B3" 16r2265 " GREATER-THAN OR EQUAL TO " |
|
475 |
"16r00B4" 16r00A5 " YEN SIGN " |
|
476 |
"16r00B5" 16r0392 " GREEK CAPITAL LETTER BETA " |
|
477 |
"16r00B6" 16r0395 " GREEK CAPITAL LETTER EPSILON " |
|
478 |
"16r00B7" 16r0396 " GREEK CAPITAL LETTER ZETA " |
|
479 |
"16r00B8" 16r0397 " GREEK CAPITAL LETTER ETA " |
|
480 |
"16r00B9" 16r0399 " GREEK CAPITAL LETTER IOTA " |
|
481 |
"16r00BA" 16r039A " GREEK CAPITAL LETTER KAPPA " |
|
482 |
"16r00BB" 16r039C " GREEK CAPITAL LETTER MU " |
|
483 |
"16r00BC" 16r03A6 " GREEK CAPITAL LETTER PHI " |
|
484 |
"16r00BD" 16r03AB " GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA " |
|
485 |
"16r00BE" 16r03A8 " GREEK CAPITAL LETTER PSI " |
|
486 |
"16r00BF" 16r03A9 " GREEK CAPITAL LETTER OMEGA " |
|
487 |
"16r00C0" 16r03AC " GREEK SMALL LETTER ALPHA WITH TONOS " |
|
488 |
"16r00C1" 16r039D " GREEK CAPITAL LETTER NU " |
|
489 |
"16r00C2" 16r00AC " NOT SIGN " |
|
490 |
"16r00C3" 16r039F " GREEK CAPITAL LETTER OMICRON " |
|
491 |
"16r00C4" 16r03A1 " GREEK CAPITAL LETTER RHO " |
|
492 |
"16r00C5" 16r2248 " ALMOST EQUAL TO " |
|
493 |
"16r00C6" 16r03A4 " GREEK CAPITAL LETTER TAU " |
|
494 |
"16r00C7" 16r00AB " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK " |
|
495 |
"16r00C8" 16r00BB " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK " |
|
496 |
"16r00C9" 16r2026 " HORIZONTAL ELLIPSIS " |
|
497 |
"16r00CA" 16r00A0 " NO-BREAK SPACE " |
|
498 |
"16r00CB" 16r03A5 " GREEK CAPITAL LETTER UPSILON " |
|
499 |
"16r00CC" 16r03A7 " GREEK CAPITAL LETTER CHI " |
|
500 |
"16r00CD" 16r0386 " GREEK CAPITAL LETTER ALPHA WITH TONOS " |
|
501 |
"16r00CE" 16r0388 " GREEK CAPITAL LETTER EPSILON WITH TONOS " |
|
502 |
"16r00CF" 16r0153 " LATIN SMALL LIGATURE OE " |
|
503 |
"16r00D0" 16r2013 " EN DASH " |
|
504 |
"16r00D1" 16r2015 " HORIZONTAL BAR " |
|
505 |
"16r00D2" 16r201C " LEFT DOUBLE QUOTATION MARK " |
|
506 |
"16r00D3" 16r201D " RIGHT DOUBLE QUOTATION MARK " |
|
507 |
"16r00D4" 16r2018 " LEFT SINGLE QUOTATION MARK " |
|
508 |
"16r00D5" 16r2019 " RIGHT SINGLE QUOTATION MARK " |
|
509 |
"16r00D6" 16r00F7 " DIVISION SIGN " |
|
510 |
"16r00D7" 16r0389 " GREEK CAPITAL LETTER ETA WITH TONOS " |
|
511 |
"16r00D8" 16r038A " GREEK CAPITAL LETTER IOTA WITH TONOS " |
|
512 |
"16r00D9" 16r038C " GREEK CAPITAL LETTER OMICRON WITH TONOS " |
|
513 |
"16r00DA" 16r038E " GREEK CAPITAL LETTER UPSILON WITH TONOS " |
|
514 |
"16r00DB" 16r03AD " GREEK SMALL LETTER EPSILON WITH TONOS " |
|
515 |
"16r00DC" 16r03AE " GREEK SMALL LETTER ETA WITH TONOS " |
|
516 |
"16r00DD" 16r03AF " GREEK SMALL LETTER IOTA WITH TONOS " |
|
517 |
"16r00DE" 16r03CC " GREEK SMALL LETTER OMICRON WITH TONOS " |
|
518 |
"16r00DF" 16r038F " GREEK CAPITAL LETTER OMEGA WITH TONOS " |
|
519 |
"16r00E0" 16r03CD " GREEK SMALL LETTER UPSILON WITH TONOS " |
|
520 |
"16r00E1" 16r03B1 " GREEK SMALL LETTER ALPHA " |
|
521 |
"16r00E2" 16r03B2 " GREEK SMALL LETTER BETA " |
|
522 |
"16r00E3" 16r03C8 " GREEK SMALL LETTER PSI " |
|
523 |
"16r00E4" 16r03B4 " GREEK SMALL LETTER DELTA " |
|
524 |
"16r00E5" 16r03B5 " GREEK SMALL LETTER EPSILON " |
|
525 |
"16r00E6" 16r03C6 " GREEK SMALL LETTER PHI " |
|
526 |
"16r00E7" 16r03B3 " GREEK SMALL LETTER GAMMA " |
|
527 |
"16r00E8" 16r03B7 " GREEK SMALL LETTER ETA " |
|
528 |
"16r00E9" 16r03B9 " GREEK SMALL LETTER IOTA " |
|
529 |
"16r00EA" 16r03BE " GREEK SMALL LETTER XI " |
|
530 |
"16r00EB" 16r03BA " GREEK SMALL LETTER KAPPA " |
|
531 |
"16r00EC" 16r03BB " GREEK SMALL LETTER LAMDA " |
|
532 |
"16r00ED" 16r03BC " GREEK SMALL LETTER MU " |
|
533 |
"16r00EE" 16r03BD " GREEK SMALL LETTER NU " |
|
534 |
"16r00EF" 16r03BF " GREEK SMALL LETTER OMICRON " |
|
535 |
"16r00F0" 16r03C0 " GREEK SMALL LETTER PI " |
|
536 |
"16r00F1" 16r03CE " GREEK SMALL LETTER OMEGA WITH TONOS " |
|
537 |
"16r00F2" 16r03C1 " GREEK SMALL LETTER RHO " |
|
538 |
"16r00F3" 16r03C3 " GREEK SMALL LETTER SIGMA " |
|
539 |
"16r00F4" 16r03C4 " GREEK SMALL LETTER TAU " |
|
540 |
"16r00F5" 16r03B8 " GREEK SMALL LETTER THETA " |
|
541 |
"16r00F6" 16r03C9 " GREEK SMALL LETTER OMEGA " |
|
542 |
"16r00F7" 16r03C2 " GREEK SMALL LETTER FINAL SIGMA " |
|
543 |
"16r00F8" 16r03C7 " GREEK SMALL LETTER CHI " |
|
544 |
"16r00F9" 16r03C5 " GREEK SMALL LETTER UPSILON " |
|
545 |
"16r00FA" 16r03B6 " GREEK SMALL LETTER ZETA " |
|
546 |
"16r00FB" 16r03CA " GREEK SMALL LETTER IOTA WITH DIALYTIKA " |
|
547 |
"16r00FC" 16r03CB " GREEK SMALL LETTER UPSILON WITH DIALYTIKA " |
|
548 |
"16r00FD" 16r0390 " GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS " |
|
549 |
"16r00FE" 16r03B0 " GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS " |
|
550 |
"16r00FF" 16r00AD " SOFT HYPHEN # before Mac OS 9.2.2, was undefined " |
|
551 |
) at:(code - 16r7E). |
|
552 |
t == 0 ifFalse:[^ t]. |
|
553 |
^ self decodingError. |
|
554 |
] value. |
|
555 |
! |
|
556 |
||
557 |
encode:unicodeArg |
|
558 |
"Automagically generated by generateCode - do not modify. |
|
559 |
Encode from unicode into my encoding." |
|
560 |
||
561 |
|unicode "{ Class: SmallInteger }"| |
|
562 |
||
563 |
unicode := unicodeArg. |
|
564 |
unicode <= 16r1F ifTrue:[ |
|
565 |
^ self decodingError. |
|
566 |
]. |
|
567 |
unicode <= 16r7E ifTrue:[ ^ unicode ]. |
|
568 |
unicode > 16r2265 ifTrue:[ |
|
569 |
^ self encodingError. |
|
570 |
]. |
|
571 |
unicode <= 16r9F ifTrue:[ |
|
572 |
^ self encodingError |
|
573 |
]. |
|
574 |
unicode <= 16r3CE ifTrue:[ |
|
575 |
unicode <= 16r153 ifTrue:[ |
|
576 |
unicode <= 16rFC ifTrue:[ |
|
577 |
[ |
|
578 |
|t| |
|
579 |
t := #[ |
|
580 |
"16r00A0" 16rCA " NO-BREAK SPACE " |
|
581 |
"16r00A1" 16r00 " invalid " |
|
582 |
"16r00A2" 16r00 " invalid " |
|
583 |
"16r00A3" 16r92 " POUND SIGN " |
|
584 |
"16r00A4" 16r00 " invalid " |
|
585 |
"16r00A5" 16rB4 " YEN SIGN " |
|
586 |
"16r00A6" 16r9B " BROKEN BAR " |
|
587 |
"16r00A7" 16rAC " SECTION SIGN " |
|
588 |
"16r00A8" 16r8C " DIAERESIS " |
|
589 |
"16r00A9" 16rA9 " COPYRIGHT SIGN " |
|
590 |
"16r00AA" 16r00 " invalid " |
|
591 |
"16r00AB" 16rC7 " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK " |
|
592 |
"16r00AC" 16rC2 " NOT SIGN " |
|
593 |
"16r00AD" 16rFF " SOFT HYPHEN # before Mac OS 9.2.2, was undefined " |
|
594 |
"16r00AE" 16rA8 " REGISTERED SIGN " |
|
595 |
"16r00AF" 16r00 " invalid " |
|
596 |
"16r00B0" 16rAE " DEGREE SIGN " |
|
597 |
"16r00B1" 16rB1 " PLUS-MINUS SIGN " |
|
598 |
"16r00B2" 16r82 " SUPERSCRIPT TWO " |
|
599 |
"16r00B3" 16r84 " SUPERSCRIPT THREE " |
|
600 |
"16r00B4" 16r00 " invalid " |
|
601 |
"16r00B5" 16r00 " invalid " |
|
602 |
"16r00B6" 16r00 " invalid " |
|
603 |
"16r00B7" 16rAF " MIDDLE DOT " |
|
604 |
"16r00B8" 16r00 " invalid " |
|
605 |
"16r00B9" 16r81 " SUPERSCRIPT ONE " |
|
606 |
"16r00BA" 16r00 " invalid " |
|
607 |
"16r00BB" 16rC8 " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK " |
|
608 |
"16r00BC" 16r00 " invalid " |
|
609 |
"16r00BD" 16r97 " VULGAR FRACTION ONE HALF " |
|
610 |
"16r00BE" 16r00 " invalid " |
|
611 |
"16r00BF" 16r00 " invalid " |
|
612 |
"16r00C0" 16r00 " invalid " |
|
613 |
"16r00C1" 16r00 " invalid " |
|
614 |
"16r00C2" 16r00 " invalid " |
|
615 |
"16r00C3" 16r00 " invalid " |
|
616 |
"16r00C4" 16r80 " LATIN CAPITAL LETTER A WITH DIAERESIS " |
|
617 |
"16r00C5" 16r00 " invalid " |
|
618 |
"16r00C6" 16r00 " invalid " |
|
619 |
"16r00C7" 16r00 " invalid " |
|
620 |
"16r00C8" 16r00 " invalid " |
|
621 |
"16r00C9" 16r83 " LATIN CAPITAL LETTER E WITH ACUTE " |
|
622 |
"16r00CA" 16r00 " invalid " |
|
623 |
"16r00CB" 16r00 " invalid " |
|
624 |
"16r00CC" 16r00 " invalid " |
|
625 |
"16r00CD" 16r00 " invalid " |
|
626 |
"16r00CE" 16r00 " invalid " |
|
627 |
"16r00CF" 16r00 " invalid " |
|
628 |
"16r00D0" 16r00 " invalid " |
|
629 |
"16r00D1" 16r00 " invalid " |
|
630 |
"16r00D2" 16r00 " invalid " |
|
631 |
"16r00D3" 16r00 " invalid " |
|
632 |
"16r00D4" 16r00 " invalid " |
|
633 |
"16r00D5" 16r00 " invalid " |
|
634 |
"16r00D6" 16r85 " LATIN CAPITAL LETTER O WITH DIAERESIS " |
|
635 |
"16r00D7" 16r00 " invalid " |
|
636 |
"16r00D8" 16r00 " invalid " |
|
637 |
"16r00D9" 16r00 " invalid " |
|
638 |
"16r00DA" 16r00 " invalid " |
|
639 |
"16r00DB" 16r00 " invalid " |
|
640 |
"16r00DC" 16r86 " LATIN CAPITAL LETTER U WITH DIAERESIS " |
|
641 |
"16r00DD" 16r00 " invalid " |
|
642 |
"16r00DE" 16r00 " invalid " |
|
643 |
"16r00DF" 16rA7 " LATIN SMALL LETTER SHARP S " |
|
644 |
"16r00E0" 16r88 " LATIN SMALL LETTER A WITH GRAVE " |
|
645 |
"16r00E1" 16r00 " invalid " |
|
646 |
"16r00E2" 16r89 " LATIN SMALL LETTER A WITH CIRCUMFLEX " |
|
647 |
"16r00E3" 16r00 " invalid " |
|
648 |
"16r00E4" 16r8A " LATIN SMALL LETTER A WITH DIAERESIS " |
|
649 |
"16r00E5" 16r00 " invalid " |
|
650 |
"16r00E6" 16r00 " invalid " |
|
651 |
"16r00E7" 16r8D " LATIN SMALL LETTER C WITH CEDILLA " |
|
652 |
"16r00E8" 16r8F " LATIN SMALL LETTER E WITH GRAVE " |
|
653 |
"16r00E9" 16r8E " LATIN SMALL LETTER E WITH ACUTE " |
|
654 |
"16r00EA" 16r90 " LATIN SMALL LETTER E WITH CIRCUMFLEX " |
|
655 |
"16r00EB" 16r91 " LATIN SMALL LETTER E WITH DIAERESIS " |
|
656 |
"16r00EC" 16r00 " invalid " |
|
657 |
"16r00ED" 16r00 " invalid " |
|
658 |
"16r00EE" 16r94 " LATIN SMALL LETTER I WITH CIRCUMFLEX " |
|
659 |
"16r00EF" 16r95 " LATIN SMALL LETTER I WITH DIAERESIS " |
|
660 |
"16r00F0" 16r00 " invalid " |
|
661 |
"16r00F1" 16r00 " invalid " |
|
662 |
"16r00F2" 16r00 " invalid " |
|
663 |
"16r00F3" 16r00 " invalid " |
|
664 |
"16r00F4" 16r99 " LATIN SMALL LETTER O WITH CIRCUMFLEX " |
|
665 |
"16r00F5" 16r00 " invalid " |
|
666 |
"16r00F6" 16r9A " LATIN SMALL LETTER O WITH DIAERESIS " |
|
667 |
"16r00F7" 16rD6 " DIVISION SIGN " |
|
668 |
"16r00F8" 16r00 " invalid " |
|
669 |
"16r00F9" 16r9D " LATIN SMALL LETTER U WITH GRAVE " |
|
670 |
"16r00FA" 16r00 " invalid " |
|
671 |
"16r00FB" 16r9E " LATIN SMALL LETTER U WITH CIRCUMFLEX " |
|
672 |
"16r00FC" 16r9F " LATIN SMALL LETTER U WITH DIAERESIS " |
|
673 |
] at:(unicode - 16r9F). |
|
674 |
t == 0 ifFalse:[^ t]. |
|
675 |
^ self encodingError |
|
676 |
] value. |
|
677 |
]. |
|
678 |
unicode <= 16r152 ifTrue:[ |
|
679 |
^ self encodingError |
|
680 |
]. |
|
681 |
^ "16r0153" 16r00CF " LATIN SMALL LIGATURE OE " |
|
682 |
]. |
|
683 |
unicode <= 16r383 ifTrue:[ |
|
684 |
^ self encodingError |
|
685 |
]. |
|
686 |
[ |
|
687 |
|t| |
|
688 |
t := #[ |
|
689 |
"16r0384" 16r8B " GREEK TONOS " |
|
690 |
"16r0385" 16r87 " GREEK DIALYTIKA TONOS " |
|
691 |
"16r0386" 16rCD " GREEK CAPITAL LETTER ALPHA WITH TONOS " |
|
692 |
"16r0387" 16r00 " invalid " |
|
693 |
"16r0388" 16rCE " GREEK CAPITAL LETTER EPSILON WITH TONOS " |
|
694 |
"16r0389" 16rD7 " GREEK CAPITAL LETTER ETA WITH TONOS " |
|
695 |
"16r038A" 16rD8 " GREEK CAPITAL LETTER IOTA WITH TONOS " |
|
696 |
"16r038B" 16r00 " invalid " |
|
697 |
"16r038C" 16rD9 " GREEK CAPITAL LETTER OMICRON WITH TONOS " |
|
698 |
"16r038D" 16r00 " invalid " |
|
699 |
"16r038E" 16rDA " GREEK CAPITAL LETTER UPSILON WITH TONOS " |
|
700 |
"16r038F" 16rDF " GREEK CAPITAL LETTER OMEGA WITH TONOS " |
|
701 |
"16r0390" 16rFD " GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS " |
|
702 |
"16r0391" 16rB0 " GREEK CAPITAL LETTER ALPHA " |
|
703 |
"16r0392" 16rB5 " GREEK CAPITAL LETTER BETA " |
|
704 |
"16r0393" 16rA1 " GREEK CAPITAL LETTER GAMMA " |
|
705 |
"16r0394" 16rA2 " GREEK CAPITAL LETTER DELTA " |
|
706 |
"16r0395" 16rB6 " GREEK CAPITAL LETTER EPSILON " |
|
707 |
"16r0396" 16rB7 " GREEK CAPITAL LETTER ZETA " |
|
708 |
"16r0397" 16rB8 " GREEK CAPITAL LETTER ETA " |
|
709 |
"16r0398" 16rA3 " GREEK CAPITAL LETTER THETA " |
|
710 |
"16r0399" 16rB9 " GREEK CAPITAL LETTER IOTA " |
|
711 |
"16r039A" 16rBA " GREEK CAPITAL LETTER KAPPA " |
|
712 |
"16r039B" 16rA4 " GREEK CAPITAL LETTER LAMDA " |
|
713 |
"16r039C" 16rBB " GREEK CAPITAL LETTER MU " |
|
714 |
"16r039D" 16rC1 " GREEK CAPITAL LETTER NU " |
|
715 |
"16r039E" 16rA5 " GREEK CAPITAL LETTER XI " |
|
716 |
"16r039F" 16rC3 " GREEK CAPITAL LETTER OMICRON " |
|
717 |
"16r03A0" 16rA6 " GREEK CAPITAL LETTER PI " |
|
718 |
"16r03A1" 16rC4 " GREEK CAPITAL LETTER RHO " |
|
719 |
"16r03A2" 16r00 " invalid " |
|
720 |
"16r03A3" 16rAA " GREEK CAPITAL LETTER SIGMA " |
|
721 |
"16r03A4" 16rC6 " GREEK CAPITAL LETTER TAU " |
|
722 |
"16r03A5" 16rCB " GREEK CAPITAL LETTER UPSILON " |
|
723 |
"16r03A6" 16rBC " GREEK CAPITAL LETTER PHI " |
|
724 |
"16r03A7" 16rCC " GREEK CAPITAL LETTER CHI " |
|
725 |
"16r03A8" 16rBE " GREEK CAPITAL LETTER PSI " |
|
726 |
"16r03A9" 16rBF " GREEK CAPITAL LETTER OMEGA " |
|
727 |
"16r03AA" 16rAB " GREEK CAPITAL LETTER IOTA WITH DIALYTIKA " |
|
728 |
"16r03AB" 16rBD " GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA " |
|
729 |
"16r03AC" 16rC0 " GREEK SMALL LETTER ALPHA WITH TONOS " |
|
730 |
"16r03AD" 16rDB " GREEK SMALL LETTER EPSILON WITH TONOS " |
|
731 |
"16r03AE" 16rDC " GREEK SMALL LETTER ETA WITH TONOS " |
|
732 |
"16r03AF" 16rDD " GREEK SMALL LETTER IOTA WITH TONOS " |
|
733 |
"16r03B0" 16rFE " GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS " |
|
734 |
"16r03B1" 16rE1 " GREEK SMALL LETTER ALPHA " |
|
735 |
"16r03B2" 16rE2 " GREEK SMALL LETTER BETA " |
|
736 |
"16r03B3" 16rE7 " GREEK SMALL LETTER GAMMA " |
|
737 |
"16r03B4" 16rE4 " GREEK SMALL LETTER DELTA " |
|
738 |
"16r03B5" 16rE5 " GREEK SMALL LETTER EPSILON " |
|
739 |
"16r03B6" 16rFA " GREEK SMALL LETTER ZETA " |
|
740 |
"16r03B7" 16rE8 " GREEK SMALL LETTER ETA " |
|
741 |
"16r03B8" 16rF5 " GREEK SMALL LETTER THETA " |
|
742 |
"16r03B9" 16rE9 " GREEK SMALL LETTER IOTA " |
|
743 |
"16r03BA" 16rEB " GREEK SMALL LETTER KAPPA " |
|
744 |
"16r03BB" 16rEC " GREEK SMALL LETTER LAMDA " |
|
745 |
"16r03BC" 16rED " GREEK SMALL LETTER MU " |
|
746 |
"16r03BD" 16rEE " GREEK SMALL LETTER NU " |
|
747 |
"16r03BE" 16rEA " GREEK SMALL LETTER XI " |
|
748 |
"16r03BF" 16rEF " GREEK SMALL LETTER OMICRON " |
|
749 |
"16r03C0" 16rF0 " GREEK SMALL LETTER PI " |
|
750 |
"16r03C1" 16rF2 " GREEK SMALL LETTER RHO " |
|
751 |
"16r03C2" 16rF7 " GREEK SMALL LETTER FINAL SIGMA " |
|
752 |
"16r03C3" 16rF3 " GREEK SMALL LETTER SIGMA " |
|
753 |
"16r03C4" 16rF4 " GREEK SMALL LETTER TAU " |
|
754 |
"16r03C5" 16rF9 " GREEK SMALL LETTER UPSILON " |
|
755 |
"16r03C6" 16rE6 " GREEK SMALL LETTER PHI " |
|
756 |
"16r03C7" 16rF8 " GREEK SMALL LETTER CHI " |
|
757 |
"16r03C8" 16rE3 " GREEK SMALL LETTER PSI " |
|
758 |
"16r03C9" 16rF6 " GREEK SMALL LETTER OMEGA " |
|
759 |
"16r03CA" 16rFB " GREEK SMALL LETTER IOTA WITH DIALYTIKA " |
|
760 |
"16r03CB" 16rFC " GREEK SMALL LETTER UPSILON WITH DIALYTIKA " |
|
761 |
"16r03CC" 16rDE " GREEK SMALL LETTER OMICRON WITH TONOS " |
|
762 |
"16r03CD" 16rE0 " GREEK SMALL LETTER UPSILON WITH TONOS " |
|
763 |
"16r03CE" 16rF1 " GREEK SMALL LETTER OMEGA WITH TONOS " |
|
764 |
] at:(unicode - 16r383). |
|
765 |
t == 0 ifFalse:[^ t]. |
|
766 |
^ self encodingError |
|
767 |
] value. |
|
768 |
]. |
|
769 |
unicode <= 16r2012 ifTrue:[ |
|
770 |
^ self encodingError |
|
771 |
]. |
|
772 |
unicode <= 16r2122 ifTrue:[ |
|
773 |
unicode <= 16r2030 ifTrue:[ |
|
774 |
[ |
|
775 |
|t| |
|
776 |
t := #[ |
|
777 |
"16r2013" 16rD0 " EN DASH " |
|
778 |
"16r2014" 16r00 " invalid " |
|
779 |
"16r2015" 16rD1 " HORIZONTAL BAR " |
|
780 |
"16r2016" 16r00 " invalid " |
|
781 |
"16r2017" 16r00 " invalid " |
|
782 |
"16r2018" 16rD4 " LEFT SINGLE QUOTATION MARK " |
|
783 |
"16r2019" 16rD5 " RIGHT SINGLE QUOTATION MARK " |
|
784 |
"16r201A" 16r00 " invalid " |
|
785 |
"16r201B" 16r00 " invalid " |
|
786 |
"16r201C" 16rD2 " LEFT DOUBLE QUOTATION MARK " |
|
787 |
"16r201D" 16rD3 " RIGHT DOUBLE QUOTATION MARK " |
|
788 |
"16r201E" 16r00 " invalid " |
|
789 |
"16r201F" 16r00 " invalid " |
|
790 |
"16r2020" 16rA0 " DAGGER " |
|
791 |
"16r2021" 16r00 " invalid " |
|
792 |
"16r2022" 16r96 " BULLET " |
|
793 |
"16r2023" 16r00 " invalid " |
|
794 |
"16r2024" 16r00 " invalid " |
|
795 |
"16r2025" 16r00 " invalid " |
|
796 |
"16r2026" 16rC9 " HORIZONTAL ELLIPSIS " |
|
797 |
"16r2027" 16r00 " invalid " |
|
798 |
"16r2028" 16r00 " invalid " |
|
799 |
"16r2029" 16r00 " invalid " |
|
800 |
"16r202A" 16r00 " invalid " |
|
801 |
"16r202B" 16r00 " invalid " |
|
802 |
"16r202C" 16r00 " invalid " |
|
803 |
"16r202D" 16r00 " invalid " |
|
804 |
"16r202E" 16r00 " invalid " |
|
805 |
"16r202F" 16r00 " invalid " |
|
806 |
"16r2030" 16r98 " PER MILLE SIGN " |
|
807 |
] at:(unicode - 16r2012). |
|
808 |
t == 0 ifFalse:[^ t]. |
|
809 |
^ self encodingError |
|
810 |
] value. |
|
811 |
]. |
|
812 |
unicode <= 16r20AB ifTrue:[ |
|
813 |
^ self encodingError |
|
814 |
]. |
|
815 |
unicode == 16r20AC ifTrue:[ |
|
816 |
^ "16r20AC" 16r009C " EURO SIGN # before Mac OS 9.2.2, was SOFT HYPHEN " |
|
817 |
]. |
|
818 |
unicode <= 16r2121 ifTrue:[ |
|
819 |
^ self encodingError |
|
820 |
]. |
|
821 |
^ "16r2122" 16r0093 " TRADE MARK SIGN " |
|
822 |
]. |
|
823 |
unicode <= 16r2247 ifTrue:[ |
|
824 |
^ self encodingError |
|
825 |
]. |
|
826 |
unicode == 16r2248 ifTrue:[ |
|
827 |
^ "16r2248" 16r00C5 " ALMOST EQUAL TO " |
|
828 |
]. |
|
829 |
unicode <= 16r225F ifTrue:[ |
|
830 |
^ self encodingError |
|
831 |
]. |
|
832 |
[ |
|
833 |
|t| |
|
834 |
t := #[ |
|
835 |
"16r2260" 16rAD " NOT EQUAL TO " |
|
836 |
"16r2261" 16r00 " invalid " |
|
837 |
"16r2262" 16r00 " invalid " |
|
838 |
"16r2263" 16r00 " invalid " |
|
839 |
"16r2264" 16rB2 " LESS-THAN OR EQUAL TO " |
|
840 |
"16r2265" 16rB3 " GREATER-THAN OR EQUAL TO " |
|
841 |
] at:(unicode - 16r225F). |
|
842 |
t == 0 ifFalse:[^ t]. |
|
843 |
^ self encodingError |
|
844 |
] value. |
|
845 |
! ! |
|
846 |
||
847 |
!MAC_Greek class methodsFor:'documentation'! |
|
848 |
||
849 |
version |
|
17728
bbc5fa73dfab
Merged with trunk r10466
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
17711
diff
changeset
|
850 |
^ '$Id: CharacterEncoderImplementations__MAC_Greek.st 10467 2009-08-19 16:14:36Z vranyj1 $' |
8081 | 851 |
! ! |