CharacterEncoderImplementations__CP437.st
author Claus Gittinger <cg@exept.de>
Tue, 09 Jul 2019 20:55:17 +0200
changeset 24417 03b083548da2
parent 8811 b2a78fe1d44f
child 17711 39faaaf888b4
permissions -rw-r--r--
#REFACTORING by exept class: Smalltalk class changed: #recursiveInstallAutoloadedClassesFrom:rememberIn:maxLevels:noAutoload:packageTop:showSplashInLevels: Transcript showCR:(... bindWith:...) -> Transcript showCR:... with:...
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
8148
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
     1
"
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
     2
 COPYRIGHT (c) 2004 by eXept Software AG
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
     3
              All Rights Reserved
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
     4
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
     5
 This software is furnished under a license and may be used
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
     6
 only in accordance with the terms of that license and with the
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
     8
 be provided or otherwise made available to, or used by, any
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
     9
 other person.  No title to or ownership of the software is
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    10
 hereby transferred.
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    11
"
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    12
8081
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
"{ Package: 'stx:libbasic' }"
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
"{ NameSpace: CharacterEncoderImplementations }"
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
SingleByteEncoder subclass:#CP437
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
	instanceVariableNames:''
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
	classVariableNames:''
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
	poolDictionaries:''
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
	category:'Collections-Text-Encodings'
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
!
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
8148
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    24
!CP437 class methodsFor:'documentation'!
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    25
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    26
copyright
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    27
"
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    28
 COPYRIGHT (c) 2004 by eXept Software AG
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    29
              All Rights Reserved
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    30
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    31
 This software is furnished under a license and may be used
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    32
 only in accordance with the terms of that license and with the
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    33
 inclusion of the above copyright notice.   This software may not
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    34
 be provided or otherwise made available to, or used by, any
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    35
 other person.  No title to or ownership of the software is
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    36
 hereby transferred.
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    37
"
8811
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    38
!
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    39
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    40
documentation
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    41
"
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    42
    CodePage 437 / MSDOS Latin US.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    43
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    44
    [see with:]
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    45
        CharacterEncoderImplementations::CP437 showCharacterSet
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    46
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    47
    [author:]
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    48
        Claus Gittinger
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    49
"
8148
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    50
! !
8081
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
!CP437 class methodsFor:'encoding & decoding'!
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
mapFileURL2_relativePathName
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
    ^ 'CP437'
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
    "
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
     self generateCode
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
    "
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
! !
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
!CP437 class methodsFor:'mapping'!
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
mapping
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
"
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
# From: http://std.dkuug.dk/i18n/charmaps/CP437
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
<code_set_name> IBM437
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    69
<comment_char> %
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    70
<escape_char> /
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    71
% version: 1.0
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    72
% repertoiremap: mnemonic,ds
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
%  source: IBM NLS RM Vol2 SE09-8002-01, March 1990
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
% alias CP437
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
% alias 437
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    77
CHARMAP
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    78
<NU>                   /x00   <U0000> NULL (NUL)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    79
<SH>                   /x01   <U0001> START OF HEADING (SOH)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    80
<SX>                   /x02   <U0002> START OF TEXT (STX)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    81
<EX>                   /x03   <U0003> END OF TEXT (ETX)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    82
<ET>                   /x04   <U0004> END OF TRANSMISSION (EOT)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
<EQ>                   /x05   <U0005> ENQUIRY (ENQ)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
<AK>                   /x06   <U0006> ACKNOWLEDGE (ACK)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85
<BL>                   /x07   <U0007> BELL (BEL)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
<BS>                   /x08   <U0008> BACKSPACE (BS)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    87
<HT>                   /x09   <U0009> CHARACTER TABULATION (HT)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    88
<LF>                   /x0A   <U000A> LINE FEED (LF)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    89
<VT>                   /x0B   <U000B> LINE TABULATION (VT)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    90
<FF>                   /x0C   <U000C> FORM FEED (FF)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    91
<CR>                   /x0D   <U000D> CARRIAGE RETURN (CR)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    92
<SO>                   /x0E   <U000E> SHIFT OUT (SO)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    93
<SI>                   /x0F   <U000F> SHIFT IN (SI)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    94
<DL>                   /x10   <U0010> DATALINK ESCAPE (DLE)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    95
<D1>                   /x11   <U0011> DEVICE CONTROL ONE (DC1)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    96
<D2>                   /x12   <U0012> DEVICE CONTROL TWO (DC2)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    97
<D3>                   /x13   <U0013> DEVICE CONTROL THREE (DC3)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    98
<D4>                   /x14   <U0014> DEVICE CONTROL FOUR (DC4)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    99
<NK>                   /x15   <U0015> NEGATIVE ACKNOWLEDGE (NAK)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   100
<SY>                   /x16   <U0016> SYNCHRONOUS IDLE (SYN)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   101
<EB>                   /x17   <U0017> END OF TRANSMISSION BLOCK (ETB)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   102
<CN>                   /x18   <U0018> CANCEL (CAN)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   103
<EM>                   /x19   <U0019> END OF MEDIUM (EM)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   104
<SB>                   /x1A   <U001A> SUBSTITUTE (SUB)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   105
<EC>                   /x1B   <U001B> ESCAPE (ESC)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   106
<FS>                   /x1C   <U001C> FILE SEPARATOR (IS4)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   107
<GS>                   /x1D   <U001D> GROUP SEPARATOR (IS3)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   108
<RS>                   /x1E   <U001E> RECORD SEPARATOR (IS2)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   109
<US>                   /x1F   <U001F> UNIT SEPARATOR (IS1)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   110
<SP>                   /x20   <U0020> SPACE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   111
<!!>                    /x21   <U0021> EXCLAMATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   112
<'>                    /x22   <U0022> QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   113
<Nb>                   /x23   <U0023> NUMBER SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   114
<DO>                   /x24   <U0024> DOLLAR SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   115
<%>                    /x25   <U0025> PERCENT SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   116
<&>                    /x26   <U0026> AMPERSAND
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   117
<'>                    /x27   <U0027> APOSTROPHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   118
<(>                    /x28   <U0028> LEFT PARENTHESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   119
<)>                    /x29   <U0029> RIGHT PARENTHESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   120
<*>                    /x2A   <U002A> ASTERISK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   121
<+>                    /x2B   <U002B> PLUS SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   122
<,>                    /x2C   <U002C> COMMA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   123
<->                    /x2D   <U002D> HYPHEN-MINUS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   124
<.>                    /x2E   <U002E> FULL STOP
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   125
<//>                   /x2F   <U002F> SOLIDUS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   126
<0>                    /x30   <U0030> DIGIT ZERO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   127
<1>                    /x31   <U0031> DIGIT ONE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   128
<2>                    /x32   <U0032> DIGIT TWO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   129
<3>                    /x33   <U0033> DIGIT THREE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   130
<4>                    /x34   <U0034> DIGIT FOUR
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   131
<5>                    /x35   <U0035> DIGIT FIVE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   132
<6>                    /x36   <U0036> DIGIT SIX
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   133
<7>                    /x37   <U0037> DIGIT SEVEN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   134
<8>                    /x38   <U0038> DIGIT EIGHT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   135
<9>                    /x39   <U0039> DIGIT NINE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   136
<:>                    /x3A   <U003A> COLON
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   137
<;>                    /x3B   <U003B> SEMICOLON
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   138
<<>                    /x3C   <U003C> LESS-THAN SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   139
<=>                    /x3D   <U003D> EQUALS SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   140
</>>                   /x3E   <U003E> GREATER-THAN SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   141
<?>                    /x3F   <U003F> QUESTION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   142
<At>                   /x40   <U0040> COMMERCIAL AT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   143
<A>                    /x41   <U0041> LATIN CAPITAL LETTER A
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   144
<B>                    /x42   <U0042> LATIN CAPITAL LETTER B
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   145
<C>                    /x43   <U0043> LATIN CAPITAL LETTER C
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   146
<D>                    /x44   <U0044> LATIN CAPITAL LETTER D
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   147
<E>                    /x45   <U0045> LATIN CAPITAL LETTER E
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   148
<F>                    /x46   <U0046> LATIN CAPITAL LETTER F
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   149
<G>                    /x47   <U0047> LATIN CAPITAL LETTER G
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   150
<H>                    /x48   <U0048> LATIN CAPITAL LETTER H
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   151
<I>                    /x49   <U0049> LATIN CAPITAL LETTER I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   152
<J>                    /x4A   <U004A> LATIN CAPITAL LETTER J
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   153
<K>                    /x4B   <U004B> LATIN CAPITAL LETTER K
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   154
<L>                    /x4C   <U004C> LATIN CAPITAL LETTER L
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   155
<M>                    /x4D   <U004D> LATIN CAPITAL LETTER M
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   156
<N>                    /x4E   <U004E> LATIN CAPITAL LETTER N
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   157
<O>                    /x4F   <U004F> LATIN CAPITAL LETTER O
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   158
<P>                    /x50   <U0050> LATIN CAPITAL LETTER P
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   159
<Q>                    /x51   <U0051> LATIN CAPITAL LETTER Q
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   160
<R>                    /x52   <U0052> LATIN CAPITAL LETTER R
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   161
<S>                    /x53   <U0053> LATIN CAPITAL LETTER S
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   162
<T>                    /x54   <U0054> LATIN CAPITAL LETTER T
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   163
<U>                    /x55   <U0055> LATIN CAPITAL LETTER U
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   164
<V>                    /x56   <U0056> LATIN CAPITAL LETTER V
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   165
<W>                    /x57   <U0057> LATIN CAPITAL LETTER W
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   166
<X>                    /x58   <U0058> LATIN CAPITAL LETTER X
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   167
<Y>                    /x59   <U0059> LATIN CAPITAL LETTER Y
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   168
<Z>                    /x5A   <U005A> LATIN CAPITAL LETTER Z
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   169
<<(>                   /x5B   <U005B> LEFT SQUARE BRACKET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   170
<////>                 /x5C   <U005C> REVERSE SOLIDUS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   171
<)/>>                  /x5D   <U005D> RIGHT SQUARE BRACKET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   172
<'/>>                  /x5E   <U005E> CIRCUMFLEX ACCENT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   173
<_>                    /x5F   <U005F> LOW LINE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   174
<'!!>                   /x60   <U0060> GRAVE ACCENT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   175
<a>                    /x61   <U0061> LATIN SMALL LETTER A
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   176
<b>                    /x62   <U0062> LATIN SMALL LETTER B
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   177
<c>                    /x63   <U0063> LATIN SMALL LETTER C
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   178
<d>                    /x64   <U0064> LATIN SMALL LETTER D
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   179
<e>                    /x65   <U0065> LATIN SMALL LETTER E
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   180
<f>                    /x66   <U0066> LATIN SMALL LETTER F
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   181
<g>                    /x67   <U0067> LATIN SMALL LETTER G
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   182
<h>                    /x68   <U0068> LATIN SMALL LETTER H
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   183
<i>                    /x69   <U0069> LATIN SMALL LETTER I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   184
<j>                    /x6A   <U006A> LATIN SMALL LETTER J
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   185
<k>                    /x6B   <U006B> LATIN SMALL LETTER K
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   186
<l>                    /x6C   <U006C> LATIN SMALL LETTER L
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   187
<m>                    /x6D   <U006D> LATIN SMALL LETTER M
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   188
<n>                    /x6E   <U006E> LATIN SMALL LETTER N
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   189
<o>                    /x6F   <U006F> LATIN SMALL LETTER O
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   190
<p>                    /x70   <U0070> LATIN SMALL LETTER P
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   191
<q>                    /x71   <U0071> LATIN SMALL LETTER Q
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   192
<r>                    /x72   <U0072> LATIN SMALL LETTER R
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   193
<s>                    /x73   <U0073> LATIN SMALL LETTER S
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   194
<t>                    /x74   <U0074> LATIN SMALL LETTER T
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   195
<u>                    /x75   <U0075> LATIN SMALL LETTER U
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   196
<v>                    /x76   <U0076> LATIN SMALL LETTER V
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   197
<w>                    /x77   <U0077> LATIN SMALL LETTER W
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   198
<x>                    /x78   <U0078> LATIN SMALL LETTER X
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   199
<y>                    /x79   <U0079> LATIN SMALL LETTER Y
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   200
<z>                    /x7A   <U007A> LATIN SMALL LETTER Z
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   201
<(!!>                   /x7B   <U007B> LEFT CURLY BRACKET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   202
<!!!!>                   /x7C   <U007C> VERTICAL LINE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   203
<!!)>                   /x7D   <U007D> RIGHT CURLY BRACKET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   204
<'?>                   /x7E   <U007E> TILDE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   205
<DT>                   /x7F   <U007F> DELETE (DEL)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   206
<C,>                   /x80   <U00C7> LATIN CAPITAL LETTER C WITH CEDILLA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   207
<u:>                   /x81   <U00FC> LATIN SMALL LETTER U WITH DIAERESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   208
<e'>                   /x82   <U00E9> LATIN SMALL LETTER E WITH ACUTE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   209
<a/>>                  /x83   <U00E2> LATIN SMALL LETTER A WITH CIRCUMFLEX
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   210
<a:>                   /x84   <U00E4> LATIN SMALL LETTER A WITH DIAERESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   211
<a!!>                   /x85   <U00E0> LATIN SMALL LETTER A WITH GRAVE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   212
<aa>                   /x86   <U00E5> LATIN SMALL LETTER A WITH RING ABOVE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   213
<c,>                   /x87   <U00E7> LATIN SMALL LETTER C WITH CEDILLA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   214
<e/>>                  /x88   <U00EA> LATIN SMALL LETTER E WITH CIRCUMFLEX
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   215
<e:>                   /x89   <U00EB> LATIN SMALL LETTER E WITH DIAERESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   216
<e!!>                   /x8A   <U00E8> LATIN SMALL LETTER E WITH GRAVE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   217
<i:>                   /x8B   <U00EF> LATIN SMALL LETTER I WITH DIAERESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   218
<i/>>                  /x8C   <U00EE> LATIN SMALL LETTER I WITH CIRCUMFLEX
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   219
<i!!>                   /x8D   <U00EC> LATIN SMALL LETTER I WITH GRAVE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   220
<A:>                   /x8E   <U00C4> LATIN CAPITAL LETTER A WITH DIAERESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   221
<AA>                   /x8F   <U00C5> LATIN CAPITAL LETTER A WITH RING ABOVE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   222
<E'>                   /x90   <U00C9> LATIN CAPITAL LETTER E WITH ACUTE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   223
<ae>                   /x91   <U00E6> LATIN SMALL LETTER AE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   224
<AE>                   /x92   <U00C6> LATIN CAPITAL LETTER AE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   225
<o/>>                  /x93   <U00F4> LATIN SMALL LETTER O WITH CIRCUMFLEX
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   226
<o:>                   /x94   <U00F6> LATIN SMALL LETTER O WITH DIAERESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   227
<o!!>                   /x95   <U00F2> LATIN SMALL LETTER O WITH GRAVE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   228
<u/>>                  /x96   <U00FB> LATIN SMALL LETTER U WITH CIRCUMFLEX
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   229
<u!!>                   /x97   <U00F9> LATIN SMALL LETTER U WITH GRAVE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   230
<y:>                   /x98   <U00FF> LATIN SMALL LETTER Y WITH DIAERESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   231
<O:>                   /x99   <U00D6> LATIN CAPITAL LETTER O WITH DIAERESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   232
<U:>                   /x9A   <U00DC> LATIN CAPITAL LETTER U WITH DIAERESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   233
<Ct>                   /x9B   <U00A2> CENT SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   234
<Pd>                   /x9C   <U00A3> POUND SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   235
<Ye>                   /x9D   <U00A5> YEN SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   236
<Pt>                   /x9E   <U20A7> PESETA SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   237
<f2>                   /x9F   <U0192> LATIN SMALL LETTER F WITH HOOK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   238
<a'>                   /xA0   <U00E1> LATIN SMALL LETTER A WITH ACUTE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   239
<i'>                   /xA1   <U00ED> LATIN SMALL LETTER I WITH ACUTE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   240
<o'>                   /xA2   <U00F3> LATIN SMALL LETTER O WITH ACUTE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   241
<u'>                   /xA3   <U00FA> LATIN SMALL LETTER U WITH ACUTE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   242
<n?>                   /xA4   <U00F1> LATIN SMALL LETTER N WITH TILDE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   243
<N?>                   /xA5   <U00D1> LATIN CAPITAL LETTER N WITH TILDE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   244
<-a>                   /xA6   <U00AA> FEMININE ORDINAL INDICATOR
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   245
<-o>                   /xA7   <U00BA> MASCULINE ORDINAL INDICATOR
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   246
<?I>                   /xA8   <U00BF> INVERTED QUESTION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   247
<NI>                   /xA9   <U2310> REVERSED NOT SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   248
<NO>                   /xAA   <U00AC> NOT SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   249
<12>                   /xAB   <U00BD> VULGAR FRACTION ONE HALF
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   250
<14>                   /xAC   <U00BC> VULGAR FRACTION ONE QUARTER
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   251
<!!I>                   /xAD   <U00A1> INVERTED EXCLAMATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   252
<<<>                   /xAE   <U00AB> LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   253
</>/>>                 /xAF   <U00BB> RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   254
<.S>                   /xB0   <U2591> LIGHT SHADE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   255
<:S>                   /xB1   <U2592> MEDIUM SHADE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   256
<?S>                   /xB2   <U2593> DARK SHADE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   257
<vv>                   /xB3   <U2502> BOX DRAWINGS LIGHT VERTICAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   258
<vl>                   /xB4   <U2524> BOX DRAWINGS LIGHT VERTICAL AND LEFT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   259
<vL>                   /xB5   <U2561> BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   260
<Vl>                   /xB6   <U2562> BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   261
<Dl>                   /xB7   <U2556> BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   262
<dL>                   /xB8   <U2555> BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   263
<VL>                   /xB9   <U2563> BOX DRAWINGS DOUBLE VERTICAL AND LEFT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   264
<VV>                   /xBA   <U2551> BOX DRAWINGS DOUBLE VERTICAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   265
<LD>                   /xBB   <U2557> BOX DRAWINGS DOUBLE DOWN AND LEFT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   266
<UL>                   /xBC   <U255D> BOX DRAWINGS DOUBLE UP AND LEFT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   267
<Ul>                   /xBD   <U255C> BOX DRAWINGS UP DOUBLE AND LEFT SINGLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   268
<uL>                   /xBE   <U255B> BOX DRAWINGS UP SINGLE AND LEFT DOUBLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   269
<dl>                   /xBF   <U2510> BOX DRAWINGS LIGHT DOWN AND LEFT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   270
<ur>                   /xC0   <U2514> BOX DRAWINGS LIGHT UP AND RIGHT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   271
<uh>                   /xC1   <U2534> BOX DRAWINGS LIGHT UP AND HORIZONTAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   272
<dh>                   /xC2   <U252C> BOX DRAWINGS LIGHT DOWN AND HORIZONTAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   273
<vr>                   /xC3   <U251C> BOX DRAWINGS LIGHT VERTICAL AND RIGHT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   274
<hh>                   /xC4   <U2500> BOX DRAWINGS LIGHT HORIZONTAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   275
<vh>                   /xC5   <U253C> BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   276
<vR>                   /xC6   <U255E> BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   277
<Vr>                   /xC7   <U255F> BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   278
<UR>                   /xC8   <U255A> BOX DRAWINGS DOUBLE UP AND RIGHT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   279
<DR>                   /xC9   <U2554> BOX DRAWINGS DOUBLE DOWN AND RIGHT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   280
<UH>                   /xCA   <U2569> BOX DRAWINGS DOUBLE UP AND HORIZONTAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   281
<DH>                   /xCB   <U2566> BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   282
<VR>                   /xCC   <U2560> BOX DRAWINGS DOUBLE VERTICAL AND RIGHT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   283
<HH>                   /xCD   <U2550> BOX DRAWINGS DOUBLE HORIZONTAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   284
<VH>                   /xCE   <U256C> BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   285
<uH>                   /xCF   <U2567> BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   286
<Uh>                   /xD0   <U2568> BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   287
<dH>                   /xD1   <U2564> BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   288
<Dh>                   /xD2   <U2565> BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   289
<Ur>                   /xD3   <U2559> BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   290
<uR>                   /xD4   <U2558> BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   291
<dR>                   /xD5   <U2552> BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   292
<Dr>                   /xD6   <U2553> BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   293
<Vh>                   /xD7   <U256B> BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   294
<vH>                   /xD8   <U256A> BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   295
<ul>                   /xD9   <U2518> BOX DRAWINGS LIGHT UP AND LEFT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   296
<dr>                   /xDA   <U250C> BOX DRAWINGS LIGHT DOWN AND RIGHT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   297
<FB>                   /xDB   <U2588> FULL BLOCK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   298
<LB>                   /xDC   <U2584> LOWER HALF BLOCK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   299
<lB>                   /xDD   <U258C> LEFT HALF BLOCK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   300
<RB>                   /xDE   <U2590> RIGHT HALF BLOCK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   301
<TB>                   /xDF   <U2580> UPPER HALF BLOCK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   302
<a*>                   /xE0   <U03B1> GREEK SMALL LETTER ALPHA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   303
<ss>                   /xE1   <U00DF> LATIN SMALL LETTER SHARP S (German)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   304
<G*>                   /xE2   <U0393> GREEK CAPITAL LETTER GAMMA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   305
<p*>                   /xE3   <U03C0> GREEK SMALL LETTER PI
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   306
<S*>                   /xE4   <U03A3> GREEK CAPITAL LETTER SIGMA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   307
<s*>                   /xE5   <U03C3> GREEK SMALL LETTER SIGMA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   308
<My>                   /xE6   <U00B5> MICRO SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   309
<t*>                   /xE7   <U03C4> GREEK SMALL LETTER TAU
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   310
<F*>                   /xE8   <U03A6> GREEK CAPITAL LETTER PHI
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   311
<H*>                   /xE9   <U0398> GREEK CAPITAL LETTER THETA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   312
<W*>                   /xEA   <U03A9> GREEK CAPITAL LETTER OMEGA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   313
<d*>                   /xEB   <U03B4> GREEK SMALL LETTER DELTA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   314
<00>                   /xEC   <U221E> INFINITY
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   315
<f*>                   /xED   <U03C6> GREEK SMALL LETTER PHI
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   316
<e*>                   /xEE   <U03B5> GREEK SMALL LETTER EPSILON
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   317
<(U>                   /xEF   <U2229> INTERSECTION
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   318
<=3>                   /xF0   <U2261> IDENTICAL TO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   319
<+->                   /xF1   <U00B1> PLUS-MINUS SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   320
</>=>                  /xF2   <U2265> GREATER-THAN OR EQUAL TO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   321
<=<>                   /xF3   <U2264> LESS-THAN OR EQUAL TO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   322
<Iu>                   /xF4   <U2320> TOP HALF INTEGRAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   323
<Il>                   /xF5   <U2321> BOTTOM HALF INTEGRAL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   324
<-:>                   /xF6   <U00F7> DIVISION SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   325
<?2>                   /xF7   <U2248> ALMOST EQUAL TO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   326
<DG>                   /xF8   <U00B0> DEGREE SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   327
<.M>                   /xF9   <U00B7> MIDDLE DOT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   328
<sb>                   /xFA   <U2022> BULLET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   329
<RT>                   /xFB   <U221A> SQUARE ROOT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   330
<nS>                   /xFC   <U207F> SUPERSCRIPT LATIN SMALL LETTER N
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   331
<2S>                   /xFD   <U00B2> SUPERSCRIPT TWO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   332
<fS>                   /xFE   <U25A0> BLACK SQUARE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   333
<NS>                   /xFF   <U00A0> NO-BREAK SPACE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   334
END CHARMAP
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   335
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   336
"
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   337
! !
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   338
8811
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   339
!CP437 methodsFor:'encoding & decoding'!
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   340
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   341
decode:codeArg
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   342
    "Automagically generated by generateCode - do not modify.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   343
     Decode from my encoding into unicode."
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   344
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   345
    |code "{ Class: SmallInteger }"|
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   346
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   347
    code := codeArg.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   348
    code <= 16r7F ifTrue:[ ^ code ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   349
    code > 16rFF ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   350
        ^ self decodingError.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   351
    ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   352
    ^ #(
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   353
       "16r0080"    16r00C7 " LATIN CAPITAL LETTER C WITH CEDILLA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   354
       "16r0081"    16r00FC " LATIN SMALL LETTER U WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   355
       "16r0082"    16r00E9 " LATIN SMALL LETTER E WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   356
       "16r0083"    16r00E2 " LATIN SMALL LETTER A WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   357
       "16r0084"    16r00E4 " LATIN SMALL LETTER A WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   358
       "16r0085"    16r00E0 " LATIN SMALL LETTER A WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   359
       "16r0086"    16r00E5 " LATIN SMALL LETTER A WITH RING ABOVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   360
       "16r0087"    16r00E7 " LATIN SMALL LETTER C WITH CEDILLA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   361
       "16r0088"    16r00EA " LATIN SMALL LETTER E WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   362
       "16r0089"    16r00EB " LATIN SMALL LETTER E WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   363
       "16r008A"    16r00E8 " LATIN SMALL LETTER E WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   364
       "16r008B"    16r00EF " LATIN SMALL LETTER I WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   365
       "16r008C"    16r00EE " LATIN SMALL LETTER I WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   366
       "16r008D"    16r00EC " LATIN SMALL LETTER I WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   367
       "16r008E"    16r00C4 " LATIN CAPITAL LETTER A WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   368
       "16r008F"    16r00C5 " LATIN CAPITAL LETTER A WITH RING ABOVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   369
       "16r0090"    16r00C9 " LATIN CAPITAL LETTER E WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   370
       "16r0091"    16r00E6 " LATIN SMALL LETTER AE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   371
       "16r0092"    16r00C6 " LATIN CAPITAL LETTER AE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   372
       "16r0093"    16r00F4 " LATIN SMALL LETTER O WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   373
       "16r0094"    16r00F6 " LATIN SMALL LETTER O WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   374
       "16r0095"    16r00F2 " LATIN SMALL LETTER O WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   375
       "16r0096"    16r00FB " LATIN SMALL LETTER U WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   376
       "16r0097"    16r00F9 " LATIN SMALL LETTER U WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   377
       "16r0098"    16r00FF " LATIN SMALL LETTER Y WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   378
       "16r0099"    16r00D6 " LATIN CAPITAL LETTER O WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   379
       "16r009A"    16r00DC " LATIN CAPITAL LETTER U WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   380
       "16r009B"    16r00A2 " CENT SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   381
       "16r009C"    16r00A3 " POUND SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   382
       "16r009D"    16r00A5 " YEN SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   383
       "16r009E"    16r20A7 " PESETA SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   384
       "16r009F"    16r0192 " LATIN SMALL LETTER F WITH HOOK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   385
       "16r00A0"    16r00E1 " LATIN SMALL LETTER A WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   386
       "16r00A1"    16r00ED " LATIN SMALL LETTER I WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   387
       "16r00A2"    16r00F3 " LATIN SMALL LETTER O WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   388
       "16r00A3"    16r00FA " LATIN SMALL LETTER U WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   389
       "16r00A4"    16r00F1 " LATIN SMALL LETTER N WITH TILDE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   390
       "16r00A5"    16r00D1 " LATIN CAPITAL LETTER N WITH TILDE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   391
       "16r00A6"    16r00AA " FEMININE ORDINAL INDICATOR " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   392
       "16r00A7"    16r00BA " MASCULINE ORDINAL INDICATOR " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   393
       "16r00A8"    16r00BF " INVERTED QUESTION MARK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   394
       "16r00A9"    16r2310 " REVERSED NOT SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   395
       "16r00AA"    16r00AC " NOT SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   396
       "16r00AB"    16r00BD " VULGAR FRACTION ONE HALF " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   397
       "16r00AC"    16r00BC " VULGAR FRACTION ONE QUARTER " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   398
       "16r00AD"    16r00A1 " INVERTED EXCLAMATION MARK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   399
       "16r00AE"    16r00AB " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   400
       "16r00AF"    16r00BB " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   401
       "16r00B0"    16r2591 " LIGHT SHADE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   402
       "16r00B1"    16r2592 " MEDIUM SHADE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   403
       "16r00B2"    16r2593 " DARK SHADE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   404
       "16r00B3"    16r2502 " BOX DRAWINGS LIGHT VERTICAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   405
       "16r00B4"    16r2524 " BOX DRAWINGS LIGHT VERTICAL AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   406
       "16r00B5"    16r2561 " BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   407
       "16r00B6"    16r2562 " BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   408
       "16r00B7"    16r2556 " BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   409
       "16r00B8"    16r2555 " BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   410
       "16r00B9"    16r2563 " BOX DRAWINGS DOUBLE VERTICAL AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   411
       "16r00BA"    16r2551 " BOX DRAWINGS DOUBLE VERTICAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   412
       "16r00BB"    16r2557 " BOX DRAWINGS DOUBLE DOWN AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   413
       "16r00BC"    16r255D " BOX DRAWINGS DOUBLE UP AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   414
       "16r00BD"    16r255C " BOX DRAWINGS UP DOUBLE AND LEFT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   415
       "16r00BE"    16r255B " BOX DRAWINGS UP SINGLE AND LEFT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   416
       "16r00BF"    16r2510 " BOX DRAWINGS LIGHT DOWN AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   417
       "16r00C0"    16r2514 " BOX DRAWINGS LIGHT UP AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   418
       "16r00C1"    16r2534 " BOX DRAWINGS LIGHT UP AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   419
       "16r00C2"    16r252C " BOX DRAWINGS LIGHT DOWN AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   420
       "16r00C3"    16r251C " BOX DRAWINGS LIGHT VERTICAL AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   421
       "16r00C4"    16r2500 " BOX DRAWINGS LIGHT HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   422
       "16r00C5"    16r253C " BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   423
       "16r00C6"    16r255E " BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   424
       "16r00C7"    16r255F " BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   425
       "16r00C8"    16r255A " BOX DRAWINGS DOUBLE UP AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   426
       "16r00C9"    16r2554 " BOX DRAWINGS DOUBLE DOWN AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   427
       "16r00CA"    16r2569 " BOX DRAWINGS DOUBLE UP AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   428
       "16r00CB"    16r2566 " BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   429
       "16r00CC"    16r2560 " BOX DRAWINGS DOUBLE VERTICAL AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   430
       "16r00CD"    16r2550 " BOX DRAWINGS DOUBLE HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   431
       "16r00CE"    16r256C " BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   432
       "16r00CF"    16r2567 " BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   433
       "16r00D0"    16r2568 " BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   434
       "16r00D1"    16r2564 " BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   435
       "16r00D2"    16r2565 " BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   436
       "16r00D3"    16r2559 " BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   437
       "16r00D4"    16r2558 " BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   438
       "16r00D5"    16r2552 " BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   439
       "16r00D6"    16r2553 " BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   440
       "16r00D7"    16r256B " BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   441
       "16r00D8"    16r256A " BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   442
       "16r00D9"    16r2518 " BOX DRAWINGS LIGHT UP AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   443
       "16r00DA"    16r250C " BOX DRAWINGS LIGHT DOWN AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   444
       "16r00DB"    16r2588 " FULL BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   445
       "16r00DC"    16r2584 " LOWER HALF BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   446
       "16r00DD"    16r258C " LEFT HALF BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   447
       "16r00DE"    16r2590 " RIGHT HALF BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   448
       "16r00DF"    16r2580 " UPPER HALF BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   449
       "16r00E0"    16r03B1 " GREEK SMALL LETTER ALPHA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   450
       "16r00E1"    16r00DF " LATIN SMALL LETTER SHARP S (German) " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   451
       "16r00E2"    16r0393 " GREEK CAPITAL LETTER GAMMA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   452
       "16r00E3"    16r03C0 " GREEK SMALL LETTER PI " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   453
       "16r00E4"    16r03A3 " GREEK CAPITAL LETTER SIGMA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   454
       "16r00E5"    16r03C3 " GREEK SMALL LETTER SIGMA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   455
       "16r00E6"    16r00B5 " MICRO SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   456
       "16r00E7"    16r03C4 " GREEK SMALL LETTER TAU " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   457
       "16r00E8"    16r03A6 " GREEK CAPITAL LETTER PHI " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   458
       "16r00E9"    16r0398 " GREEK CAPITAL LETTER THETA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   459
       "16r00EA"    16r03A9 " GREEK CAPITAL LETTER OMEGA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   460
       "16r00EB"    16r03B4 " GREEK SMALL LETTER DELTA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   461
       "16r00EC"    16r221E " INFINITY " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   462
       "16r00ED"    16r03C6 " GREEK SMALL LETTER PHI " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   463
       "16r00EE"    16r03B5 " GREEK SMALL LETTER EPSILON " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   464
       "16r00EF"    16r2229 " INTERSECTION " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   465
       "16r00F0"    16r2261 " IDENTICAL TO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   466
       "16r00F1"    16r00B1 " PLUS-MINUS SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   467
       "16r00F2"    16r2265 " GREATER-THAN OR EQUAL TO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   468
       "16r00F3"    16r2264 " LESS-THAN OR EQUAL TO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   469
       "16r00F4"    16r2320 " TOP HALF INTEGRAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   470
       "16r00F5"    16r2321 " BOTTOM HALF INTEGRAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   471
       "16r00F6"    16r00F7 " DIVISION SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   472
       "16r00F7"    16r2248 " ALMOST EQUAL TO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   473
       "16r00F8"    16r00B0 " DEGREE SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   474
       "16r00F9"    16r00B7 " MIDDLE DOT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   475
       "16r00FA"    16r2022 " BULLET " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   476
       "16r00FB"    16r221A " SQUARE ROOT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   477
       "16r00FC"    16r207F " SUPERSCRIPT LATIN SMALL LETTER N " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   478
       "16r00FD"    16r00B2 " SUPERSCRIPT TWO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   479
       "16r00FE"    16r25A0 " BLACK SQUARE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   480
       "16r00FF"    16r00A0 " NO-BREAK SPACE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   481
       ) at:(code - 16r7F).
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   482
!
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   483
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   484
encode:unicodeArg
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   485
    "Automagically generated by generateCode - do not modify.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   486
     Encode from unicode into my encoding."
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   487
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   488
    |unicode "{ Class: SmallInteger }"|
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   489
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   490
    unicode := unicodeArg.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   491
    unicode <= 16r7F ifTrue:[ ^ unicode ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   492
    unicode > 16r25A0 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   493
        ^ self encodingError.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   494
    ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   495
    unicode <= 16r9F ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   496
        ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   497
    ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   498
    unicode <= 16r3C6 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   499
        unicode <= 16r192 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   500
            unicode <= 16rFF ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   501
                [
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   502
                    |t|
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   503
                    t := #[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   504
                       "16r00A0"    16rFF " NO-BREAK SPACE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   505
                       "16r00A1"    16rAD " INVERTED EXCLAMATION MARK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   506
                       "16r00A2"    16r9B " CENT SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   507
                       "16r00A3"    16r9C " POUND SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   508
                       "16r00A4"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   509
                       "16r00A5"    16r9D " YEN SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   510
                       "16r00A6"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   511
                       "16r00A7"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   512
                       "16r00A8"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   513
                       "16r00A9"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   514
                       "16r00AA"    16rA6 " FEMININE ORDINAL INDICATOR " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   515
                       "16r00AB"    16rAE " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   516
                       "16r00AC"    16rAA " NOT SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   517
                       "16r00AD"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   518
                       "16r00AE"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   519
                       "16r00AF"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   520
                       "16r00B0"    16rF8 " DEGREE SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   521
                       "16r00B1"    16rF1 " PLUS-MINUS SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   522
                       "16r00B2"    16rFD " SUPERSCRIPT TWO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   523
                       "16r00B3"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   524
                       "16r00B4"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   525
                       "16r00B5"    16rE6 " MICRO SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   526
                       "16r00B6"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   527
                       "16r00B7"    16rF9 " MIDDLE DOT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   528
                       "16r00B8"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   529
                       "16r00B9"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   530
                       "16r00BA"    16rA7 " MASCULINE ORDINAL INDICATOR " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   531
                       "16r00BB"    16rAF " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   532
                       "16r00BC"    16rAC " VULGAR FRACTION ONE QUARTER " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   533
                       "16r00BD"    16rAB " VULGAR FRACTION ONE HALF " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   534
                       "16r00BE"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   535
                       "16r00BF"    16rA8 " INVERTED QUESTION MARK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   536
                       "16r00C0"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   537
                       "16r00C1"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   538
                       "16r00C2"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   539
                       "16r00C3"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   540
                       "16r00C4"    16r8E " LATIN CAPITAL LETTER A WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   541
                       "16r00C5"    16r8F " LATIN CAPITAL LETTER A WITH RING ABOVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   542
                       "16r00C6"    16r92 " LATIN CAPITAL LETTER AE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   543
                       "16r00C7"    16r80 " LATIN CAPITAL LETTER C WITH CEDILLA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   544
                       "16r00C8"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   545
                       "16r00C9"    16r90 " LATIN CAPITAL LETTER E WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   546
                       "16r00CA"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   547
                       "16r00CB"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   548
                       "16r00CC"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   549
                       "16r00CD"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   550
                       "16r00CE"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   551
                       "16r00CF"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   552
                       "16r00D0"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   553
                       "16r00D1"    16rA5 " LATIN CAPITAL LETTER N WITH TILDE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   554
                       "16r00D2"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   555
                       "16r00D3"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   556
                       "16r00D4"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   557
                       "16r00D5"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   558
                       "16r00D6"    16r99 " LATIN CAPITAL LETTER O WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   559
                       "16r00D7"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   560
                       "16r00D8"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   561
                       "16r00D9"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   562
                       "16r00DA"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   563
                       "16r00DB"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   564
                       "16r00DC"    16r9A " LATIN CAPITAL LETTER U WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   565
                       "16r00DD"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   566
                       "16r00DE"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   567
                       "16r00DF"    16rE1 " LATIN SMALL LETTER SHARP S (German) " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   568
                       "16r00E0"    16r85 " LATIN SMALL LETTER A WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   569
                       "16r00E1"    16rA0 " LATIN SMALL LETTER A WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   570
                       "16r00E2"    16r83 " LATIN SMALL LETTER A WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   571
                       "16r00E3"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   572
                       "16r00E4"    16r84 " LATIN SMALL LETTER A WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   573
                       "16r00E5"    16r86 " LATIN SMALL LETTER A WITH RING ABOVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   574
                       "16r00E6"    16r91 " LATIN SMALL LETTER AE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   575
                       "16r00E7"    16r87 " LATIN SMALL LETTER C WITH CEDILLA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   576
                       "16r00E8"    16r8A " LATIN SMALL LETTER E WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   577
                       "16r00E9"    16r82 " LATIN SMALL LETTER E WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   578
                       "16r00EA"    16r88 " LATIN SMALL LETTER E WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   579
                       "16r00EB"    16r89 " LATIN SMALL LETTER E WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   580
                       "16r00EC"    16r8D " LATIN SMALL LETTER I WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   581
                       "16r00ED"    16rA1 " LATIN SMALL LETTER I WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   582
                       "16r00EE"    16r8C " LATIN SMALL LETTER I WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   583
                       "16r00EF"    16r8B " LATIN SMALL LETTER I WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   584
                       "16r00F0"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   585
                       "16r00F1"    16rA4 " LATIN SMALL LETTER N WITH TILDE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   586
                       "16r00F2"    16r95 " LATIN SMALL LETTER O WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   587
                       "16r00F3"    16rA2 " LATIN SMALL LETTER O WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   588
                       "16r00F4"    16r93 " LATIN SMALL LETTER O WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   589
                       "16r00F5"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   590
                       "16r00F6"    16r94 " LATIN SMALL LETTER O WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   591
                       "16r00F7"    16rF6 " DIVISION SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   592
                       "16r00F8"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   593
                       "16r00F9"    16r97 " LATIN SMALL LETTER U WITH GRAVE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   594
                       "16r00FA"    16rA3 " LATIN SMALL LETTER U WITH ACUTE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   595
                       "16r00FB"    16r96 " LATIN SMALL LETTER U WITH CIRCUMFLEX " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   596
                       "16r00FC"    16r81 " LATIN SMALL LETTER U WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   597
                       "16r00FD"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   598
                       "16r00FE"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   599
                       "16r00FF"    16r98 " LATIN SMALL LETTER Y WITH DIAERESIS " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   600
                       ] at:(unicode - 16r9F).
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   601
                    t == 0 ifFalse:[^ t].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   602
                    ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   603
                ] value.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   604
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   605
            unicode <= 16r191 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   606
                ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   607
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   608
            ^  "16r0192" 16r009F " LATIN SMALL LETTER F WITH HOOK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   609
        ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   610
        unicode <= 16r392 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   611
            ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   612
        ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   613
        [
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   614
            |t|
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   615
            t := #[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   616
               "16r0393"    16rE2 " GREEK CAPITAL LETTER GAMMA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   617
               "16r0394"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   618
               "16r0395"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   619
               "16r0396"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   620
               "16r0397"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   621
               "16r0398"    16rE9 " GREEK CAPITAL LETTER THETA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   622
               "16r0399"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   623
               "16r039A"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   624
               "16r039B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   625
               "16r039C"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   626
               "16r039D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   627
               "16r039E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   628
               "16r039F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   629
               "16r03A0"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   630
               "16r03A1"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   631
               "16r03A2"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   632
               "16r03A3"    16rE4 " GREEK CAPITAL LETTER SIGMA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   633
               "16r03A4"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   634
               "16r03A5"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   635
               "16r03A6"    16rE8 " GREEK CAPITAL LETTER PHI " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   636
               "16r03A7"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   637
               "16r03A8"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   638
               "16r03A9"    16rEA " GREEK CAPITAL LETTER OMEGA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   639
               "16r03AA"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   640
               "16r03AB"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   641
               "16r03AC"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   642
               "16r03AD"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   643
               "16r03AE"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   644
               "16r03AF"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   645
               "16r03B0"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   646
               "16r03B1"    16rE0 " GREEK SMALL LETTER ALPHA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   647
               "16r03B2"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   648
               "16r03B3"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   649
               "16r03B4"    16rEB " GREEK SMALL LETTER DELTA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   650
               "16r03B5"    16rEE " GREEK SMALL LETTER EPSILON " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   651
               "16r03B6"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   652
               "16r03B7"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   653
               "16r03B8"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   654
               "16r03B9"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   655
               "16r03BA"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   656
               "16r03BB"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   657
               "16r03BC"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   658
               "16r03BD"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   659
               "16r03BE"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   660
               "16r03BF"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   661
               "16r03C0"    16rE3 " GREEK SMALL LETTER PI " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   662
               "16r03C1"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   663
               "16r03C2"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   664
               "16r03C3"    16rE5 " GREEK SMALL LETTER SIGMA " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   665
               "16r03C4"    16rE7 " GREEK SMALL LETTER TAU " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   666
               "16r03C5"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   667
               "16r03C6"    16rED " GREEK SMALL LETTER PHI " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   668
               ] at:(unicode - 16r392).
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   669
            t == 0 ifFalse:[^ t].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   670
            ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   671
        ] value.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   672
    ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   673
    unicode <= 16r2021 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   674
        ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   675
    ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   676
    unicode <= 16r2321 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   677
        unicode <= 16r20A7 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   678
            unicode == 16r2022 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   679
                ^  "16r2022" 16r00FA " BULLET " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   680
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   681
            unicode <= 16r207E ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   682
                ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   683
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   684
            unicode == 16r207F ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   685
                ^  "16r207F" 16r00FC " SUPERSCRIPT LATIN SMALL LETTER N " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   686
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   687
            unicode <= 16r20A6 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   688
                ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   689
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   690
            ^  "16r20A7" 16r009E " PESETA SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   691
        ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   692
        unicode <= 16r2219 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   693
            ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   694
        ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   695
        unicode <= 16r2265 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   696
            unicode <= 16r2229 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   697
                [
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   698
                    |t|
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   699
                    t := #[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   700
                       "16r221A"    16rFB " SQUARE ROOT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   701
                       "16r221B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   702
                       "16r221C"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   703
                       "16r221D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   704
                       "16r221E"    16rEC " INFINITY " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   705
                       "16r221F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   706
                       "16r2220"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   707
                       "16r2221"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   708
                       "16r2222"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   709
                       "16r2223"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   710
                       "16r2224"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   711
                       "16r2225"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   712
                       "16r2226"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   713
                       "16r2227"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   714
                       "16r2228"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   715
                       "16r2229"    16rEF " INTERSECTION " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   716
                       ] at:(unicode - 16r2219).
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   717
                    t == 0 ifFalse:[^ t].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   718
                    ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   719
                ] value.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   720
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   721
            unicode <= 16r2247 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   722
                ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   723
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   724
            unicode == 16r2248 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   725
                ^  "16r2248" 16r00F7 " ALMOST EQUAL TO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   726
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   727
            unicode <= 16r2260 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   728
                ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   729
            ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   730
            [
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   731
                |t|
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   732
                t := #[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   733
                   "16r2261"    16rF0 " IDENTICAL TO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   734
                   "16r2262"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   735
                   "16r2263"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   736
                   "16r2264"    16rF3 " LESS-THAN OR EQUAL TO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   737
                   "16r2265"    16rF2 " GREATER-THAN OR EQUAL TO " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   738
                   ] at:(unicode - 16r2260).
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   739
                t == 0 ifFalse:[^ t].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   740
                ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   741
            ] value.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   742
        ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   743
        unicode <= 16r230F ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   744
            ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   745
        ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   746
        unicode == 16r2310 ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   747
            (#[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   748
               "16r2310"    1 " REVERSED NOT SIGN " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   749
            ] at:(unicode - 8975)) ~~ 0 ifTrue:[^ unicode].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   750
            ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   751
        ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   752
        unicode <= 16r231F ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   753
            ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   754
        ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   755
        ^ #[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   756
           "16r2320"    16rF4 " TOP HALF INTEGRAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   757
           "16r2321"    16rF5 " BOTTOM HALF INTEGRAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   758
           ] at:(unicode - 16r231F).
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   759
    ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   760
    unicode <= 16r24FF ifTrue:[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   761
        ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   762
    ].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   763
    [
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   764
        |t|
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   765
        t := #[
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   766
           "16r2500"    16rC4 " BOX DRAWINGS LIGHT HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   767
           "16r2501"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   768
           "16r2502"    16rB3 " BOX DRAWINGS LIGHT VERTICAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   769
           "16r2503"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   770
           "16r2504"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   771
           "16r2505"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   772
           "16r2506"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   773
           "16r2507"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   774
           "16r2508"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   775
           "16r2509"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   776
           "16r250A"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   777
           "16r250B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   778
           "16r250C"    16rDA " BOX DRAWINGS LIGHT DOWN AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   779
           "16r250D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   780
           "16r250E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   781
           "16r250F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   782
           "16r2510"    16rBF " BOX DRAWINGS LIGHT DOWN AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   783
           "16r2511"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   784
           "16r2512"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   785
           "16r2513"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   786
           "16r2514"    16rC0 " BOX DRAWINGS LIGHT UP AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   787
           "16r2515"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   788
           "16r2516"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   789
           "16r2517"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   790
           "16r2518"    16rD9 " BOX DRAWINGS LIGHT UP AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   791
           "16r2519"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   792
           "16r251A"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   793
           "16r251B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   794
           "16r251C"    16rC3 " BOX DRAWINGS LIGHT VERTICAL AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   795
           "16r251D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   796
           "16r251E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   797
           "16r251F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   798
           "16r2520"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   799
           "16r2521"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   800
           "16r2522"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   801
           "16r2523"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   802
           "16r2524"    16rB4 " BOX DRAWINGS LIGHT VERTICAL AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   803
           "16r2525"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   804
           "16r2526"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   805
           "16r2527"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   806
           "16r2528"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   807
           "16r2529"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   808
           "16r252A"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   809
           "16r252B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   810
           "16r252C"    16rC2 " BOX DRAWINGS LIGHT DOWN AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   811
           "16r252D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   812
           "16r252E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   813
           "16r252F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   814
           "16r2530"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   815
           "16r2531"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   816
           "16r2532"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   817
           "16r2533"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   818
           "16r2534"    16rC1 " BOX DRAWINGS LIGHT UP AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   819
           "16r2535"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   820
           "16r2536"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   821
           "16r2537"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   822
           "16r2538"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   823
           "16r2539"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   824
           "16r253A"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   825
           "16r253B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   826
           "16r253C"    16rC5 " BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   827
           "16r253D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   828
           "16r253E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   829
           "16r253F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   830
           "16r2540"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   831
           "16r2541"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   832
           "16r2542"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   833
           "16r2543"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   834
           "16r2544"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   835
           "16r2545"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   836
           "16r2546"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   837
           "16r2547"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   838
           "16r2548"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   839
           "16r2549"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   840
           "16r254A"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   841
           "16r254B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   842
           "16r254C"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   843
           "16r254D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   844
           "16r254E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   845
           "16r254F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   846
           "16r2550"    16rCD " BOX DRAWINGS DOUBLE HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   847
           "16r2551"    16rBA " BOX DRAWINGS DOUBLE VERTICAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   848
           "16r2552"    16rD5 " BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   849
           "16r2553"    16rD6 " BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   850
           "16r2554"    16rC9 " BOX DRAWINGS DOUBLE DOWN AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   851
           "16r2555"    16rB8 " BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   852
           "16r2556"    16rB7 " BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   853
           "16r2557"    16rBB " BOX DRAWINGS DOUBLE DOWN AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   854
           "16r2558"    16rD4 " BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   855
           "16r2559"    16rD3 " BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   856
           "16r255A"    16rC8 " BOX DRAWINGS DOUBLE UP AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   857
           "16r255B"    16rBE " BOX DRAWINGS UP SINGLE AND LEFT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   858
           "16r255C"    16rBD " BOX DRAWINGS UP DOUBLE AND LEFT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   859
           "16r255D"    16rBC " BOX DRAWINGS DOUBLE UP AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   860
           "16r255E"    16rC6 " BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   861
           "16r255F"    16rC7 " BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   862
           "16r2560"    16rCC " BOX DRAWINGS DOUBLE VERTICAL AND RIGHT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   863
           "16r2561"    16rB5 " BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   864
           "16r2562"    16rB6 " BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   865
           "16r2563"    16rB9 " BOX DRAWINGS DOUBLE VERTICAL AND LEFT " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   866
           "16r2564"    16rD1 " BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   867
           "16r2565"    16rD2 " BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   868
           "16r2566"    16rCB " BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   869
           "16r2567"    16rCF " BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   870
           "16r2568"    16rD0 " BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   871
           "16r2569"    16rCA " BOX DRAWINGS DOUBLE UP AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   872
           "16r256A"    16rD8 " BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   873
           "16r256B"    16rD7 " BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   874
           "16r256C"    16rCE " BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   875
           "16r256D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   876
           "16r256E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   877
           "16r256F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   878
           "16r2570"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   879
           "16r2571"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   880
           "16r2572"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   881
           "16r2573"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   882
           "16r2574"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   883
           "16r2575"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   884
           "16r2576"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   885
           "16r2577"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   886
           "16r2578"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   887
           "16r2579"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   888
           "16r257A"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   889
           "16r257B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   890
           "16r257C"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   891
           "16r257D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   892
           "16r257E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   893
           "16r257F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   894
           "16r2580"    16rDF " UPPER HALF BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   895
           "16r2581"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   896
           "16r2582"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   897
           "16r2583"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   898
           "16r2584"    16rDC " LOWER HALF BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   899
           "16r2585"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   900
           "16r2586"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   901
           "16r2587"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   902
           "16r2588"    16rDB " FULL BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   903
           "16r2589"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   904
           "16r258A"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   905
           "16r258B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   906
           "16r258C"    16rDD " LEFT HALF BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   907
           "16r258D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   908
           "16r258E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   909
           "16r258F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   910
           "16r2590"    16rDE " RIGHT HALF BLOCK " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   911
           "16r2591"    16rB0 " LIGHT SHADE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   912
           "16r2592"    16rB1 " MEDIUM SHADE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   913
           "16r2593"    16rB2 " DARK SHADE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   914
           "16r2594"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   915
           "16r2595"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   916
           "16r2596"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   917
           "16r2597"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   918
           "16r2598"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   919
           "16r2599"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   920
           "16r259A"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   921
           "16r259B"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   922
           "16r259C"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   923
           "16r259D"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   924
           "16r259E"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   925
           "16r259F"    16r00 " invalid " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   926
           "16r25A0"    16rFE " BLACK SQUARE " 
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   927
           ] at:(unicode - 16r24FF).
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   928
        t == 0 ifFalse:[^ t].
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   929
        ^ self encodingError
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   930
    ] value.
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   931
! !
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   932
8081
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   933
!CP437 class methodsFor:'documentation'!
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   934
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   935
version
8811
b2a78fe1d44f documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   936
    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__CP437.st,v 1.4 2005-03-31 18:12:18 cg Exp $'
8081
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   937
! !