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