|
25205
|
1 |
"{ Encoding: utf8 }"
|
|
|
2 |
|
|
25123
|
3 |
"
|
|
|
4 |
COPYRIGHT (c) 2019 by eXept Software AG
|
|
|
5 |
All Rights Reserved
|
|
|
6 |
|
|
|
7 |
This software is furnished under a license and may be used
|
|
|
8 |
only in accordance with the terms of that license and with the
|
|
|
9 |
inclusion of the above copyright notice. This software may not
|
|
|
10 |
be provided or otherwise made available to, or used by, any
|
|
|
11 |
other person. No title to or ownership of the software is
|
|
|
12 |
hereby transferred.
|
|
|
13 |
"
|
|
|
14 |
"{ Package: 'stx:libbasic' }"
|
|
|
15 |
|
|
|
16 |
"{ NameSpace: CharacterEncoderImplementations }"
|
|
|
17 |
|
|
|
18 |
SingleByteEncoder subclass:#CP850
|
|
|
19 |
instanceVariableNames:''
|
|
|
20 |
classVariableNames:''
|
|
|
21 |
poolDictionaries:''
|
|
|
22 |
category:'Collections-Text-Encodings'
|
|
|
23 |
!
|
|
|
24 |
|
|
|
25 |
!CP850 class methodsFor:'documentation'!
|
|
|
26 |
|
|
|
27 |
copyright
|
|
|
28 |
"
|
|
|
29 |
COPYRIGHT (c) 2019 by eXept Software AG
|
|
|
30 |
All Rights Reserved
|
|
|
31 |
|
|
|
32 |
This software is furnished under a license and may be used
|
|
|
33 |
only in accordance with the terms of that license and with the
|
|
|
34 |
inclusion of the above copyright notice. This software may not
|
|
|
35 |
be provided or otherwise made available to, or used by, any
|
|
|
36 |
other person. No title to or ownership of the software is
|
|
|
37 |
hereby transferred.
|
|
|
38 |
"
|
|
|
39 |
!
|
|
|
40 |
|
|
|
41 |
documentation
|
|
|
42 |
"
|
|
25205
|
43 |
CodePage 850 / Western Europe
|
|
|
44 |
Used by cmd.exe.
|
|
25123
|
45 |
|
|
|
46 |
[see with:]
|
|
|
47 |
CharacterEncoderImplementations::CP850 showCharacterSet
|
|
|
48 |
|
|
|
49 |
[author:]
|
|
|
50 |
Claus Gittinger
|
|
|
51 |
"
|
|
|
52 |
! !
|
|
|
53 |
|
|
|
54 |
!CP850 class methodsFor:'encoding & decoding'!
|
|
|
55 |
|
|
|
56 |
mapFileURL2_relativePathName
|
|
|
57 |
^ 'CP850'
|
|
|
58 |
|
|
|
59 |
"
|
|
|
60 |
self generateCode
|
|
|
61 |
"
|
|
|
62 |
! !
|
|
|
63 |
|
|
|
64 |
!CP850 methodsFor:'encoding & decoding'!
|
|
|
65 |
|
|
|
66 |
decode:codeArg
|
|
|
67 |
"Automagically generated by generateCode - do not modify.
|
|
|
68 |
Decode from my encoding into unicode."
|
|
|
69 |
|
|
|
70 |
|code "{ Class: SmallInteger }"|
|
|
|
71 |
|
|
|
72 |
code := codeArg.
|
|
|
73 |
code <= 16r7F ifTrue:[ ^ code ].
|
|
|
74 |
code > 16rFF ifTrue:[
|
|
|
75 |
^ self decodingError.
|
|
|
76 |
].
|
|
|
77 |
^ #(
|
|
|
78 |
"16r0080" 16r00C7 " LATIN CAPITAL LETTER C WITH CEDILLA "
|
|
|
79 |
"16r0081" 16r00FC " LATIN SMALL LETTER U WITH DIAERESIS "
|
|
|
80 |
"16r0082" 16r00E9 " LATIN SMALL LETTER E WITH ACUTE "
|
|
|
81 |
"16r0083" 16r00E2 " LATIN SMALL LETTER A WITH CIRCUMFLEX "
|
|
|
82 |
"16r0084" 16r00E4 " LATIN SMALL LETTER A WITH DIAERESIS "
|
|
|
83 |
"16r0085" 16r00E0 " LATIN SMALL LETTER A WITH GRAVE "
|
|
|
84 |
"16r0086" 16r00E5 " LATIN SMALL LETTER A WITH RING ABOVE "
|
|
|
85 |
"16r0087" 16r00E7 " LATIN SMALL LETTER C WITH CEDILLA "
|
|
|
86 |
"16r0088" 16r00EA " LATIN SMALL LETTER E WITH CIRCUMFLEX "
|
|
|
87 |
"16r0089" 16r00EB " LATIN SMALL LETTER E WITH DIAERESIS "
|
|
|
88 |
"16r008A" 16r00E8 " LATIN SMALL LETTER E WITH GRAVE "
|
|
|
89 |
"16r008B" 16r00EF " LATIN SMALL LETTER I WITH DIAERESIS "
|
|
|
90 |
"16r008C" 16r00EE " LATIN SMALL LETTER I WITH CIRCUMFLEX "
|
|
|
91 |
"16r008D" 16r00EC " LATIN SMALL LETTER I WITH GRAVE "
|
|
|
92 |
"16r008E" 16r00C4 " LATIN CAPITAL LETTER A WITH DIAERESIS "
|
|
|
93 |
"16r008F" 16r00C5 " LATIN CAPITAL LETTER A WITH RING ABOVE "
|
|
|
94 |
|
|
|
95 |
"16r0090" 16r00C9 " LATIN CAPITAL LETTER E WITH ACUTE "
|
|
|
96 |
"16r0091" 16r00E6 " LATIN SMALL LETTER AE "
|
|
|
97 |
"16r0092" 16r00C6 " LATIN CAPITAL LETTER AE "
|
|
|
98 |
"16r0093" 16r00F4 " LATIN SMALL LETTER O WITH CIRCUMFLEX "
|
|
|
99 |
"16r0094" 16r00F6 " LATIN SMALL LETTER O WITH DIAERESIS "
|
|
|
100 |
"16r0095" 16r00F2 " LATIN SMALL LETTER O WITH GRAVE "
|
|
|
101 |
"16r0096" 16r00FB " LATIN SMALL LETTER U WITH CIRCUMFLEX "
|
|
|
102 |
"16r0097" 16r00F9 " LATIN SMALL LETTER U WITH GRAVE "
|
|
|
103 |
"16r0098" 16r00FF " LATIN SMALL LETTER Y WITH DIAERESIS "
|
|
|
104 |
"16r0099" 16r00D6 " LATIN CAPITAL LETTER O WITH DIAERESIS "
|
|
|
105 |
"16r009A" 16r00DC " LATIN CAPITAL LETTER U WITH DIAERESIS "
|
|
|
106 |
"16r009B" 16r00F8
|
|
|
107 |
"16r009C" 16r00A3 " POUND SIGN "
|
|
|
108 |
"16r009D" 16r00D8
|
|
|
109 |
"16r009E" 16r00D7
|
|
|
110 |
"16r009F" 16r0192 " LATIN SMALL LETTER F WITH HOOK "
|
|
|
111 |
|
|
|
112 |
"16r00A0" 16r00E1 " LATIN SMALL LETTER A WITH ACUTE "
|
|
|
113 |
"16r00A1" 16r00ED " LATIN SMALL LETTER I WITH ACUTE "
|
|
|
114 |
"16r00A2" 16r00F3 " LATIN SMALL LETTER O WITH ACUTE "
|
|
|
115 |
"16r00A3" 16r00FA " LATIN SMALL LETTER U WITH ACUTE "
|
|
|
116 |
"16r00A4" 16r00F1 " LATIN SMALL LETTER N WITH TILDE "
|
|
|
117 |
"16r00A5" 16r00D1 " LATIN CAPITAL LETTER N WITH TILDE "
|
|
|
118 |
"16r00A6" 16r00AA " FEMININE ORDINAL INDICATOR "
|
|
|
119 |
"16r00A7" 16r00BA " MASCULINE ORDINAL INDICATOR "
|
|
|
120 |
"16r00A8" 16r00BF " INVERTED QUESTION MARK "
|
|
|
121 |
"16r00A9" 16r00AE
|
|
|
122 |
"16r00AA" 16r00AC " NOT SIGN "
|
|
|
123 |
"16r00AB" 16r00BD " VULGAR FRACTION ONE HALF "
|
|
|
124 |
"16r00AC" 16r00BC " VULGAR FRACTION ONE QUARTER "
|
|
|
125 |
"16r00AD" 16r00A1 " INVERTED EXCLAMATION MARK "
|
|
|
126 |
"16r00AE" 16r00AB " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK "
|
|
|
127 |
"16r00AF" 16r00BB " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK "
|
|
|
128 |
|
|
|
129 |
"16r00B0" 16r2591 " LIGHT SHADE "
|
|
|
130 |
"16r00B1" 16r2592 " MEDIUM SHADE "
|
|
|
131 |
"16r00B2" 16r2593 " DARK SHADE "
|
|
|
132 |
"16r00B3" 16r2502 " BOX DRAWINGS LIGHT VERTICAL "
|
|
|
133 |
"16r00B4" 16r2524 " BOX DRAWINGS LIGHT VERTICAL AND LEFT "
|
|
|
134 |
"16r00B5" 16r00C1
|
|
|
135 |
"16r00B6" 16r00C2
|
|
|
136 |
"16r00B7" 16r00C0
|
|
|
137 |
"16r00B8" 16r00A9
|
|
|
138 |
"16r00B9" 16r2563 " BOX DRAWINGS DOUBLE VERTICAL AND LEFT "
|
|
|
139 |
"16r00BA" 16r2551 " BOX DRAWINGS DOUBLE VERTICAL "
|
|
|
140 |
"16r00BB" 16r2557 " BOX DRAWINGS DOUBLE DOWN AND LEFT "
|
|
|
141 |
"16r00BC" 16r255D " BOX DRAWINGS DOUBLE UP AND LEFT "
|
|
|
142 |
"16r00BD" 16r00A2
|
|
|
143 |
"16r00BE" 16r00A5
|
|
|
144 |
"16r00BF" 16r2510 " BOX DRAWINGS LIGHT DOWN AND LEFT "
|
|
|
145 |
|
|
|
146 |
"16r00C0" 16r2514 " BOX DRAWINGS LIGHT UP AND RIGHT "
|
|
|
147 |
"16r00C1" 16r2534 " BOX DRAWINGS LIGHT UP AND HORIZONTAL "
|
|
|
148 |
"16r00C2" 16r252C " BOX DRAWINGS LIGHT DOWN AND HORIZONTAL "
|
|
|
149 |
"16r00C3" 16r251C " BOX DRAWINGS LIGHT VERTICAL AND RIGHT "
|
|
|
150 |
"16r00C4" 16r2500 " BOX DRAWINGS LIGHT HORIZONTAL "
|
|
|
151 |
"16r00C5" 16r253C " BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL "
|
|
|
152 |
"16r00C6" 16r00E3
|
|
|
153 |
"16r00C7" 16r00C3
|
|
|
154 |
"16r00C8" 16r255A " BOX DRAWINGS DOUBLE UP AND RIGHT "
|
|
|
155 |
"16r00C9" 16r2554 " BOX DRAWINGS DOUBLE DOWN AND RIGHT "
|
|
|
156 |
"16r00CA" 16r2569 " BOX DRAWINGS DOUBLE UP AND HORIZONTAL "
|
|
|
157 |
"16r00CB" 16r2566 " BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL "
|
|
|
158 |
"16r00CC" 16r2560 " BOX DRAWINGS DOUBLE VERTICAL AND RIGHT "
|
|
|
159 |
"16r00CD" 16r2550 " BOX DRAWINGS DOUBLE HORIZONTAL "
|
|
|
160 |
"16r00CE" 16r256C " BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL "
|
|
|
161 |
"16r00CF" 16r00A4
|
|
|
162 |
|
|
|
163 |
"16r00D0" 16r00F0
|
|
|
164 |
"16r00D1" 16r00D0
|
|
|
165 |
"16r00D2" 16r00CA
|
|
|
166 |
"16r00D3" 16r00CB
|
|
|
167 |
"16r00D4" 16r00C8
|
|
|
168 |
"16r00D5" 16r0131
|
|
|
169 |
"16r00D6" 16r00CD
|
|
|
170 |
"16r00D7" 16r00CE
|
|
|
171 |
"16r00D8" 16r00CF
|
|
|
172 |
"16r00D9" 16r2518 " BOX DRAWINGS LIGHT UP AND LEFT "
|
|
|
173 |
"16r00DA" 16r250C " BOX DRAWINGS LIGHT DOWN AND RIGHT "
|
|
|
174 |
"16r00DB" 16r2588 " FULL BLOCK "
|
|
|
175 |
"16r00DC" 16r2584 " LOWER HALF BLOCK "
|
|
|
176 |
"16r00DD" 16r00A6
|
|
|
177 |
"16r00DE" 16r00CC
|
|
|
178 |
"16r00DF" 16r2580 " UPPER HALF BLOCK "
|
|
|
179 |
|
|
|
180 |
"16r00E0" 16r00D3
|
|
|
181 |
"16r00E1" 16r00DF " LATIN SMALL LETTER SHARP S (German) "
|
|
|
182 |
"16r00E2" 16r00D4
|
|
|
183 |
"16r00E3" 16r00D2
|
|
|
184 |
"16r00E4" 16r00F5
|
|
|
185 |
"16r00E5" 16r00D5
|
|
|
186 |
"16r00E6" 16r00B5 " MICRO SIGN "
|
|
|
187 |
"16r00E7" 16r00Fe
|
|
|
188 |
"16r00E8" 16r00DE
|
|
|
189 |
"16r00E9" 16r00DA
|
|
|
190 |
"16r00EA" 16r00DB
|
|
|
191 |
"16r00EB" 16r00D9
|
|
|
192 |
"16r00EC" 16r00FD
|
|
|
193 |
"16r00ED" 16r00DD
|
|
|
194 |
"16r00EE" 16r00AF
|
|
|
195 |
"16r00EF" 16r00B4
|
|
|
196 |
|
|
|
197 |
"16r00F0" 16r00AD
|
|
|
198 |
"16r00F1" 16r00B1 " PLUS-MINUS SIGN "
|
|
|
199 |
"16r00F2" 16r2017
|
|
|
200 |
"16r00F3" 16r00BE
|
|
|
201 |
"16r00F4" 16r00B6
|
|
|
202 |
"16r00F5" 16r00A7
|
|
|
203 |
"16r00F6" 16r00F7 " DIVISION SIGN "
|
|
|
204 |
"16r00F7" 16r00B8
|
|
|
205 |
"16r00F8" 16r00B0 " DEGREE SIGN "
|
|
|
206 |
"16r00F9" 16r00A8
|
|
|
207 |
"16r00FA" 16r00B7
|
|
|
208 |
"16r00FB" 16r00B9
|
|
|
209 |
"16r00FC" 16r00B3
|
|
|
210 |
"16r00FD" 16r00B2 " SUPERSCRIPT TWO "
|
|
|
211 |
"16r00FE" 16r25A0 " BLACK SQUARE "
|
|
|
212 |
"16r00FF" 16r00A0 " NO-BREAK SPACE "
|
|
|
213 |
) at:(code - 16r7F).
|
|
|
214 |
!
|
|
|
215 |
|
|
|
216 |
encode:unicodeArg
|
|
|
217 |
"Automagically generated by generateCode - do not modify.
|
|
|
218 |
Encode from unicode into my encoding."
|
|
|
219 |
|
|
|
220 |
|unicode "{ Class: SmallInteger }"|
|
|
|
221 |
|
|
|
222 |
unicode := unicodeArg.
|
|
|
223 |
unicode <= 16r7F ifTrue:[ ^ unicode ].
|
|
|
224 |
unicode <= 16r9F ifTrue:[
|
|
|
225 |
^ self encodingError
|
|
|
226 |
].
|
|
|
227 |
unicode <= 16rFF ifTrue:[
|
|
|
228 |
[
|
|
|
229 |
|t|
|
|
|
230 |
t := #[
|
|
|
231 |
"16r00A0" 16rFF " NO-BREAK SPACE "
|
|
|
232 |
"16r00A1" 16rAD " INVERTED EXCLAMATION MARK "
|
|
|
233 |
"16r00A2" 16rbd
|
|
|
234 |
"16r00A3" 16r9C " POUND SIGN "
|
|
|
235 |
"16r00A4" 16rcf
|
|
|
236 |
"16r00A5" 16rbe
|
|
|
237 |
"16r00A6" 16rdd
|
|
|
238 |
"16r00A7" 16rf5
|
|
|
239 |
"16r00A8" 16rf9
|
|
|
240 |
"16r00A9" 16rb8
|
|
|
241 |
"16r00AA" 16rA6 " FEMININE ORDINAL INDICATOR "
|
|
|
242 |
"16r00AB" 16rAE " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK "
|
|
|
243 |
"16r00AC" 16rAA " NOT SIGN "
|
|
|
244 |
"16r00AD" 16rf0
|
|
|
245 |
"16r00AE" 16ra9
|
|
|
246 |
"16r00AF" 16ree
|
|
|
247 |
"16r00B0" 16rF8 " DEGREE SIGN "
|
|
|
248 |
"16r00B1" 16rf1
|
|
|
249 |
"16r00B2" 16rFD " SUPERSCRIPT TWO "
|
|
|
250 |
"16r00B3" 16rfc
|
|
|
251 |
"16r00B4" 16ref
|
|
|
252 |
"16r00B5" 16rE6 " MICRO SIGN "
|
|
|
253 |
"16r00B6" 16rf4
|
|
|
254 |
"16r00B7" 16rfa
|
|
|
255 |
"16r00B8" 16rf7
|
|
|
256 |
"16r00B9" 16rfb
|
|
|
257 |
"16r00BA" 16rA7 " MASCULINE ORDINAL INDICATOR "
|
|
|
258 |
"16r00BB" 16rAF " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK "
|
|
|
259 |
"16r00BC" 16rAC " VULGAR FRACTION ONE QUARTER "
|
|
|
260 |
"16r00BD" 16rAB " VULGAR FRACTION ONE HALF "
|
|
|
261 |
"16r00BE" 16rf3
|
|
|
262 |
"16r00BF" 16rA8 " INVERTED QUESTION MARK "
|
|
|
263 |
"16r00C0" 16rb7
|
|
|
264 |
"16r00C1" 16rb5
|
|
|
265 |
"16r00C2" 16rb6
|
|
|
266 |
"16r00C3" 16rc7
|
|
|
267 |
"16r00C4" 16r8E " LATIN CAPITAL LETTER A WITH DIAERESIS "
|
|
|
268 |
"16r00C5" 16r8F " LATIN CAPITAL LETTER A WITH RING ABOVE "
|
|
|
269 |
"16r00C6" 16r92 " LATIN CAPITAL LETTER AE "
|
|
|
270 |
"16r00C7" 16r80 " LATIN CAPITAL LETTER C WITH CEDILLA "
|
|
|
271 |
"16r00C8" 16rd4
|
|
|
272 |
"16r00C9" 16r90 " LATIN CAPITAL LETTER E WITH ACUTE "
|
|
|
273 |
"16r00CA" 16rd2
|
|
|
274 |
"16r00CB" 16rd3
|
|
|
275 |
"16r00CC" 16rde
|
|
|
276 |
"16r00CD" 16rd6
|
|
|
277 |
"16r00CE" 16rd7
|
|
|
278 |
"16r00CF" 16rd8
|
|
|
279 |
"16r00D0" 16rd1
|
|
|
280 |
"16r00D1" 16rA5 " LATIN CAPITAL LETTER N WITH TILDE "
|
|
|
281 |
"16r00D2" 16re3
|
|
|
282 |
"16r00D3" 16re0
|
|
|
283 |
"16r00D4" 16re2
|
|
|
284 |
"16r00D5" 16re5
|
|
|
285 |
"16r00D6" 16r99 " LATIN CAPITAL LETTER O WITH DIAERESIS "
|
|
|
286 |
"16r00D7" 16r9e
|
|
|
287 |
"16r00D8" 16r9d
|
|
|
288 |
"16r00D9" 16reb
|
|
|
289 |
"16r00DA" 16re9
|
|
|
290 |
"16r00DB" 16rea
|
|
|
291 |
"16r00DC" 16r9A " LATIN CAPITAL LETTER U WITH DIAERESIS "
|
|
|
292 |
"16r00DD" 16red
|
|
|
293 |
"16r00DE" 16re8
|
|
|
294 |
"16r00DF" 16rE1 " LATIN SMALL LETTER SHARP S (German) "
|
|
|
295 |
"16r00E0" 16r85 " LATIN SMALL LETTER A WITH GRAVE "
|
|
|
296 |
"16r00E1" 16rA0 " LATIN SMALL LETTER A WITH ACUTE "
|
|
|
297 |
"16r00E2" 16r83 " LATIN SMALL LETTER A WITH CIRCUMFLEX "
|
|
|
298 |
"16r00E3" 16rc6
|
|
|
299 |
"16r00E4" 16r84 " LATIN SMALL LETTER A WITH DIAERESIS "
|
|
|
300 |
"16r00E5" 16r86 " LATIN SMALL LETTER A WITH RING ABOVE "
|
|
|
301 |
"16r00E6" 16r91 " LATIN SMALL LETTER AE "
|
|
|
302 |
"16r00E7" 16r87 " LATIN SMALL LETTER C WITH CEDILLA "
|
|
|
303 |
"16r00E8" 16r8A " LATIN SMALL LETTER E WITH GRAVE "
|
|
|
304 |
"16r00E9" 16r82 " LATIN SMALL LETTER E WITH ACUTE "
|
|
|
305 |
"16r00EA" 16r88 " LATIN SMALL LETTER E WITH CIRCUMFLEX "
|
|
|
306 |
"16r00EB" 16r89 " LATIN SMALL LETTER E WITH DIAERESIS "
|
|
|
307 |
"16r00EC" 16r8D " LATIN SMALL LETTER I WITH GRAVE "
|
|
|
308 |
"16r00ED" 16rA1 " LATIN SMALL LETTER I WITH ACUTE "
|
|
|
309 |
"16r00EE" 16r8C " LATIN SMALL LETTER I WITH CIRCUMFLEX "
|
|
|
310 |
"16r00EF" 16r8B " LATIN SMALL LETTER I WITH DIAERESIS "
|
|
|
311 |
"16r00F0" 16rd0
|
|
|
312 |
"16r00F1" 16rA4 " LATIN SMALL LETTER N WITH TILDE "
|
|
|
313 |
"16r00F2" 16r95 " LATIN SMALL LETTER O WITH GRAVE "
|
|
|
314 |
"16r00F3" 16rA2 " LATIN SMALL LETTER O WITH ACUTE "
|
|
|
315 |
"16r00F4" 16r93 " LATIN SMALL LETTER O WITH CIRCUMFLEX "
|
|
|
316 |
"16r00F5" 16re4
|
|
|
317 |
"16r00F6" 16r94 " LATIN SMALL LETTER O WITH DIAERESIS "
|
|
|
318 |
"16r00F7" 16rF6 " DIVISION SIGN "
|
|
|
319 |
"16r00F8" 16r9B
|
|
|
320 |
"16r00F9" 16r97 " LATIN SMALL LETTER U WITH GRAVE "
|
|
|
321 |
"16r00FA" 16rA3 " LATIN SMALL LETTER U WITH ACUTE "
|
|
|
322 |
"16r00FB" 16r96 " LATIN SMALL LETTER U WITH CIRCUMFLEX "
|
|
|
323 |
"16r00FC" 16r81 " LATIN SMALL LETTER U WITH DIAERESIS "
|
|
|
324 |
"16r00FD" 16rec
|
|
|
325 |
"16r00FE" 16re7
|
|
|
326 |
"16r00FF" 16r98 " LATIN SMALL LETTER Y WITH DIAERESIS "
|
|
|
327 |
] at:(unicode - 16r9F).
|
|
|
328 |
t == 0 ifFalse:[^ t].
|
|
|
329 |
^ self encodingError
|
|
|
330 |
] value.
|
|
|
331 |
].
|
|
|
332 |
unicode <= 16r24FF ifTrue:[
|
|
|
333 |
unicode == 16r2017 ifTrue:[ ^ 16rf2 ].
|
|
|
334 |
^ self encodingError
|
|
|
335 |
].
|
|
|
336 |
unicode <= 16r25A0 ifTrue:[
|
|
|
337 |
|t|
|
|
|
338 |
t := #[
|
|
|
339 |
"16r2500" 16rC4 " BOX DRAWINGS LIGHT HORIZONTAL "
|
|
|
340 |
"16r2501" 16r00 " invalid "
|
|
|
341 |
"16r2502" 16rB3 " BOX DRAWINGS LIGHT VERTICAL "
|
|
|
342 |
"16r2503" 16r00 " invalid "
|
|
|
343 |
"16r2504" 16r00 " invalid "
|
|
|
344 |
"16r2505" 16r00 " invalid "
|
|
|
345 |
"16r2506" 16r00 " invalid "
|
|
|
346 |
"16r2507" 16r00 " invalid "
|
|
|
347 |
"16r2508" 16r00 " invalid "
|
|
|
348 |
"16r2509" 16r00 " invalid "
|
|
|
349 |
"16r250A" 16r00 " invalid "
|
|
|
350 |
"16r250B" 16r00 " invalid "
|
|
|
351 |
"16r250C" 16rDA " BOX DRAWINGS LIGHT DOWN AND RIGHT "
|
|
|
352 |
"16r250D" 16r00 " invalid "
|
|
|
353 |
"16r250E" 16r00 " invalid "
|
|
|
354 |
"16r250F" 16r00 " invalid "
|
|
|
355 |
"16r2510" 16rBF " BOX DRAWINGS LIGHT DOWN AND LEFT "
|
|
|
356 |
"16r2511" 16r00 " invalid "
|
|
|
357 |
"16r2512" 16r00 " invalid "
|
|
|
358 |
"16r2513" 16r00 " invalid "
|
|
|
359 |
"16r2514" 16rC0 " BOX DRAWINGS LIGHT UP AND RIGHT "
|
|
|
360 |
"16r2515" 16r00 " invalid "
|
|
|
361 |
"16r2516" 16r00 " invalid "
|
|
|
362 |
"16r2517" 16r00 " invalid "
|
|
|
363 |
"16r2518" 16rD9 " BOX DRAWINGS LIGHT UP AND LEFT "
|
|
|
364 |
"16r2519" 16r00 " invalid "
|
|
|
365 |
"16r251A" 16r00 " invalid "
|
|
|
366 |
"16r251B" 16r00 " invalid "
|
|
|
367 |
"16r251C" 16rC3 " BOX DRAWINGS LIGHT VERTICAL AND RIGHT "
|
|
|
368 |
"16r251D" 16r00 " invalid "
|
|
|
369 |
"16r251E" 16r00 " invalid "
|
|
|
370 |
"16r251F" 16r00 " invalid "
|
|
|
371 |
"16r2520" 16r00 " invalid "
|
|
|
372 |
"16r2521" 16r00 " invalid "
|
|
|
373 |
"16r2522" 16r00 " invalid "
|
|
|
374 |
"16r2523" 16r00 " invalid "
|
|
|
375 |
"16r2524" 16rB4 " BOX DRAWINGS LIGHT VERTICAL AND LEFT "
|
|
|
376 |
"16r2525" 16r00 " invalid "
|
|
|
377 |
"16r2526" 16r00 " invalid "
|
|
|
378 |
"16r2527" 16r00 " invalid "
|
|
|
379 |
"16r2528" 16r00 " invalid "
|
|
|
380 |
"16r2529" 16r00 " invalid "
|
|
|
381 |
"16r252A" 16r00 " invalid "
|
|
|
382 |
"16r252B" 16r00 " invalid "
|
|
|
383 |
"16r252C" 16rC2 " BOX DRAWINGS LIGHT DOWN AND HORIZONTAL "
|
|
|
384 |
"16r252D" 16r00 " invalid "
|
|
|
385 |
"16r252E" 16r00 " invalid "
|
|
|
386 |
"16r252F" 16r00 " invalid "
|
|
|
387 |
"16r2530" 16r00 " invalid "
|
|
|
388 |
"16r2531" 16r00 " invalid "
|
|
|
389 |
"16r2532" 16r00 " invalid "
|
|
|
390 |
"16r2533" 16r00 " invalid "
|
|
|
391 |
"16r2534" 16rC1 " BOX DRAWINGS LIGHT UP AND HORIZONTAL "
|
|
|
392 |
"16r2535" 16r00 " invalid "
|
|
|
393 |
"16r2536" 16r00 " invalid "
|
|
|
394 |
"16r2537" 16r00 " invalid "
|
|
|
395 |
"16r2538" 16r00 " invalid "
|
|
|
396 |
"16r2539" 16r00 " invalid "
|
|
|
397 |
"16r253A" 16r00 " invalid "
|
|
|
398 |
"16r253B" 16r00 " invalid "
|
|
|
399 |
"16r253C" 16rC5 " BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL "
|
|
|
400 |
"16r253D" 16r00 " invalid "
|
|
|
401 |
"16r253E" 16r00 " invalid "
|
|
|
402 |
"16r253F" 16r00 " invalid "
|
|
|
403 |
"16r2540" 16r00 " invalid "
|
|
|
404 |
"16r2541" 16r00 " invalid "
|
|
|
405 |
"16r2542" 16r00 " invalid "
|
|
|
406 |
"16r2543" 16r00 " invalid "
|
|
|
407 |
"16r2544" 16r00 " invalid "
|
|
|
408 |
"16r2545" 16r00 " invalid "
|
|
|
409 |
"16r2546" 16r00 " invalid "
|
|
|
410 |
"16r2547" 16r00 " invalid "
|
|
|
411 |
"16r2548" 16r00 " invalid "
|
|
|
412 |
"16r2549" 16r00 " invalid "
|
|
|
413 |
"16r254A" 16r00 " invalid "
|
|
|
414 |
"16r254B" 16r00 " invalid "
|
|
|
415 |
"16r254C" 16r00 " invalid "
|
|
|
416 |
"16r254D" 16r00 " invalid "
|
|
|
417 |
"16r254E" 16r00 " invalid "
|
|
|
418 |
"16r254F" 16r00 " invalid "
|
|
|
419 |
"16r2550" 16rCD " BOX DRAWINGS DOUBLE HORIZONTAL "
|
|
|
420 |
"16r2551" 16rBA " BOX DRAWINGS DOUBLE VERTICAL "
|
|
|
421 |
"16r2552" 16r00 " invalid "
|
|
|
422 |
"16r2553" 16r00 " invalid "
|
|
|
423 |
"16r2554" 16rC9 " BOX DRAWINGS DOUBLE DOWN AND RIGHT "
|
|
|
424 |
"16r2555" 16r00 " invalid "
|
|
|
425 |
"16r2556" 16r00 " invalid "
|
|
|
426 |
"16r2557" 16rBB " BOX DRAWINGS DOUBLE DOWN AND LEFT "
|
|
|
427 |
"16r2558" 16r00 " invalid "
|
|
|
428 |
"16r2559" 16r00 " invalid "
|
|
|
429 |
"16r255A" 16rC8 " BOX DRAWINGS DOUBLE UP AND RIGHT "
|
|
|
430 |
"16r255B" 16r00 " invalid "
|
|
|
431 |
"16r255C" 16r00 " invalid "
|
|
|
432 |
"16r255D" 16rBC " BOX DRAWINGS DOUBLE UP AND LEFT "
|
|
|
433 |
"16r255E" 16r00 " invalid "
|
|
|
434 |
"16r255F" 16r00 " invalid "
|
|
|
435 |
"16r2560" 16rCC " BOX DRAWINGS DOUBLE VERTICAL AND RIGHT "
|
|
|
436 |
"16r2561" 16r00 " invalid "
|
|
|
437 |
"16r2562" 16r00 " invalid "
|
|
|
438 |
"16r2563" 16rB9 " BOX DRAWINGS DOUBLE VERTICAL AND LEFT "
|
|
|
439 |
"16r2564" 16r00 " invalid "
|
|
|
440 |
"16r2565" 16r00 " invalid "
|
|
|
441 |
"16r2566" 16rCB " BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL "
|
|
|
442 |
"16r2567" 16r00 " invalid "
|
|
|
443 |
"16r2568" 16r00 " invalid "
|
|
|
444 |
"16r2569" 16rCA " BOX DRAWINGS DOUBLE UP AND HORIZONTAL "
|
|
|
445 |
"16r256A" 16r00 " invalid "
|
|
|
446 |
"16r256B" 16r00 " invalid "
|
|
|
447 |
"16r256C" 16rCE " BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL "
|
|
|
448 |
"16r256D" 16r00 " invalid "
|
|
|
449 |
"16r256E" 16r00 " invalid "
|
|
|
450 |
"16r256F" 16r00 " invalid "
|
|
|
451 |
"16r2570" 16r00 " invalid "
|
|
|
452 |
"16r2571" 16r00 " invalid "
|
|
|
453 |
"16r2572" 16r00 " invalid "
|
|
|
454 |
"16r2573" 16r00 " invalid "
|
|
|
455 |
"16r2574" 16r00 " invalid "
|
|
|
456 |
"16r2575" 16r00 " invalid "
|
|
|
457 |
"16r2576" 16r00 " invalid "
|
|
|
458 |
"16r2577" 16r00 " invalid "
|
|
|
459 |
"16r2578" 16r00 " invalid "
|
|
|
460 |
"16r2579" 16r00 " invalid "
|
|
|
461 |
"16r257A" 16r00 " invalid "
|
|
|
462 |
"16r257B" 16r00 " invalid "
|
|
|
463 |
"16r257C" 16r00 " invalid "
|
|
|
464 |
"16r257D" 16r00 " invalid "
|
|
|
465 |
"16r257E" 16r00 " invalid "
|
|
|
466 |
"16r257F" 16r00 " invalid "
|
|
|
467 |
"16r2580" 16rDF " UPPER HALF BLOCK "
|
|
|
468 |
"16r2581" 16r00 " invalid "
|
|
|
469 |
"16r2582" 16r00 " invalid "
|
|
|
470 |
"16r2583" 16r00 " invalid "
|
|
|
471 |
"16r2584" 16rDC " LOWER HALF BLOCK "
|
|
|
472 |
"16r2585" 16r00 " invalid "
|
|
|
473 |
"16r2586" 16r00 " invalid "
|
|
|
474 |
"16r2587" 16r00 " invalid "
|
|
|
475 |
"16r2588" 16rDB " FULL BLOCK "
|
|
|
476 |
"16r2589" 16r00 " invalid "
|
|
|
477 |
"16r258A" 16r00 " invalid "
|
|
|
478 |
"16r258B" 16r00 " invalid "
|
|
|
479 |
"16r258C" 16r00 " invalid "
|
|
|
480 |
"16r258D" 16r00 " invalid "
|
|
|
481 |
"16r258E" 16r00 " invalid "
|
|
|
482 |
"16r258F" 16r00 " invalid "
|
|
|
483 |
"16r2590" 16r00 " invalid "
|
|
|
484 |
"16r2591" 16rB0 " LIGHT SHADE "
|
|
|
485 |
"16r2592" 16rB1 " MEDIUM SHADE "
|
|
|
486 |
"16r2593" 16rB2 " DARK SHADE "
|
|
|
487 |
"16r2594" 16r00 " invalid "
|
|
|
488 |
"16r2595" 16r00 " invalid "
|
|
|
489 |
"16r2596" 16r00 " invalid "
|
|
|
490 |
"16r2597" 16r00 " invalid "
|
|
|
491 |
"16r2598" 16r00 " invalid "
|
|
|
492 |
"16r2599" 16r00 " invalid "
|
|
|
493 |
"16r259A" 16r00 " invalid "
|
|
|
494 |
"16r259B" 16r00 " invalid "
|
|
|
495 |
"16r259C" 16r00 " invalid "
|
|
|
496 |
"16r259D" 16r00 " invalid "
|
|
|
497 |
"16r259E" 16r00 " invalid "
|
|
|
498 |
"16r259F" 16r00 " invalid "
|
|
|
499 |
"16r25A0" 16rFE " BLACK SQUARE "
|
|
|
500 |
] at:(unicode - 16r24FF).
|
|
|
501 |
t == 0 ifFalse:[^ t].
|
|
|
502 |
^ self encodingError
|
|
|
503 |
] .
|
|
|
504 |
! !
|
|
|
505 |
|
|
|
506 |
!CP850 class methodsFor:'documentation'!
|
|
|
507 |
|
|
|
508 |
version_CVS
|
|
|
509 |
^ '$Header$'
|
|
|
510 |
! !
|
|
|
511 |
|