CharacterEncoderImplementations__MS_Cyrillic.st
author Claus Gittinger <cg@exept.de>
Tue, 09 Jul 2019 20:55:17 +0200
changeset 24417 03b083548da2
parent 8813 c2908c7fc648
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:#MS_Cyrillic
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
!MS_Cyrillic 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
"
8813
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    38
!
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    39
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    40
documentation
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    41
"
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    42
    CP1251 / Microsoft Cyrillic
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    43
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    44
    [see with:]
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    45
        CharacterEncoderImplementations::MS_Cyrillic showCharacterSet
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    46
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    47
    [author:]
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    48
        Claus Gittinger
c2908c7fc648 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
!MS_Cyrillic class methodsFor:'mapping'!
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
    ^ 'CP1251'
8813
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    56
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    57
    "
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    58
     self generateCode
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    59
    "
8081
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
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
# From: http://std.dkuug.dk/i18n/charmaps/CP1251
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
<code_set_name> CP1251
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
<comment_char> %
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
<escape_char> /
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    69
% version: 1.0
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    70
% repertoiremap: mnemonic,ds
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    71
%  source: UNICODE 1.0
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    72
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
% alias MS-CYRL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
CHARMAP
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
<NU>                   /x00   <U0000> NULL (NUL)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
<SH>                   /x01   <U0001> START OF HEADING (SOH)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    77
<SX>                   /x02   <U0002> START OF TEXT (STX)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    78
<EX>                   /x03   <U0003> END OF TEXT (ETX)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    79
<ET>                   /x04   <U0004> END OF TRANSMISSION (EOT)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    80
<EQ>                   /x05   <U0005> ENQUIRY (ENQ)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    81
<AK>                   /x06   <U0006> ACKNOWLEDGE (ACK)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    82
<BL>                   /x07   <U0007> BELL (BEL)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
<BS>                   /x08   <U0008> BACKSPACE (BS)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
<HT>                   /x09   <U0009> CHARACTER TABULATION (HT)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85
<LF>                   /x0A   <U000A> LINE FEED (LF)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    86
<VT>                   /x0B   <U000B> LINE TABULATION (VT)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    87
<FF>                   /x0C   <U000C> FORM FEED (FF)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    88
<CR>                   /x0D   <U000D> CARRIAGE RETURN (CR)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    89
<SO>                   /x0E   <U000E> SHIFT OUT (SO)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    90
<SI>                   /x0F   <U000F> SHIFT IN (SI)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    91
<DL>                   /x10   <U0010> DATALINK ESCAPE (DLE)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    92
<D1>                   /x11   <U0011> DEVICE CONTROL ONE (DC1)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    93
<D2>                   /x12   <U0012> DEVICE CONTROL TWO (DC2)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    94
<D3>                   /x13   <U0013> DEVICE CONTROL THREE (DC3)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    95
<D4>                   /x14   <U0014> DEVICE CONTROL FOUR (DC4)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    96
<NK>                   /x15   <U0015> NEGATIVE ACKNOWLEDGE (NAK)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    97
<SY>                   /x16   <U0016> SYNCHRONOUS IDLE (SYN)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    98
<EB>                   /x17   <U0017> END OF TRANSMISSION BLOCK (ETB)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    99
<CN>                   /x18   <U0018> CANCEL (CAN)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   100
<EM>                   /x19   <U0019> END OF MEDIUM (EM)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   101
<SB>                   /x1A   <U001A> SUBSTITUTE (SUB)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   102
<EC>                   /x1B   <U001B> ESCAPE (ESC)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   103
<FS>                   /x1C   <U001C> FILE SEPARATOR (IS4)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   104
<GS>                   /x1D   <U001D> GROUP SEPARATOR (IS3)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   105
<RS>                   /x1E   <U001E> RECORD SEPARATOR (IS2)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   106
<US>                   /x1F   <U001F> UNIT SEPARATOR (IS1)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   107
<SP>                   /x20   <U0020> SPACE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   108
<!!>                    /x21   <U0021> EXCLAMATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   109
<'>                    /x22   <U0022> QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   110
<Nb>                   /x23   <U0023> NUMBER SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   111
<DO>                   /x24   <U0024> DOLLAR SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   112
<%>                    /x25   <U0025> PERCENT SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   113
<&>                    /x26   <U0026> AMPERSAND
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   114
<'>                    /x27   <U0027> APOSTROPHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   115
<(>                    /x28   <U0028> LEFT PARENTHESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   116
<)>                    /x29   <U0029> RIGHT PARENTHESIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   117
<*>                    /x2A   <U002A> ASTERISK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   118
<+>                    /x2B   <U002B> PLUS SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   119
<,>                    /x2C   <U002C> COMMA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   120
<->                    /x2D   <U002D> HYPHEN-MINUS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   121
<.>                    /x2E   <U002E> FULL STOP
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   122
<//>                   /x2F   <U002F> SOLIDUS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   123
<0>                    /x30   <U0030> DIGIT ZERO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   124
<1>                    /x31   <U0031> DIGIT ONE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   125
<2>                    /x32   <U0032> DIGIT TWO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   126
<3>                    /x33   <U0033> DIGIT THREE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   127
<4>                    /x34   <U0034> DIGIT FOUR
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   128
<5>                    /x35   <U0035> DIGIT FIVE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   129
<6>                    /x36   <U0036> DIGIT SIX
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   130
<7>                    /x37   <U0037> DIGIT SEVEN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   131
<8>                    /x38   <U0038> DIGIT EIGHT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   132
<9>                    /x39   <U0039> DIGIT NINE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   133
<:>                    /x3A   <U003A> COLON
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   134
<;>                    /x3B   <U003B> SEMICOLON
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   135
<<>                    /x3C   <U003C> LESS-THAN SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   136
<=>                    /x3D   <U003D> EQUALS SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   137
</>>                   /x3E   <U003E> GREATER-THAN SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   138
<?>                    /x3F   <U003F> QUESTION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   139
<At>                   /x40   <U0040> COMMERCIAL AT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   140
<A>                    /x41   <U0041> LATIN CAPITAL LETTER A
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   141
<B>                    /x42   <U0042> LATIN CAPITAL LETTER B
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   142
<C>                    /x43   <U0043> LATIN CAPITAL LETTER C
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   143
<D>                    /x44   <U0044> LATIN CAPITAL LETTER D
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   144
<E>                    /x45   <U0045> LATIN CAPITAL LETTER E
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   145
<F>                    /x46   <U0046> LATIN CAPITAL LETTER F
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   146
<G>                    /x47   <U0047> LATIN CAPITAL LETTER G
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   147
<H>                    /x48   <U0048> LATIN CAPITAL LETTER H
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   148
<I>                    /x49   <U0049> LATIN CAPITAL LETTER I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   149
<J>                    /x4A   <U004A> LATIN CAPITAL LETTER J
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   150
<K>                    /x4B   <U004B> LATIN CAPITAL LETTER K
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   151
<L>                    /x4C   <U004C> LATIN CAPITAL LETTER L
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   152
<M>                    /x4D   <U004D> LATIN CAPITAL LETTER M
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   153
<N>                    /x4E   <U004E> LATIN CAPITAL LETTER N
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   154
<O>                    /x4F   <U004F> LATIN CAPITAL LETTER O
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   155
<P>                    /x50   <U0050> LATIN CAPITAL LETTER P
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   156
<Q>                    /x51   <U0051> LATIN CAPITAL LETTER Q
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   157
<R>                    /x52   <U0052> LATIN CAPITAL LETTER R
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   158
<S>                    /x53   <U0053> LATIN CAPITAL LETTER S
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   159
<T>                    /x54   <U0054> LATIN CAPITAL LETTER T
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   160
<U>                    /x55   <U0055> LATIN CAPITAL LETTER U
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   161
<V>                    /x56   <U0056> LATIN CAPITAL LETTER V
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   162
<W>                    /x57   <U0057> LATIN CAPITAL LETTER W
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   163
<X>                    /x58   <U0058> LATIN CAPITAL LETTER X
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   164
<Y>                    /x59   <U0059> LATIN CAPITAL LETTER Y
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   165
<Z>                    /x5A   <U005A> LATIN CAPITAL LETTER Z
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   166
<<(>                   /x5B   <U005B> LEFT SQUARE BRACKET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   167
<////>                 /x5C   <U005C> REVERSE SOLIDUS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   168
<)/>>                  /x5D   <U005D> RIGHT SQUARE BRACKET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   169
<'/>>                  /x5E   <U005E> CIRCUMFLEX ACCENT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   170
<_>                    /x5F   <U005F> LOW LINE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   171
<'!!>                   /x60   <U0060> GRAVE ACCENT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   172
<a>                    /x61   <U0061> LATIN SMALL LETTER A
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   173
<b>                    /x62   <U0062> LATIN SMALL LETTER B
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   174
<c>                    /x63   <U0063> LATIN SMALL LETTER C
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   175
<d>                    /x64   <U0064> LATIN SMALL LETTER D
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   176
<e>                    /x65   <U0065> LATIN SMALL LETTER E
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   177
<f>                    /x66   <U0066> LATIN SMALL LETTER F
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   178
<g>                    /x67   <U0067> LATIN SMALL LETTER G
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   179
<h>                    /x68   <U0068> LATIN SMALL LETTER H
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   180
<i>                    /x69   <U0069> LATIN SMALL LETTER I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   181
<j>                    /x6A   <U006A> LATIN SMALL LETTER J
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   182
<k>                    /x6B   <U006B> LATIN SMALL LETTER K
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   183
<l>                    /x6C   <U006C> LATIN SMALL LETTER L
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   184
<m>                    /x6D   <U006D> LATIN SMALL LETTER M
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   185
<n>                    /x6E   <U006E> LATIN SMALL LETTER N
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   186
<o>                    /x6F   <U006F> LATIN SMALL LETTER O
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   187
<p>                    /x70   <U0070> LATIN SMALL LETTER P
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   188
<q>                    /x71   <U0071> LATIN SMALL LETTER Q
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   189
<r>                    /x72   <U0072> LATIN SMALL LETTER R
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   190
<s>                    /x73   <U0073> LATIN SMALL LETTER S
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   191
<t>                    /x74   <U0074> LATIN SMALL LETTER T
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   192
<u>                    /x75   <U0075> LATIN SMALL LETTER U
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   193
<v>                    /x76   <U0076> LATIN SMALL LETTER V
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   194
<w>                    /x77   <U0077> LATIN SMALL LETTER W
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   195
<x>                    /x78   <U0078> LATIN SMALL LETTER X
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   196
<y>                    /x79   <U0079> LATIN SMALL LETTER Y
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   197
<z>                    /x7A   <U007A> LATIN SMALL LETTER Z
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   198
<(!!>                   /x7B   <U007B> LEFT CURLY BRACKET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   199
<!!!!>                   /x7C   <U007C> VERTICAL LINE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   200
<!!)>                   /x7D   <U007D> RIGHT CURLY BRACKET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   201
<'?>                   /x7E   <U007E> TILDE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   202
<DT>                   /x7F   <U007F> DELETE (DEL)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   203
<D%>                   /x80   <U0402> CYRILLIC CAPITAL LETTER DJE (Serbocroatian)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   204
<G%>                   /x81   <U0403> CYRILLIC CAPITAL LETTER GJE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   205
<.9>                   /x82   <U201A> SINGLE LOW-9 QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   206
<g%>                   /x83   <U0453> CYRILLIC SMALL LETTER GJE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   207
<:9>                   /x84   <U201E> DOUBLE LOW-9 QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   208
<.3>                   /x85   <U2026> HORIZONTAL ELLIPSIS
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   209
<//->                  /x86   <U2020> DAGGER
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   210
<//=>                  /x87   <U2021> DOUBLE DAGGER
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   211
<%0>                   /x89   <U2030> PER MILLE SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   212
<LJ>                   /x8A   <U0409> CYRILLIC CAPITAL LETTER LJE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   213
<<1>                   /x8B   <U2039> SINGLE LEFT-POINTING ANGLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   214
<NJ>                   /x8C   <U040A> CYRILLIC CAPITAL LETTER NJE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   215
<KJ>                   /x8D   <U040C> CYRILLIC CAPITAL LETTER KJE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   216
<Ts>                   /x8E   <U040B> CYRILLIC CAPITAL LETTER TSHE (Serbocroatian)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   217
<DZ>                   /x8F   <U040F> CYRILLIC CAPITAL LETTER DZHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   218
<d%>                   /x90   <U0452> CYRILLIC SMALL LETTER DJE (Serbocroatian)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   219
<'6>                   /x91   <U2018> LEFT SINGLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   220
<'9>                   /x92   <U2019> RIGHT SINGLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   221
<'6>                   /x93   <U201C> LEFT DOUBLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   222
<'9>                   /x94   <U201D> RIGHT DOUBLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   223
<sb>                   /x95   <U2022> BULLET
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   224
<-N>                   /x96   <U2013> EN DASH
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   225
<-M>                   /x97   <U2014> EM DASH
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   226
<TM>                   /x99   <U2122> TRADE MARK SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   227
<lj>                   /x9A   <U0459> CYRILLIC SMALL LETTER LJE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   228
</>1>                  /x9B   <U203A> SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   229
<nj>                   /x9C   <U045A> CYRILLIC SMALL LETTER NJE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   230
<kj>                   /x9D   <U045C> CYRILLIC SMALL LETTER KJE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   231
<ts>                   /x9E   <U045B> CYRILLIC SMALL LETTER TSHE (Serbocroatian)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   232
<dz>                   /x9F   <U045F> CYRILLIC SMALL LETTER DZHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   233
<NS>                   /xA0   <U00A0> NO-BREAK SPACE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   234
<V%>                   /xA1   <U040E> CYRILLIC CAPITAL LETTER SHORT U (Byelorussian)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   235
<v%>                   /xA2   <U045E> CYRILLIC SMALL LETTER SHORT U (Byelorussian)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   236
<J%>                   /xA3   <U0408> CYRILLIC CAPITAL LETTER JE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   237
<Cu>                   /xA4   <U00A4> CURRENCY SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   238
<G3>                   /xA5   <U0490> CYRILLIC CAPITAL LETTER GHE WITH UPTURN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   239
<BB>                   /xA6   <U00A6> BROKEN BAR
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   240
<SE>                   /xA7   <U00A7> SECTION SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   241
<IO>                   /xA8   <U0401> CYRILLIC CAPITAL LETTER IO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   242
<Co>                   /xA9   <U00A9> COPYRIGHT SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   243
<IE>                   /xAA   <U0404> CYRILLIC CAPITAL LETTER UKRAINIAN IE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   244
<<<>                   /xAB   <U00AB> LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   245
<NO>                   /xAC   <U00AC> NOT SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   246
<-->                   /xAD   <U00AD> SOFT HYPHEN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   247
<Rg>                   /xAE   <U00AE> REGISTERED SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   248
<YI>                   /xAF   <U0407> CYRILLIC CAPITAL LETTER YI (Ukrainian)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   249
<DG>                   /xB0   <U00B0> DEGREE SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   250
<+->                   /xB1   <U00B1> PLUS-MINUS SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   251
<II>                   /xB2   <U0406> CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   252
<ii>                   /xB3   <U0456> CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   253
<g3>                   /xB4   <U0491> CYRILLIC SMALL LETTER GHE WITH UPTURN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   254
<My>                   /xB5   <U00B5> MICRO SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   255
<PI>                   /xB6   <U00B6> PILCROW SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   256
<.M>                   /xB7   <U00B7> MIDDLE DOT
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   257
<io>                   /xB8   <U0451> CYRILLIC SMALL LETTER IO
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   258
<N0>                   /xB9   <U2116> NUMERO SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   259
<ie>                   /xBA   <U0454> CYRILLIC SMALL LETTER UKRAINIAN IE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   260
</>/>>                 /xBB   <U00BB> RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   261
<j%>                   /xBC   <U0458> CYRILLIC SMALL LETTER JE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   262
<DS>                   /xBD   <U0405> CYRILLIC CAPITAL LETTER DZE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   263
<ds>                   /xBE   <U0455> CYRILLIC SMALL LETTER DZE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   264
<yi>                   /xBF   <U0457> CYRILLIC SMALL LETTER YI (Ukrainian)
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   265
<A=>                   /xC0   <U0410> CYRILLIC CAPITAL LETTER A
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   266
<B=>                   /xC1   <U0411> CYRILLIC CAPITAL LETTER BE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   267
<V=>                   /xC2   <U0412> CYRILLIC CAPITAL LETTER VE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   268
<G=>                   /xC3   <U0413> CYRILLIC CAPITAL LETTER GHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   269
<D=>                   /xC4   <U0414> CYRILLIC CAPITAL LETTER DE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   270
<E=>                   /xC5   <U0415> CYRILLIC CAPITAL LETTER IE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   271
<Z%>                   /xC6   <U0416> CYRILLIC CAPITAL LETTER ZHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   272
<Z=>                   /xC7   <U0417> CYRILLIC CAPITAL LETTER ZE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   273
<I=>                   /xC8   <U0418> CYRILLIC CAPITAL LETTER I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   274
<J=>                   /xC9   <U0419> CYRILLIC CAPITAL LETTER SHORT I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   275
<K=>                   /xCA   <U041A> CYRILLIC CAPITAL LETTER KA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   276
<L=>                   /xCB   <U041B> CYRILLIC CAPITAL LETTER EL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   277
<M=>                   /xCC   <U041C> CYRILLIC CAPITAL LETTER EM
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   278
<N=>                   /xCD   <U041D> CYRILLIC CAPITAL LETTER EN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   279
<O=>                   /xCE   <U041E> CYRILLIC CAPITAL LETTER O
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   280
<P=>                   /xCF   <U041F> CYRILLIC CAPITAL LETTER PE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   281
<R=>                   /xD0   <U0420> CYRILLIC CAPITAL LETTER ER
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   282
<S=>                   /xD1   <U0421> CYRILLIC CAPITAL LETTER ES
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   283
<T=>                   /xD2   <U0422> CYRILLIC CAPITAL LETTER TE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   284
<U=>                   /xD3   <U0423> CYRILLIC CAPITAL LETTER U
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   285
<F=>                   /xD4   <U0424> CYRILLIC CAPITAL LETTER EF
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   286
<H=>                   /xD5   <U0425> CYRILLIC CAPITAL LETTER HA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   287
<C=>                   /xD6   <U0426> CYRILLIC CAPITAL LETTER TSE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   288
<C%>                   /xD7   <U0427> CYRILLIC CAPITAL LETTER CHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   289
<S%>                   /xD8   <U0428> CYRILLIC CAPITAL LETTER SHA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   290
<Sc>                   /xD9   <U0429> CYRILLIC CAPITAL LETTER SHCHA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   291
<='>                   /xDA   <U042A> CYRILLIC CAPITAL LETTER HARD SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   292
<Y=>                   /xDB   <U042B> CYRILLIC CAPITAL LETTER YERU
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   293
<%'>                   /xDC   <U042C> CYRILLIC CAPITAL LETTER SOFT SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   294
<JE>                   /xDD   <U042D> CYRILLIC CAPITAL LETTER E
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   295
<JU>                   /xDE   <U042E> CYRILLIC CAPITAL LETTER YU
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   296
<JA>                   /xDF   <U042F> CYRILLIC CAPITAL LETTER YA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   297
<a=>                   /xE0   <U0430> CYRILLIC SMALL LETTER A
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   298
<b=>                   /xE1   <U0431> CYRILLIC SMALL LETTER BE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   299
<v=>                   /xE2   <U0432> CYRILLIC SMALL LETTER VE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   300
<g=>                   /xE3   <U0433> CYRILLIC SMALL LETTER GHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   301
<d=>                   /xE4   <U0434> CYRILLIC SMALL LETTER DE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   302
<e=>                   /xE5   <U0435> CYRILLIC SMALL LETTER IE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   303
<z%>                   /xE6   <U0436> CYRILLIC SMALL LETTER ZHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   304
<z=>                   /xE7   <U0437> CYRILLIC SMALL LETTER ZE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   305
<i=>                   /xE8   <U0438> CYRILLIC SMALL LETTER I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   306
<j=>                   /xE9   <U0439> CYRILLIC SMALL LETTER SHORT I
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   307
<k=>                   /xEA   <U043A> CYRILLIC SMALL LETTER KA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   308
<l=>                   /xEB   <U043B> CYRILLIC SMALL LETTER EL
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   309
<m=>                   /xEC   <U043C> CYRILLIC SMALL LETTER EM
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   310
<n=>                   /xED   <U043D> CYRILLIC SMALL LETTER EN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   311
<o=>                   /xEE   <U043E> CYRILLIC SMALL LETTER O
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   312
<p=>                   /xEF   <U043F> CYRILLIC SMALL LETTER PE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   313
<r=>                   /xF0   <U0440> CYRILLIC SMALL LETTER ER
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   314
<s=>                   /xF1   <U0441> CYRILLIC SMALL LETTER ES
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   315
<t=>                   /xF2   <U0442> CYRILLIC SMALL LETTER TE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   316
<u=>                   /xF3   <U0443> CYRILLIC SMALL LETTER U
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   317
<f=>                   /xF4   <U0444> CYRILLIC SMALL LETTER EF
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   318
<h=>                   /xF5   <U0445> CYRILLIC SMALL LETTER HA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   319
<c=>                   /xF6   <U0446> CYRILLIC SMALL LETTER TSE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   320
<c%>                   /xF7   <U0447> CYRILLIC SMALL LETTER CHE
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   321
<s%>                   /xF8   <U0448> CYRILLIC SMALL LETTER SHA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   322
<sc>                   /xF9   <U0449> CYRILLIC SMALL LETTER SHCHA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   323
<='>                   /xFA   <U044A> CYRILLIC SMALL LETTER HARD SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   324
<y=>                   /xFB   <U044B> CYRILLIC SMALL LETTER YERU
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   325
<%'>                   /xFC   <U044C> CYRILLIC SMALL LETTER SOFT SIGN
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   326
<je>                   /xFD   <U044D> CYRILLIC SMALL LETTER E
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   327
<ju>                   /xFE   <U044E> CYRILLIC SMALL LETTER YU
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   328
<ja>                   /xFF   <U044F> CYRILLIC SMALL LETTER YA
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   329
END CHARMAP
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   330
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   331
"
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   332
! !
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   333
8813
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   334
!MS_Cyrillic methodsFor:'encoding & decoding'!
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   335
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   336
decode:codeArg
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   337
    "Automagically generated by generateCode - do not modify.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   338
     Decode from my encoding into unicode."
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   339
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   340
    |code "{ Class: SmallInteger }"|
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   341
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   342
    code := codeArg.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   343
    code <= 16r7F ifTrue:[ ^ code ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   344
    code > 16rFF ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   345
        ^ self decodingError.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   346
    ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   347
    [
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   348
        |t|
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   349
        t := #(
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   350
           "16r0080"    16r0402 " CYRILLIC CAPITAL LETTER DJE (Serbocroatian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   351
           "16r0081"    16r0403 " CYRILLIC CAPITAL LETTER GJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   352
           "16r0082"    16r201A " SINGLE LOW-9 QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   353
           "16r0083"    16r0453 " CYRILLIC SMALL LETTER GJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   354
           "16r0084"    16r201E " DOUBLE LOW-9 QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   355
           "16r0085"    16r2026 " HORIZONTAL ELLIPSIS " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   356
           "16r0086"    16r2020 " DAGGER " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   357
           "16r0087"    16r2021 " DOUBLE DAGGER " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   358
           "16r0088"    16r0000 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   359
           "16r0089"    16r2030 " PER MILLE SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   360
           "16r008A"    16r0409 " CYRILLIC CAPITAL LETTER LJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   361
           "16r008B"    16r2039 " SINGLE LEFT-POINTING ANGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   362
           "16r008C"    16r040A " CYRILLIC CAPITAL LETTER NJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   363
           "16r008D"    16r040C " CYRILLIC CAPITAL LETTER KJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   364
           "16r008E"    16r040B " CYRILLIC CAPITAL LETTER TSHE (Serbocroatian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   365
           "16r008F"    16r040F " CYRILLIC CAPITAL LETTER DZHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   366
           "16r0090"    16r0452 " CYRILLIC SMALL LETTER DJE (Serbocroatian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   367
           "16r0091"    16r2018 " LEFT SINGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   368
           "16r0092"    16r2019 " RIGHT SINGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   369
           "16r0093"    16r201C " LEFT DOUBLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   370
           "16r0094"    16r201D " RIGHT DOUBLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   371
           "16r0095"    16r2022 " BULLET " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   372
           "16r0096"    16r2013 " EN DASH " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   373
           "16r0097"    16r2014 " EM DASH " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   374
           "16r0098"    16r0000 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   375
           "16r0099"    16r2122 " TRADE MARK SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   376
           "16r009A"    16r0459 " CYRILLIC SMALL LETTER LJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   377
           "16r009B"    16r203A " SINGLE RIGHT-POINTING ANGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   378
           "16r009C"    16r045A " CYRILLIC SMALL LETTER NJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   379
           "16r009D"    16r045C " CYRILLIC SMALL LETTER KJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   380
           "16r009E"    16r045B " CYRILLIC SMALL LETTER TSHE (Serbocroatian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   381
           "16r009F"    16r045F " CYRILLIC SMALL LETTER DZHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   382
           "16r00A0"    16r00A0 " NO-BREAK SPACE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   383
           "16r00A1"    16r040E " CYRILLIC CAPITAL LETTER SHORT U (Byelorussian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   384
           "16r00A2"    16r045E " CYRILLIC SMALL LETTER SHORT U (Byelorussian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   385
           "16r00A3"    16r0408 " CYRILLIC CAPITAL LETTER JE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   386
           "16r00A4"    16r00A4 " CURRENCY SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   387
           "16r00A5"    16r0490 " CYRILLIC CAPITAL LETTER GHE WITH UPTURN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   388
           "16r00A6"    16r00A6 " BROKEN BAR " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   389
           "16r00A7"    16r00A7 " SECTION SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   390
           "16r00A8"    16r0401 " CYRILLIC CAPITAL LETTER IO " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   391
           "16r00A9"    16r00A9 " COPYRIGHT SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   392
           "16r00AA"    16r0404 " CYRILLIC CAPITAL LETTER UKRAINIAN IE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   393
           "16r00AB"    16r00AB " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   394
           "16r00AC"    16r00AC " NOT SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   395
           "16r00AD"    16r00AD " SOFT HYPHEN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   396
           "16r00AE"    16r00AE " REGISTERED SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   397
           "16r00AF"    16r0407 " CYRILLIC CAPITAL LETTER YI (Ukrainian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   398
           "16r00B0"    16r00B0 " DEGREE SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   399
           "16r00B1"    16r00B1 " PLUS-MINUS SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   400
           "16r00B2"    16r0406 " CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   401
           "16r00B3"    16r0456 " CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   402
           "16r00B4"    16r0491 " CYRILLIC SMALL LETTER GHE WITH UPTURN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   403
           "16r00B5"    16r00B5 " MICRO SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   404
           "16r00B6"    16r00B6 " PILCROW SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   405
           "16r00B7"    16r00B7 " MIDDLE DOT " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   406
           "16r00B8"    16r0451 " CYRILLIC SMALL LETTER IO " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   407
           "16r00B9"    16r2116 " NUMERO SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   408
           "16r00BA"    16r0454 " CYRILLIC SMALL LETTER UKRAINIAN IE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   409
           "16r00BB"    16r00BB " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   410
           "16r00BC"    16r0458 " CYRILLIC SMALL LETTER JE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   411
           "16r00BD"    16r0405 " CYRILLIC CAPITAL LETTER DZE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   412
           "16r00BE"    16r0455 " CYRILLIC SMALL LETTER DZE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   413
           "16r00BF"    16r0457 " CYRILLIC SMALL LETTER YI (Ukrainian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   414
           "16r00C0"    16r0410 " CYRILLIC CAPITAL LETTER A " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   415
           "16r00C1"    16r0411 " CYRILLIC CAPITAL LETTER BE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   416
           "16r00C2"    16r0412 " CYRILLIC CAPITAL LETTER VE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   417
           "16r00C3"    16r0413 " CYRILLIC CAPITAL LETTER GHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   418
           "16r00C4"    16r0414 " CYRILLIC CAPITAL LETTER DE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   419
           "16r00C5"    16r0415 " CYRILLIC CAPITAL LETTER IE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   420
           "16r00C6"    16r0416 " CYRILLIC CAPITAL LETTER ZHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   421
           "16r00C7"    16r0417 " CYRILLIC CAPITAL LETTER ZE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   422
           "16r00C8"    16r0418 " CYRILLIC CAPITAL LETTER I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   423
           "16r00C9"    16r0419 " CYRILLIC CAPITAL LETTER SHORT I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   424
           "16r00CA"    16r041A " CYRILLIC CAPITAL LETTER KA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   425
           "16r00CB"    16r041B " CYRILLIC CAPITAL LETTER EL " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   426
           "16r00CC"    16r041C " CYRILLIC CAPITAL LETTER EM " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   427
           "16r00CD"    16r041D " CYRILLIC CAPITAL LETTER EN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   428
           "16r00CE"    16r041E " CYRILLIC CAPITAL LETTER O " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   429
           "16r00CF"    16r041F " CYRILLIC CAPITAL LETTER PE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   430
           "16r00D0"    16r0420 " CYRILLIC CAPITAL LETTER ER " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   431
           "16r00D1"    16r0421 " CYRILLIC CAPITAL LETTER ES " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   432
           "16r00D2"    16r0422 " CYRILLIC CAPITAL LETTER TE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   433
           "16r00D3"    16r0423 " CYRILLIC CAPITAL LETTER U " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   434
           "16r00D4"    16r0424 " CYRILLIC CAPITAL LETTER EF " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   435
           "16r00D5"    16r0425 " CYRILLIC CAPITAL LETTER HA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   436
           "16r00D6"    16r0426 " CYRILLIC CAPITAL LETTER TSE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   437
           "16r00D7"    16r0427 " CYRILLIC CAPITAL LETTER CHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   438
           "16r00D8"    16r0428 " CYRILLIC CAPITAL LETTER SHA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   439
           "16r00D9"    16r0429 " CYRILLIC CAPITAL LETTER SHCHA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   440
           "16r00DA"    16r042A " CYRILLIC CAPITAL LETTER HARD SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   441
           "16r00DB"    16r042B " CYRILLIC CAPITAL LETTER YERU " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   442
           "16r00DC"    16r042C " CYRILLIC CAPITAL LETTER SOFT SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   443
           "16r00DD"    16r042D " CYRILLIC CAPITAL LETTER E " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   444
           "16r00DE"    16r042E " CYRILLIC CAPITAL LETTER YU " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   445
           "16r00DF"    16r042F " CYRILLIC CAPITAL LETTER YA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   446
           "16r00E0"    16r0430 " CYRILLIC SMALL LETTER A " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   447
           "16r00E1"    16r0431 " CYRILLIC SMALL LETTER BE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   448
           "16r00E2"    16r0432 " CYRILLIC SMALL LETTER VE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   449
           "16r00E3"    16r0433 " CYRILLIC SMALL LETTER GHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   450
           "16r00E4"    16r0434 " CYRILLIC SMALL LETTER DE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   451
           "16r00E5"    16r0435 " CYRILLIC SMALL LETTER IE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   452
           "16r00E6"    16r0436 " CYRILLIC SMALL LETTER ZHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   453
           "16r00E7"    16r0437 " CYRILLIC SMALL LETTER ZE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   454
           "16r00E8"    16r0438 " CYRILLIC SMALL LETTER I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   455
           "16r00E9"    16r0439 " CYRILLIC SMALL LETTER SHORT I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   456
           "16r00EA"    16r043A " CYRILLIC SMALL LETTER KA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   457
           "16r00EB"    16r043B " CYRILLIC SMALL LETTER EL " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   458
           "16r00EC"    16r043C " CYRILLIC SMALL LETTER EM " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   459
           "16r00ED"    16r043D " CYRILLIC SMALL LETTER EN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   460
           "16r00EE"    16r043E " CYRILLIC SMALL LETTER O " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   461
           "16r00EF"    16r043F " CYRILLIC SMALL LETTER PE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   462
           "16r00F0"    16r0440 " CYRILLIC SMALL LETTER ER " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   463
           "16r00F1"    16r0441 " CYRILLIC SMALL LETTER ES " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   464
           "16r00F2"    16r0442 " CYRILLIC SMALL LETTER TE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   465
           "16r00F3"    16r0443 " CYRILLIC SMALL LETTER U " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   466
           "16r00F4"    16r0444 " CYRILLIC SMALL LETTER EF " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   467
           "16r00F5"    16r0445 " CYRILLIC SMALL LETTER HA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   468
           "16r00F6"    16r0446 " CYRILLIC SMALL LETTER TSE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   469
           "16r00F7"    16r0447 " CYRILLIC SMALL LETTER CHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   470
           "16r00F8"    16r0448 " CYRILLIC SMALL LETTER SHA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   471
           "16r00F9"    16r0449 " CYRILLIC SMALL LETTER SHCHA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   472
           "16r00FA"    16r044A " CYRILLIC SMALL LETTER HARD SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   473
           "16r00FB"    16r044B " CYRILLIC SMALL LETTER YERU " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   474
           "16r00FC"    16r044C " CYRILLIC SMALL LETTER SOFT SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   475
           "16r00FD"    16r044D " CYRILLIC SMALL LETTER E " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   476
           "16r00FE"    16r044E " CYRILLIC SMALL LETTER YU " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   477
           "16r00FF"    16r044F " CYRILLIC SMALL LETTER YA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   478
           ) at:(code - 16r7F).
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   479
        t == 0 ifFalse:[^ t].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   480
        ^ self decodingError.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   481
    ] value.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   482
