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 |
"
|
8081
|
12 |
"{ Package: 'stx:libbasic' }"
|
|
13 |
|
|
14 |
"{ NameSpace: CharacterEncoderImplementations }"
|
|
15 |
|
|
16 |
SingleByteEncoder subclass:#ISO8859_8
|
|
17 |
instanceVariableNames:''
|
|
18 |
classVariableNames:''
|
|
19 |
poolDictionaries:''
|
|
20 |
category:'Collections-Text-Encodings'
|
|
21 |
!
|
|
22 |
|
8148
|
23 |
!ISO8859_8 class methodsFor:'documentation'!
|
|
24 |
|
|
25 |
copyright
|
|
26 |
"
|
|
27 |
COPYRIGHT (c) 2004 by eXept Software AG
|
|
28 |
All Rights Reserved
|
|
29 |
|
|
30 |
This software is furnished under a license and may be used
|
|
31 |
only in accordance with the terms of that license and with the
|
|
32 |
inclusion of the above copyright notice. This software may not
|
|
33 |
be provided or otherwise made available to, or used by, any
|
|
34 |
other person. No title to or ownership of the software is
|
|
35 |
hereby transferred.
|
|
36 |
"
|
8811
|
37 |
!
|
|
38 |
|
|
39 |
documentation
|
|
40 |
"
|
|
41 |
8859-8 - Hebrew.
|
|
42 |
|
|
43 |
[see with:]
|
|
44 |
CharacterEncoderImplementations::ISO8859_8 showCharacterSet
|
|
45 |
|
|
46 |
[author:]
|
|
47 |
Claus Gittinger
|
|
48 |
"
|
8148
|
49 |
! !
|
8081
|
50 |
|
|
51 |
!ISO8859_8 class methodsFor:'mapping'!
|
|
52 |
|
|
53 |
mapFileURL1_relativePathName
|
|
54 |
^ 'ISO8859/8859-8.TXT'
|
|
55 |
!
|
|
56 |
|
|
57 |
mapping
|
|
58 |
"
|
|
59 |
# From: http://www.unicode.org/Public/MAPPINGS/ISO8859/8859-8.TXT
|
|
60 |
|
|
61 |
#
|
|
62 |
# Name: ISO/IEC 8859-8:1999 to Unicode
|
|
63 |
# Unicode version: 3.0
|
|
64 |
# Table version: 1.1
|
|
65 |
# Table format: Format A
|
|
66 |
# Date: 2000-Jan-03
|
|
67 |
# Authors: Ken Whistler <kenw@sybase.com>
|
|
68 |
#
|
|
69 |
# Copyright (c) 1991-1999 Unicode, Inc. All Rights reserved.
|
|
70 |
#
|
|
71 |
# This file is provided as-is by Unicode, Inc. (The Unicode Consortium).
|
|
72 |
# No claims are made as to fitness for any particular purpose. No
|
|
73 |
# warranties of any kind are expressed or implied. The recipient
|
|
74 |
# agrees to determine applicability of information provided. If this
|
|
75 |
# file has been provided on optical media by Unicode, Inc., the sole
|
|
76 |
# remedy for any claim will be exchange of defective media within 90
|
|
77 |
# days of receipt.
|
|
78 |
#
|
|
79 |
# Unicode, Inc. hereby grants the right to freely use the information
|
|
80 |
# supplied in this file in the creation of products supporting the
|
|
81 |
# Unicode Standard, and to make copies of this file in any form for
|
|
82 |
# internal or external distribution as long as this notice remains
|
|
83 |
# attached.
|
|
84 |
#
|
|
85 |
# General notes:
|
|
86 |
#
|
|
87 |
# This table contains the data the Unicode Consortium has on how
|
|
88 |
# ISO/IEC 8859-8:1999 characters map into Unicode.
|
|
89 |
#
|
|
90 |
# Format: Three tab-separated columns
|
|
91 |
# Column #1 is the ISO/IEC 8859-8 code (in hex as 0xXX)
|
|
92 |
# Column #2 is the Unicode (in hex as 0xXXXX)
|
|
93 |
# Column #3 the Unicode name (follows a comment sign, '#')
|
|
94 |
#
|
|
95 |
# The entries are in ISO/IEC 8859-8 order.
|
|
96 |
#
|
|
97 |
# Version history
|
|
98 |
# 1.0 version updates 0.1 version by adding mappings for all
|
|
99 |
# control characters.
|
|
100 |
# 1.1 version updates to the published 8859-8:1999, correcting
|
|
101 |
# the mapping of 0xAF and adding mappings for LRM and RLM.
|
|
102 |
#
|
|
103 |
# Updated versions of this file may be found in:
|
|
104 |
# <ftp://ftp.unicode.org/Public/MAPPINGS/>
|
|
105 |
#
|
|
106 |
# Any comments or problems, contact <errata@unicode.org>
|
|
107 |
# Please note that <errata@unicode.org> is an archival address;
|
|
108 |
# notices will be checked, but do not expect an immediate response.
|
|
109 |
#
|
|
110 |
0x00 0x0000 # NULL
|
|
111 |
0x01 0x0001 # START OF HEADING
|
|
112 |
0x02 0x0002 # START OF TEXT
|
|
113 |
0x03 0x0003 # END OF TEXT
|
|
114 |
0x04 0x0004 # END OF TRANSMISSION
|
|
115 |
0x05 0x0005 # ENQUIRY
|
|
116 |
0x06 0x0006 # ACKNOWLEDGE
|
|
117 |
0x07 0x0007 # BELL
|
|
118 |
0x08 0x0008 # BACKSPACE
|
|
119 |
0x09 0x0009 # HORIZONTAL TABULATION
|
|
120 |
0x0A 0x000A # LINE FEED
|
|
121 |
0x0B 0x000B # VERTICAL TABULATION
|
|
122 |
0x0C 0x000C # FORM FEED
|
|
123 |
0x0D 0x000D # CARRIAGE RETURN
|
|
124 |
0x0E 0x000E # SHIFT OUT
|
|
125 |
0x0F 0x000F # SHIFT IN
|
|
126 |
0x10 0x0010 # DATA LINK ESCAPE
|
|
127 |
0x11 0x0011 # DEVICE CONTROL ONE
|
|
128 |
0x12 0x0012 # DEVICE CONTROL TWO
|
|
129 |
0x13 0x0013 # DEVICE CONTROL THREE
|
|
130 |
0x14 0x0014 # DEVICE CONTROL FOUR
|
|
131 |
0x15 0x0015 # NEGATIVE ACKNOWLEDGE
|
|
132 |
0x16 0x0016 # SYNCHRONOUS IDLE
|
|
133 |
0x17 0x0017 # END OF TRANSMISSION BLOCK
|
|
134 |
0x18 0x0018 # CANCEL
|
|
135 |
0x19 0x0019 # END OF MEDIUM
|
|
136 |
0x1A 0x001A # SUBSTITUTE
|
|
137 |
0x1B 0x001B # ESCAPE
|
|
138 |
0x1C 0x001C # FILE SEPARATOR
|
|
139 |
0x1D 0x001D # GROUP SEPARATOR
|
|
140 |
0x1E 0x001E # RECORD SEPARATOR
|
|
141 |
0x1F 0x001F # UNIT SEPARATOR
|
|
142 |
0x20 0x0020 # SPACE
|
|
143 |
0x21 0x0021 # EXCLAMATION MARK
|
|
144 |
0x22 0x0022 # QUOTATION MARK
|
|
145 |
0x23 0x0023 # NUMBER SIGN
|
|
146 |
0x24 0x0024 # DOLLAR SIGN
|
|
147 |
0x25 0x0025 # PERCENT SIGN
|
|
148 |
0x26 0x0026 # AMPERSAND
|
|
149 |
0x27 0x0027 # APOSTROPHE
|
|
150 |
0x28 0x0028 # LEFT PARENTHESIS
|
|
151 |
0x29 0x0029 # RIGHT PARENTHESIS
|
|
152 |
0x2A 0x002A # ASTERISK
|
|
153 |
0x2B 0x002B # PLUS SIGN
|
|
154 |
0x2C 0x002C # COMMA
|
|
155 |
0x2D 0x002D # HYPHEN-MINUS
|
|
156 |
0x2E 0x002E # FULL STOP
|
|
157 |
0x2F 0x002F # SOLIDUS
|
|
158 |
0x30 0x0030 # DIGIT ZERO
|
|
159 |
0x31 0x0031 # DIGIT ONE
|
|
160 |
0x32 0x0032 # DIGIT TWO
|
|
161 |
0x33 0x0033 # DIGIT THREE
|
|
162 |
0x34 0x0034 # DIGIT FOUR
|
|
163 |
0x35 0x0035 # DIGIT FIVE
|
|
164 |
0x36 0x0036 # DIGIT SIX
|
|
165 |
0x37 0x0037 # DIGIT SEVEN
|
|
166 |
0x38 0x0038 # DIGIT EIGHT
|
|
167 |
0x39 0x0039 # DIGIT NINE
|
|
168 |
0x3A 0x003A # COLON
|
|
169 |
0x3B 0x003B # SEMICOLON
|
|
170 |
0x3C 0x003C # LESS-THAN SIGN
|
|
171 |
0x3D 0x003D # EQUALS SIGN
|
|
172 |
0x3E 0x003E # GREATER-THAN SIGN
|
|
173 |
0x3F 0x003F # QUESTION MARK
|
|
174 |
0x40 0x0040 # COMMERCIAL AT
|
|
175 |
0x41 0x0041 # LATIN CAPITAL LETTER A
|
|
176 |
0x42 0x0042 # LATIN CAPITAL LETTER B
|
|
177 |
0x43 0x0043 # LATIN CAPITAL LETTER C
|
|
178 |
0x44 0x0044 # LATIN CAPITAL LETTER D
|
|
179 |
0x45 0x0045 # LATIN CAPITAL LETTER E
|
|
180 |
0x46 0x0046 # LATIN CAPITAL LETTER F
|
|
181 |
0x47 0x0047 # LATIN CAPITAL LETTER G
|
|
182 |
0x48 0x0048 # LATIN CAPITAL LETTER H
|
|
183 |
0x49 0x0049 # LATIN CAPITAL LETTER I
|
|
184 |
0x4A 0x004A # LATIN CAPITAL LETTER J
|
|
185 |
0x4B 0x004B # LATIN CAPITAL LETTER K
|
|
186 |
0x4C 0x004C # LATIN CAPITAL LETTER L
|
|
187 |
0x4D 0x004D # LATIN CAPITAL LETTER M
|
|
188 |
0x4E 0x004E # LATIN CAPITAL LETTER N
|
|
189 |
0x4F 0x004F # LATIN CAPITAL LETTER O
|
|
190 |
0x50 0x0050 # LATIN CAPITAL LETTER P
|
|
191 |
0x51 0x0051 # LATIN CAPITAL LETTER Q
|
|
192 |
0x52 0x0052 # LATIN CAPITAL LETTER R
|
|
193 |
0x53 0x0053 # LATIN CAPITAL LETTER S
|
|
194 |
0x54 0x0054 # LATIN CAPITAL LETTER T
|
|
195 |
0x55 0x0055 # LATIN CAPITAL LETTER U
|
|
196 |
0x56 0x0056 # LATIN CAPITAL LETTER V
|
|
197 |
0x57 0x0057 # LATIN CAPITAL LETTER W
|
|
198 |
0x58 0x0058 # LATIN CAPITAL LETTER X
|
|
199 |
0x59 0x0059 # LATIN CAPITAL LETTER Y
|
|
200 |
0x5A 0x005A # LATIN CAPITAL LETTER Z
|
|
201 |
0x5B 0x005B # LEFT SQUARE BRACKET
|
|
202 |
0x5C 0x005C # REVERSE SOLIDUS
|
|
203 |
0x5D 0x005D # RIGHT SQUARE BRACKET
|
|
204 |
0x5E 0x005E # CIRCUMFLEX ACCENT
|
|
205 |
0x5F 0x005F # LOW LINE
|
|
206 |
0x60 0x0060 # GRAVE ACCENT
|
|
207 |
0x61 0x0061 # LATIN SMALL LETTER A
|
|
208 |
0x62 0x0062 # LATIN SMALL LETTER B
|
|
209 |
0x63 0x0063 # LATIN SMALL LETTER C
|
|
210 |
0x64 0x0064 # LATIN SMALL LETTER D
|
|
211 |
0x65 0x0065 # LATIN SMALL LETTER E
|
|
212 |
0x66 0x0066 # LATIN SMALL LETTER F
|
|
213 |
0x67 0x0067 # LATIN SMALL LETTER G
|
|
214 |
0x68 0x0068 # LATIN SMALL LETTER H
|
|
215 |
0x69 0x0069 # LATIN SMALL LETTER I
|
|
216 |
0x6A 0x006A # LATIN SMALL LETTER J
|
|
217 |
0x6B 0x006B # LATIN SMALL LETTER K
|
|
218 |
0x6C 0x006C # LATIN SMALL LETTER L
|
|
219 |
0x6D 0x006D # LATIN SMALL LETTER M
|
|
220 |
0x6E 0x006E # LATIN SMALL LETTER N
|
|
221 |
0x6F 0x006F # LATIN SMALL LETTER O
|
|
222 |
0x70 0x0070 # LATIN SMALL LETTER P
|
|
223 |
0x71 0x0071 # LATIN SMALL LETTER Q
|
|
224 |
0x72 0x0072 # LATIN SMALL LETTER R
|
|
225 |
0x73 0x0073 # LATIN SMALL LETTER S
|
|
226 |
0x74 0x0074 # LATIN SMALL LETTER T
|
|
227 |
0x75 0x0075 # LATIN SMALL LETTER U
|
|
228 |
0x76 0x0076 # LATIN SMALL LETTER V
|
|
229 |
0x77 0x0077 # LATIN SMALL LETTER W
|
|
230 |
0x78 0x0078 # LATIN SMALL LETTER X
|
|
231 |
0x79 0x0079 # LATIN SMALL LETTER Y
|
|
232 |
0x7A 0x007A # LATIN SMALL LETTER Z
|
|
233 |
0x7B 0x007B # LEFT CURLY BRACKET
|
|
234 |
0x7C 0x007C # VERTICAL LINE
|
|
235 |
0x7D 0x007D # RIGHT CURLY BRACKET
|
|
236 |
0x7E 0x007E # TILDE
|
|
237 |
0x7F 0x007F # DELETE
|
|
238 |
0x80 0x0080 # <control>
|
|
239 |
0x81 0x0081 # <control>
|
|
240 |
0x82 0x0082 # <control>
|
|
241 |
0x83 0x0083 # <control>
|
|
242 |
0x84 0x0084 # <control>
|
|
243 |
0x85 0x0085 # <control>
|
|
244 |
0x86 0x0086 # <control>
|
|
245 |
0x87 0x0087 # <control>
|
|
246 |
0x88 0x0088 # <control>
|
|
247 |
0x89 0x0089 # <control>
|
|
248 |
0x8A 0x008A # <control>
|
|
249 |
0x8B 0x008B # <control>
|
|
250 |
0x8C 0x008C # <control>
|
|
251 |
0x8D 0x008D # <control>
|
|
252 |
0x8E 0x008E # <control>
|
|
253 |
0x8F 0x008F # <control>
|
|
254 |
0x90 0x0090 # <control>
|
|
255 |
0x91 0x0091 # <control>
|
|
256 |
0x92 0x0092 # <control>
|
|
257 |
0x93 0x0093 # <control>
|
|
258 |
0x94 0x0094 # <control>
|
|
259 |
0x95 0x0095 # <control>
|
|
260 |
0x96 0x0096 # <control>
|
|
261 |
0x97 0x0097 # <control>
|
|
262 |
0x98 0x0098 # <control>
|
|
263 |
0x99 0x0099 # <control>
|
|
264 |
0x9A 0x009A # <control>
|
|
265 |
0x9B 0x009B # <control>
|
|
266 |
0x9C 0x009C # <control>
|
|
267 |
0x9D 0x009D # <control>
|
|
268 |
0x9E 0x009E # <control>
|
|
269 |
0x9F 0x009F # <control>
|
|
270 |
0xA0 0x00A0 # NO-BREAK SPACE
|
|
271 |
0xA2 0x00A2 # CENT SIGN
|
|
272 |
0xA3 0x00A3 # POUND SIGN
|
|
273 |
0xA4 0x00A4 # CURRENCY SIGN
|
|
274 |
0xA5 0x00A5 # YEN SIGN
|
|
275 |
0xA6 0x00A6 # BROKEN BAR
|
|
276 |
0xA7 0x00A7 # SECTION SIGN
|
|
277 |
0xA8 0x00A8 # DIAERESIS
|
|
278 |
0xA9 0x00A9 # COPYRIGHT SIGN
|
|
279 |
0xAA 0x00D7 # MULTIPLICATION SIGN
|
|
280 |
0xAB 0x00AB # LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
|
|
281 |
0xAC 0x00AC # NOT SIGN
|
|
282 |
0xAD 0x00AD # SOFT HYPHEN
|
|
283 |
0xAE 0x00AE # REGISTERED SIGN
|
|
284 |
0xAF 0x00AF # MACRON
|
|
285 |
0xB0 0x00B0 # DEGREE SIGN
|
|
286 |
0xB1 0x00B1 # PLUS-MINUS SIGN
|
|
287 |
0xB2 0x00B2 # SUPERSCRIPT TWO
|
|
288 |
0xB3 0x00B3 # SUPERSCRIPT THREE
|
|
289 |
0xB4 0x00B4 # ACUTE ACCENT
|
|
290 |
0xB5 0x00B5 # MICRO SIGN
|
|
291 |
0xB6 0x00B6 # PILCROW SIGN
|
|
292 |
0xB7 0x00B7 # MIDDLE DOT
|
|
293 |
0xB8 0x00B8 # CEDILLA
|
|
294 |
0xB9 0x00B9 # SUPERSCRIPT ONE
|
|
295 |
0xBA 0x00F7 # DIVISION SIGN
|
|
296 |
0xBB 0x00BB # RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
|
|
297 |
0xBC 0x00BC # VULGAR FRACTION ONE QUARTER
|
|
298 |
0xBD 0x00BD # VULGAR FRACTION ONE HALF
|
|
299 |
0xBE 0x00BE # VULGAR FRACTION THREE QUARTERS
|
|
300 |
0xDF 0x2017 # DOUBLE LOW LINE
|
|
301 |
0xE0 0x05D0 # HEBREW LETTER ALEF
|
|
302 |
0xE1 0x05D1 # HEBREW LETTER BET
|
|
303 |
0xE2 0x05D2 # HEBREW LETTER GIMEL
|
|
304 |
0xE3 0x05D3 # HEBREW LETTER DALET
|
|
305 |
0xE4 0x05D4 # HEBREW LETTER HE
|
|
306 |
0xE5 0x05D5 # HEBREW LETTER VAV
|
|
307 |
0xE6 0x05D6 # HEBREW LETTER ZAYIN
|
|
308 |
0xE7 0x05D7 # HEBREW LETTER HET
|
|
309 |
0xE8 0x05D8 # HEBREW LETTER TET
|
|
310 |
0xE9 0x05D9 # HEBREW LETTER YOD
|
|
311 |
0xEA 0x05DA # HEBREW LETTER FINAL KAF
|
|
312 |
0xEB 0x05DB # HEBREW LETTER KAF
|
|
313 |
0xEC 0x05DC # HEBREW LETTER LAMED
|
|
314 |
0xED 0x05DD # HEBREW LETTER FINAL MEM
|
|
315 |
0xEE 0x05DE # HEBREW LETTER MEM
|
|
316 |
0xEF 0x05DF # HEBREW LETTER FINAL NUN
|
|
317 |
0xF0 0x05E0 # HEBREW LETTER NUN
|
|
318 |
0xF1 0x05E1 # HEBREW LETTER SAMEKH
|
|
319 |
0xF2 0x05E2 # HEBREW LETTER AYIN
|
|
320 |
0xF3 0x05E3 # HEBREW LETTER FINAL PE
|
|
321 |
0xF4 0x05E4 # HEBREW LETTER PE
|
|
322 |
0xF5 0x05E5 # HEBREW LETTER FINAL TSADI
|
|
323 |
0xF6 0x05E6 # HEBREW LETTER TSADI
|
|
324 |
0xF7 0x05E7 # HEBREW LETTER QOF
|
|
325 |
0xF8 0x05E8 # HEBREW LETTER RESH
|
|
326 |
0xF9 0x05E9 # HEBREW LETTER SHIN
|
|
327 |
0xFA 0x05EA # HEBREW LETTER TAV
|
|
328 |
0xFD 0x200E # LEFT-TO-RIGHT MARK
|
|
329 |
0xFE 0x200F # RIGHT-TO-LEFT MARK
|
|
330 |
|
|
331 |
|
|
332 |
"
|
|
333 |
! !
|
|
334 |
|
14198
|
335 |
!ISO8859_8 class methodsFor:'queries'!
|
|
336 |
|
|
337 |
userFriendlyNameOfEncoding
|
|
338 |
^ 'Hebrew'
|
|
339 |
! !
|
|
340 |
|
8081
|
341 |
!ISO8859_8 methodsFor:'encoding & decoding'!
|
|
342 |
|
|
343 |
decode:codeArg
|
|
344 |
"Automagically generated by generateCode - do not modify.
|
|
345 |
Decode from my encoding into unicode."
|
|
346 |
|
|
347 |
|code "{ Class: SmallInteger }"|
|
|
348 |
|
|
349 |
code := codeArg.
|
|
350 |
code <= 16rA0 ifTrue:[ ^ code ].
|
|
351 |
code > 16rFE ifTrue:[
|
|
352 |
^ self decodingError.
|
|
353 |
].
|
|
354 |
code <= 16rBE ifTrue:[
|
|
355 |
[
|
|
356 |
|t|
|
|
357 |
t := #[
|
|
358 |
"16r00A1" 16r00 " invalid "
|
|
359 |
"16r00A2" 16rA2 " CENT SIGN "
|
|
360 |
"16r00A3" 16rA3 " POUND SIGN "
|
|
361 |
"16r00A4" 16rA4 " CURRENCY SIGN "
|
|
362 |
"16r00A5" 16rA5 " YEN SIGN "
|
|
363 |
"16r00A6" 16rA6 " BROKEN BAR "
|
|
364 |
"16r00A7" 16rA7 " SECTION SIGN "
|
|
365 |
"16r00A8" 16rA8 " DIAERESIS "
|
|
366 |
"16r00A9" 16rA9 " COPYRIGHT SIGN "
|
|
367 |
"16r00AA" 16rD7 " MULTIPLICATION SIGN "
|
|
368 |
"16r00AB" 16rAB " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK "
|
|
369 |
"16r00AC" 16rAC " NOT SIGN "
|
|
370 |
"16r00AD" 16rAD " SOFT HYPHEN "
|
|
371 |
"16r00AE" 16rAE " REGISTERED SIGN "
|
|
372 |
"16r00AF" 16rAF " MACRON "
|
|
373 |
"16r00B0" 16rB0 " DEGREE SIGN "
|
|
374 |
"16r00B1" 16rB1 " PLUS-MINUS SIGN "
|
|
375 |
"16r00B2" 16rB2 " SUPERSCRIPT TWO "
|
|
376 |
"16r00B3" 16rB3 " SUPERSCRIPT THREE "
|
|
377 |
"16r00B4" 16rB4 " ACUTE ACCENT "
|
|
378 |
"16r00B5" 16rB5 " MICRO SIGN "
|
|
379 |
"16r00B6" 16rB6 " PILCROW SIGN "
|
|
380 |
"16r00B7" 16rB7 " MIDDLE DOT "
|
|
381 |
"16r00B8" 16rB8 " CEDILLA "
|
|
382 |
"16r00B9" 16rB9 " SUPERSCRIPT ONE "
|
|
383 |
"16r00BA" 16rF7 " DIVISION SIGN "
|
|
384 |
"16r00BB" 16rBB " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK "
|
|
385 |
"16r00BC" 16rBC " VULGAR FRACTION ONE QUARTER "
|
|
386 |
"16r00BD" 16rBD " VULGAR FRACTION ONE HALF "
|
|
387 |
"16r00BE" 16rBE " VULGAR FRACTION THREE QUARTERS "
|
|
388 |
] at:(code - 16rA0).
|
|
389 |
t == 0 ifFalse:[^ t].
|
|
390 |
^ self decodingError.
|
|
391 |
] value.
|
|
392 |
].
|
|
393 |
code <= 16rDE ifTrue:[
|
|
394 |
^ self decodingError.
|
|
395 |
].
|
|
396 |
[
|
|
397 |
|t|
|
|
398 |
t := #(
|
|
399 |
"16r00DF" 16r2017 " DOUBLE LOW LINE "
|
|
400 |
"16r00E0" 16r05D0 " HEBREW LETTER ALEF "
|
|
401 |
"16r00E1" 16r05D1 " HEBREW LETTER BET "
|
|
402 |
"16r00E2" 16r05D2 " HEBREW LETTER GIMEL "
|
|
403 |
"16r00E3" 16r05D3 " HEBREW LETTER DALET "
|
|
404 |
"16r00E4" 16r05D4 " HEBREW LETTER HE "
|
|
405 |
"16r00E5" 16r05D5 " HEBREW LETTER VAV "
|
|
406 |
"16r00E6" 16r05D6 " HEBREW LETTER ZAYIN "
|
|
407 |
"16r00E7" 16r05D7 " HEBREW LETTER HET "
|
|
408 |
"16r00E8" 16r05D8 " HEBREW LETTER TET "
|
|
409 |
"16r00E9" 16r05D9 " HEBREW LETTER YOD "
|
|
410 |
"16r00EA" 16r05DA " HEBREW LETTER FINAL KAF "
|
|
411 |
"16r00EB" 16r05DB " HEBREW LETTER KAF "
|
|
412 |
"16r00EC" 16r05DC " HEBREW LETTER LAMED "
|
|
413 |
"16r00ED" 16r05DD " HEBREW LETTER FINAL MEM "
|
|
414 |
"16r00EE" 16r05DE " HEBREW LETTER MEM "
|
|
415 |
"16r00EF" 16r05DF " HEBREW LETTER FINAL NUN "
|
|
416 |
"16r00F0" 16r05E0 " HEBREW LETTER NUN "
|
|
417 |
"16r00F1" 16r05E1 " HEBREW LETTER SAMEKH "
|
|
418 |
"16r00F2" 16r05E2 " HEBREW LETTER AYIN "
|
|
419 |
"16r00F3" 16r05E3 " HEBREW LETTER FINAL PE "
|
|
420 |
"16r00F4" 16r05E4 " HEBREW LETTER PE "
|
|
421 |
"16r00F5" 16r05E5 " HEBREW LETTER FINAL TSADI "
|
|
422 |
"16r00F6" 16r05E6 " HEBREW LETTER TSADI "
|
|
423 |
"16r00F7" 16r05E7 " HEBREW LETTER QOF "
|
|
424 |
"16r00F8" 16r05E8 " HEBREW LETTER RESH "
|
|
425 |
"16r00F9" 16r05E9 " HEBREW LETTER SHIN "
|
|
426 |
"16r00FA" 16r05EA " HEBREW LETTER TAV "
|
|
427 |
"16r00FB" 16r0000 " invalid "
|
|
428 |
"16r00FC" 16r0000 " invalid "
|
|
429 |
"16r00FD" 16r200E " LEFT-TO-RIGHT MARK "
|
|
430 |
"16r00FE" 16r200F " RIGHT-TO-LEFT MARK "
|
|
431 |
) at:(code - 16rDE).
|
|
432 |
t == 0 ifFalse:[^ t].
|
|
433 |
^ self decodingError.
|
|
434 |
] value.
|
|
435 |
!
|
|
436 |
|
|
437 |
encode:unicodeArg
|
|
438 |
"Automagically generated by generateCode - do not modify.
|
|
439 |
Encode from unicode into my encoding."
|
|
440 |
|
|
441 |
|unicode "{ Class: SmallInteger }"|
|
|
442 |
|
|
443 |
unicode := unicodeArg.
|
|
444 |
unicode <= 16rA0 ifTrue:[ ^ unicode ].
|
|
445 |
unicode > 16r2017 ifTrue:[
|
|
446 |
^ self encodingError.
|
|
447 |
].
|
|
448 |
unicode <= 16r5EA ifTrue:[
|
|
449 |
unicode <= 16rF7 ifTrue:[
|
|
450 |
unicode <= 16rD7 ifTrue:[
|
|
451 |
unicode <= 16rBE ifTrue:[
|
|
452 |
[
|
|
453 |
|t|
|
|
454 |
t := #[
|
|
455 |
"16r00A1" 16r00 " invalid "
|
|
456 |
"16r00A2" 16rA2 " CENT SIGN "
|
|
457 |
"16r00A3" 16rA3 " POUND SIGN "
|
|
458 |
"16r00A4" 16rA4 " CURRENCY SIGN "
|
|
459 |
"16r00A5" 16rA5 " YEN SIGN "
|
|
460 |
"16r00A6" 16rA6 " BROKEN BAR "
|
|
461 |
"16r00A7" 16rA7 " SECTION SIGN "
|
|
462 |
"16r00A8" 16rA8 " DIAERESIS "
|
|
463 |
"16r00A9" 16rA9 " COPYRIGHT SIGN "
|
|
464 |
"16r00AA" 16r00 " invalid "
|
|
465 |
"16r00AB" 16rAB " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK "
|
|
466 |
"16r00AC" 16rAC " NOT SIGN "
|
|
467 |
"16r00AD" 16rAD " SOFT HYPHEN "
|
|
468 |
"16r00AE" 16rAE " REGISTERED SIGN "
|
|
469 |
"16r00AF" 16rAF " MACRON "
|
|
470 |
"16r00B0" 16rB0 " DEGREE SIGN "
|
|
471 |
"16r00B1" 16rB1 " PLUS-MINUS SIGN "
|
|
472 |
"16r00B2" 16rB2 " SUPERSCRIPT TWO "
|
|
473 |
"16r00B3" 16rB3 " SUPERSCRIPT THREE "
|
|
474 |
"16r00B4" 16rB4 " ACUTE ACCENT "
|
|
475 |
"16r00B5" 16rB5 " MICRO SIGN "
|
|
476 |
"16r00B6" 16rB6 " PILCROW SIGN "
|
|
477 |
"16r00B7" 16rB7 " MIDDLE DOT "
|
|
478 |
"16r00B8" 16rB8 " CEDILLA "
|
|
479 |
"16r00B9" 16rB9 " SUPERSCRIPT ONE "
|
|
480 |
"16r00BA" 16r00 " invalid "
|
|
481 |
"16r00BB" 16rBB " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK "
|
|
482 |
"16r00BC" 16rBC " VULGAR FRACTION ONE QUARTER "
|
|
483 |
"16r00BD" 16rBD " VULGAR FRACTION ONE HALF "
|
|
484 |
"16r00BE" 16rBE " VULGAR FRACTION THREE QUARTERS "
|
|
485 |
] at:(unicode - 16rA0).
|
|
486 |
t == 0 ifFalse:[^ t].
|
|
487 |
^ self encodingError
|
|
488 |
] value.
|
|
489 |
].
|
|
490 |
unicode <= 16rD6 ifTrue:[
|
|
491 |
^ self encodingError.
|
|
492 |
].
|
|
493 |
^ "16r00D7" 16r00AA " MULTIPLICATION SIGN "
|
|
494 |
].
|
|
495 |
unicode <= 16rF6 ifTrue:[
|
|
496 |
^ self encodingError.
|
|
497 |
].
|
|
498 |
^ "16r00F7" 16r00BA " DIVISION SIGN "
|
|
499 |
].
|
|
500 |
unicode <= 16r5CF ifTrue:[
|
|
501 |
^ self encodingError.
|
|
502 |
].
|
|
503 |
^ #[
|
|
504 |
"16r05D0" 16rE0 " HEBREW LETTER ALEF "
|
|
505 |
"16r05D1" 16rE1 " HEBREW LETTER BET "
|
|
506 |
"16r05D2" 16rE2 " HEBREW LETTER GIMEL "
|
|
507 |
"16r05D3" 16rE3 " HEBREW LETTER DALET "
|
|
508 |
"16r05D4" 16rE4 " HEBREW LETTER HE "
|
|
509 |
"16r05D5" 16rE5 " HEBREW LETTER VAV "
|
|
510 |
"16r05D6" 16rE6 " HEBREW LETTER ZAYIN "
|
|
511 |
"16r05D7" 16rE7 " HEBREW LETTER HET "
|
|
512 |
"16r05D8" 16rE8 " HEBREW LETTER TET "
|
|
513 |
"16r05D9" 16rE9 " HEBREW LETTER YOD "
|
|
514 |
"16r05DA" 16rEA " HEBREW LETTER FINAL KAF "
|
|
515 |
"16r05DB" 16rEB " HEBREW LETTER KAF "
|
|
516 |
"16r05DC" 16rEC " HEBREW LETTER LAMED "
|
|
517 |
"16r05DD" 16rED " HEBREW LETTER FINAL MEM "
|
|
518 |
"16r05DE" 16rEE " HEBREW LETTER MEM "
|
|
519 |
"16r05DF" 16rEF " HEBREW LETTER FINAL NUN "
|
|
520 |
"16r05E0" 16rF0 " HEBREW LETTER NUN "
|
|
521 |
"16r05E1" 16rF1 " HEBREW LETTER SAMEKH "
|
|
522 |
"16r05E2" 16rF2 " HEBREW LETTER AYIN "
|
|
523 |
"16r05E3" 16rF3 " HEBREW LETTER FINAL PE "
|
|
524 |
"16r05E4" 16rF4 " HEBREW LETTER PE "
|
|
525 |
"16r05E5" 16rF5 " HEBREW LETTER FINAL TSADI "
|
|
526 |
"16r05E6" 16rF6 " HEBREW LETTER TSADI "
|
|
527 |
"16r05E7" 16rF7 " HEBREW LETTER QOF "
|
|
528 |
"16r05E8" 16rF8 " HEBREW LETTER RESH "
|
|
529 |
"16r05E9" 16rF9 " HEBREW LETTER SHIN "
|
|
530 |
"16r05EA" 16rFA " HEBREW LETTER TAV "
|
|
531 |
] at:(unicode - 16r5CF).
|
|
532 |
].
|
|
533 |
unicode <= 16r200D ifTrue:[
|
|
534 |
^ self encodingError.
|
|
535 |
].
|
|
536 |
[
|
|
537 |
|t|
|
|
538 |
t := #[
|
|
539 |
"16r200E" 16rFD " LEFT-TO-RIGHT MARK "
|
|
540 |
"16r200F" 16rFE " RIGHT-TO-LEFT MARK "
|
|
541 |
"16r2010" 16r00 " invalid "
|
|
542 |
"16r2011" 16r00 " invalid "
|
|
543 |
"16r2012" 16r00 " invalid "
|
|
544 |
"16r2013" 16r00 " invalid "
|
|
545 |
"16r2014" 16r00 " invalid "
|
|
546 |
"16r2015" 16r00 " invalid "
|
|
547 |
"16r2016" 16r00 " invalid "
|
|
548 |
"16r2017" 16rDF " DOUBLE LOW LINE "
|
|
549 |
] at:(unicode - 16r200D).
|
|
550 |
t == 0 ifFalse:[^ t].
|
|
551 |
^ self encodingError
|
|
552 |
] value.
|
|
553 |
! !
|
|
554 |
|
|
555 |
!ISO8859_8 class methodsFor:'documentation'!
|
|
556 |
|
|
557 |
version
|
14198
|
558 |
^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__ISO8859_8.st,v 1.5 2012-07-11 16:43:21 stefan Exp $'
|
8081
|
559 |
! !
|