!
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   483
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   484
encode:unicodeArg
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   485
    "Automagically generated by generateCode - do not modify.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   486
     Encode from unicode into my encoding."
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   487
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   488
    |unicode "{ Class: SmallInteger }"|
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   489
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   490
    unicode := unicodeArg.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   491
    unicode <= 16r7F ifTrue:[ ^ unicode ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   492
    unicode > 16r2122 ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   493
        ^ self encodingError.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   494
    ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   495
    unicode <= 16r9F ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   496
        ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   497
    ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   498
    unicode <= 16r491 ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   499
        unicode <= 16rBB ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   500
            [
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   501
                |t|
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   502
                t := #[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   503
                   "16r00A0"    16rA0 " NO-BREAK SPACE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   504
                   "16r00A1"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   505
                   "16r00A2"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   506
                   "16r00A3"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   507
                   "16r00A4"    16rA4 " CURRENCY SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   508
                   "16r00A5"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   509
                   "16r00A6"    16rA6 " BROKEN BAR " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   510
                   "16r00A7"    16rA7 " SECTION SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   511
                   "16r00A8"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   512
                   "16r00A9"    16rA9 " COPYRIGHT SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   513
                   "16r00AA"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   514
                   "16r00AB"    16rAB " LEFT-POINTING DOUBLE ANGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   515
                   "16r00AC"    16rAC " NOT SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   516
                   "16r00AD"    16rAD " SOFT HYPHEN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   517
                   "16r00AE"    16rAE " REGISTERED SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   518
                   "16r00AF"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   519
                   "16r00B0"    16rB0 " DEGREE SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   520
                   "16r00B1"    16rB1 " PLUS-MINUS SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   521
                   "16r00B2"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   522
                   "16r00B3"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   523
                   "16r00B4"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   524
                   "16r00B5"    16rB5 " MICRO SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   525
                   "16r00B6"    16rB6 " PILCROW SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   526
                   "16r00B7"    16rB7 " MIDDLE DOT " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   527
                   "16r00B8"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   528
                   "16r00B9"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   529
                   "16r00BA"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   530
                   "16r00BB"    16rBB " RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   531
                   ] at:(unicode - 16r9F).
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   532
                t == 0 ifFalse:[^ t].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   533
                ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   534
            ] value.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   535
        ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   536
        unicode <= 16r400 ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   537
            ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   538
        ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   539
        unicode <= 16r45F ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   540
            [
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   541
                |t|
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   542
                t := #[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   543
                   "16r0401"    16rA8 " CYRILLIC CAPITAL LETTER IO " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   544
                   "16r0402"    16r80 " CYRILLIC CAPITAL LETTER DJE (Serbocroatian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   545
                   "16r0403"    16r81 " CYRILLIC CAPITAL LETTER GJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   546
                   "16r0404"    16rAA " CYRILLIC CAPITAL LETTER UKRAINIAN IE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   547
                   "16r0405"    16rBD " CYRILLIC CAPITAL LETTER DZE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   548
                   "16r0406"    16rB2 " CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   549
                   "16r0407"    16rAF " CYRILLIC CAPITAL LETTER YI (Ukrainian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   550
                   "16r0408"    16rA3 " CYRILLIC CAPITAL LETTER JE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   551
                   "16r0409"    16r8A " CYRILLIC CAPITAL LETTER LJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   552
                   "16r040A"    16r8C " CYRILLIC CAPITAL LETTER NJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   553
                   "16r040B"    16r8E " CYRILLIC CAPITAL LETTER TSHE (Serbocroatian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   554
                   "16r040C"    16r8D " CYRILLIC CAPITAL LETTER KJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   555
                   "16r040D"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   556
                   "16r040E"    16rA1 " CYRILLIC CAPITAL LETTER SHORT U (Byelorussian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   557
                   "16r040F"    16r8F " CYRILLIC CAPITAL LETTER DZHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   558
                   "16r0410"    16rC0 " CYRILLIC CAPITAL LETTER A " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   559
                   "16r0411"    16rC1 " CYRILLIC CAPITAL LETTER BE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   560
                   "16r0412"    16rC2 " CYRILLIC CAPITAL LETTER VE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   561
                   "16r0413"    16rC3 " CYRILLIC CAPITAL LETTER GHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   562
                   "16r0414"    16rC4 " CYRILLIC CAPITAL LETTER DE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   563
                   "16r0415"    16rC5 " CYRILLIC CAPITAL LETTER IE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   564
                   "16r0416"    16rC6 " CYRILLIC CAPITAL LETTER ZHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   565
                   "16r0417"    16rC7 " CYRILLIC CAPITAL LETTER ZE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   566
                   "16r0418"    16rC8 " CYRILLIC CAPITAL LETTER I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   567
                   "16r0419"    16rC9 " CYRILLIC CAPITAL LETTER SHORT I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   568
                   "16r041A"    16rCA " CYRILLIC CAPITAL LETTER KA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   569
                   "16r041B"    16rCB " CYRILLIC CAPITAL LETTER EL " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   570
                   "16r041C"    16rCC " CYRILLIC CAPITAL LETTER EM " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   571
                   "16r041D"    16rCD " CYRILLIC CAPITAL LETTER EN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   572
                   "16r041E"    16rCE " CYRILLIC CAPITAL LETTER O " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   573
                   "16r041F"    16rCF " CYRILLIC CAPITAL LETTER PE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   574
                   "16r0420"    16rD0 " CYRILLIC CAPITAL LETTER ER " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   575
                   "16r0421"    16rD1 " CYRILLIC CAPITAL LETTER ES " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   576
                   "16r0422"    16rD2 " CYRILLIC CAPITAL LETTER TE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   577
                   "16r0423"    16rD3 " CYRILLIC CAPITAL LETTER U " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   578
                   "16r0424"    16rD4 " CYRILLIC CAPITAL LETTER EF " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   579
                   "16r0425"    16rD5 " CYRILLIC CAPITAL LETTER HA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   580
                   "16r0426"    16rD6 " CYRILLIC CAPITAL LETTER TSE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   581
                   "16r0427"    16rD7 " CYRILLIC CAPITAL LETTER CHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   582
                   "16r0428"    16rD8 " CYRILLIC CAPITAL LETTER SHA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   583
                   "16r0429"    16rD9 " CYRILLIC CAPITAL LETTER SHCHA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   584
                   "16r042A"    16rDA " CYRILLIC CAPITAL LETTER HARD SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   585
                   "16r042B"    16rDB " CYRILLIC CAPITAL LETTER YERU " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   586
                   "16r042C"    16rDC " CYRILLIC CAPITAL LETTER SOFT SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   587
                   "16r042D"    16rDD " CYRILLIC CAPITAL LETTER E " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   588
                   "16r042E"    16rDE " CYRILLIC CAPITAL LETTER YU " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   589
                   "16r042F"    16rDF " CYRILLIC CAPITAL LETTER YA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   590
                   "16r0430"    16rE0 " CYRILLIC SMALL LETTER A " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   591
                   "16r0431"    16rE1 " CYRILLIC SMALL LETTER BE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   592
                   "16r0432"    16rE2 " CYRILLIC SMALL LETTER VE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   593
                   "16r0433"    16rE3 " CYRILLIC SMALL LETTER GHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   594
                   "16r0434"    16rE4 " CYRILLIC SMALL LETTER DE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   595
                   "16r0435"    16rE5 " CYRILLIC SMALL LETTER IE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   596
                   "16r0436"    16rE6 " CYRILLIC SMALL LETTER ZHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   597
                   "16r0437"    16rE7 " CYRILLIC SMALL LETTER ZE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   598
                   "16r0438"    16rE8 " CYRILLIC SMALL LETTER I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   599
                   "16r0439"    16rE9 " CYRILLIC SMALL LETTER SHORT I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   600
                   "16r043A"    16rEA " CYRILLIC SMALL LETTER KA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   601
                   "16r043B"    16rEB " CYRILLIC SMALL LETTER EL " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   602
                   "16r043C"    16rEC " CYRILLIC SMALL LETTER EM " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   603
                   "16r043D"    16rED " CYRILLIC SMALL LETTER EN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   604
                   "16r043E"    16rEE " CYRILLIC SMALL LETTER O " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   605
                   "16r043F"    16rEF " CYRILLIC SMALL LETTER PE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   606
                   "16r0440"    16rF0 " CYRILLIC SMALL LETTER ER " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   607
                   "16r0441"    16rF1 " CYRILLIC SMALL LETTER ES " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   608
                   "16r0442"    16rF2 " CYRILLIC SMALL LETTER TE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   609
                   "16r0443"    16rF3 " CYRILLIC SMALL LETTER U " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   610
                   "16r0444"    16rF4 " CYRILLIC SMALL LETTER EF " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   611
                   "16r0445"    16rF5 " CYRILLIC SMALL LETTER HA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   612
                   "16r0446"    16rF6 " CYRILLIC SMALL LETTER TSE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   613
                   "16r0447"    16rF7 " CYRILLIC SMALL LETTER CHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   614
                   "16r0448"    16rF8 " CYRILLIC SMALL LETTER SHA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   615
                   "16r0449"    16rF9 " CYRILLIC SMALL LETTER SHCHA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   616
                   "16r044A"    16rFA " CYRILLIC SMALL LETTER HARD SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   617
                   "16r044B"    16rFB " CYRILLIC SMALL LETTER YERU " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   618
                   "16r044C"    16rFC " CYRILLIC SMALL LETTER SOFT SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   619
                   "16r044D"    16rFD " CYRILLIC SMALL LETTER E " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   620
                   "16r044E"    16rFE " CYRILLIC SMALL LETTER YU " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   621
                   "16r044F"    16rFF " CYRILLIC SMALL LETTER YA " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   622
                   "16r0450"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   623
                   "16r0451"    16rB8 " CYRILLIC SMALL LETTER IO " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   624
                   "16r0452"    16r90 " CYRILLIC SMALL LETTER DJE (Serbocroatian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   625
                   "16r0453"    16r83 " CYRILLIC SMALL LETTER GJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   626
                   "16r0454"    16rBA " CYRILLIC SMALL LETTER UKRAINIAN IE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   627
                   "16r0455"    16rBE " CYRILLIC SMALL LETTER DZE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   628
                   "16r0456"    16rB3 " CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   629
                   "16r0457"    16rBF " CYRILLIC SMALL LETTER YI (Ukrainian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   630
                   "16r0458"    16rBC " CYRILLIC SMALL LETTER JE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   631
                   "16r0459"    16r9A " CYRILLIC SMALL LETTER LJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   632
                   "16r045A"    16r9C " CYRILLIC SMALL LETTER NJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   633
                   "16r045B"    16r9E " CYRILLIC SMALL LETTER TSHE (Serbocroatian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   634
                   "16r045C"    16r9D " CYRILLIC SMALL LETTER KJE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   635
                   "16r045D"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   636
                   "16r045E"    16rA2 " CYRILLIC SMALL LETTER SHORT U (Byelorussian) " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   637
                   "16r045F"    16r9F " CYRILLIC SMALL LETTER DZHE " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   638
                   ] at:(unicode - 16r400).
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   639
                t == 0 ifFalse:[^ t].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   640
                ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   641
            ] value.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   642
        ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   643
        unicode <= 16r48F ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   644
            ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   645
        ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   646
        ^ #[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   647
           "16r0490"    16rA5 " CYRILLIC CAPITAL LETTER GHE WITH UPTURN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   648
           "16r0491"    16rB4 " CYRILLIC SMALL LETTER GHE WITH UPTURN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   649
           ] at:(unicode - 16r48F).
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   650
    ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   651
    unicode <= 16r2012 ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   652
        ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   653
    ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   654
    unicode <= 16r203A ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   655
        [
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   656
            |t|
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   657
            t := #[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   658
               "16r2013"    16r96 " EN DASH " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   659
               "16r2014"    16r97 " EM DASH " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   660
               "16r2015"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   661
               "16r2016"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   662
               "16r2017"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   663
               "16r2018"    16r91 " LEFT SINGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   664
               "16r2019"    16r92 " RIGHT SINGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   665
               "16r201A"    16r82 " SINGLE LOW-9 QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   666
               "16r201B"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   667
               "16r201C"    16r93 " LEFT DOUBLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   668
               "16r201D"    16r94 " RIGHT DOUBLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   669
               "16r201E"    16r84 " DOUBLE LOW-9 QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   670
               "16r201F"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   671
               "16r2020"    16r86 " DAGGER " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   672
               "16r2021"    16r87 " DOUBLE DAGGER " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   673
               "16r2022"    16r95 " BULLET " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   674
               "16r2023"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   675
               "16r2024"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   676
               "16r2025"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   677
               "16r2026"    16r85 " HORIZONTAL ELLIPSIS " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   678
               "16r2027"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   679
               "16r2028"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   680
               "16r2029"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   681
               "16r202A"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   682
               "16r202B"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   683
               "16r202C"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   684
               "16r202D"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   685
               "16r202E"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   686
               "16r202F"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   687
               "16r2030"    16r89 " PER MILLE SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   688
               "16r2031"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   689
               "16r2032"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   690
               "16r2033"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   691
               "16r2034"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   692
               "16r2035"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   693
               "16r2036"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   694
               "16r2037"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   695
               "16r2038"    16r00 " invalid " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   696
               "16r2039"    16r8B " SINGLE LEFT-POINTING ANGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   697
               "16r203A"    16r9B " SINGLE RIGHT-POINTING ANGLE QUOTATION MARK " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   698
               ] at:(unicode - 16r2012).
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   699
            t == 0 ifFalse:[^ t].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   700
            ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   701
        ] value.
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   702
    ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   703
    unicode <= 16r2115 ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   704
        ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   705
    ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   706
    unicode == 16r2116 ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   707
        (#[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   708
           "16r2116"    1 " NUMERO SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   709
        ] at:(unicode - 8469)) ~~ 0 ifTrue:[^ unicode].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   710
        ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   711
    ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   712
    unicode <= 16r2121 ifTrue:[
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   713
        ^ self encodingError
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   714
    ].
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   715
    ^  "16r2122" 16r0099 " TRADE MARK SIGN " 
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   716
! !
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   717
8081
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   718
!MS_Cyrillic class methodsFor:'documentation'!
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   719
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   720
version
8813
c2908c7fc648 documentation
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
   721
    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__MS_Cyrillic.st,v 1.4 2005-03-31 18:48:53 cg Exp $'
8081
b468050174a9 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   722
! !