CharacterEncoderImplementations__ISO8859_4.st
author Claus Gittinger <cg@exept.de>
Tue, 09 Jul 2019 20:55:17 +0200
changeset 24417 03b083548da2
parent 14189 21e4f4579606
child 18011 deb0c3355881
permissions -rw-r--r--
#REFACTORING by exept class: Smalltalk class changed: #recursiveInstallAutoloadedClassesFrom:rememberIn:maxLevels:noAutoload:packageTop:showSplashInLevels: Transcript showCR:(... bindWith:...) -> Transcript showCR:... with:...

"
 COPYRIGHT (c) 2004 by eXept Software AG
              All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
"{ Package: 'stx:libbasic' }"

"{ NameSpace: CharacterEncoderImplementations }"

SingleByteEncoder subclass:#ISO8859_4
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Collections-Text-Encodings'
!

!ISO8859_4 class methodsFor:'documentation'!

copyright
"
 COPYRIGHT (c) 2004 by eXept Software AG
              All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
!

documentation
"
    8859-4 (Latin 4) - Baltic / Northern European

    [see with:]
        CharacterEncoderImplementations::ISO8859_4 showCharacterSet

    [author:]
        Claus Gittinger
"
! !

!ISO8859_4 class methodsFor:'mapping'!

mapFileURL1_relativePathName
    ^ 'ISO8859/8859-4.TXT'
!

mapping
"
# From: http://www.unicode.org/Public/MAPPINGS/ISO8859/8859-4.TXT

#
#       Name:             ISO/IEC 8859-4:1998 to Unicode
#       Unicode version:  3.0
#       Table version:    1.0
#       Table format:     Format A
#       Date:             1999 July 27
#       Authors:          Ken Whistler <kenw@sybase.com>
#
#       Copyright (c) 1991-1999 Unicode, Inc.  All Rights reserved.
#
#       This file is provided as-is by Unicode, Inc. (The Unicode Consortium).
#       No claims are made as to fitness for any particular purpose.  No
#       warranties of any kind are expressed or implied.  The recipient
#       agrees to determine applicability of information provided.  If this
#       file has been provided on optical media by Unicode, Inc., the sole
#       remedy for any claim will be exchange of defective media within 90
#       days of receipt.
#
#       Unicode, Inc. hereby grants the right to freely use the information
#       supplied in this file in the creation of products supporting the
#       Unicode Standard, and to make copies of this file in any form for
#       internal or external distribution as long as this notice remains
#       attached.
#
#       General notes:
#
#       This table contains the data the Unicode Consortium has on how
#       ISO/IEC 8859-4:1998 characters map into Unicode.
#
#       Format:  Three tab-separated columns
#                Column #1 is the ISO/IEC 8859-4 code (in hex as 0xXX)
#                Column #2 is the Unicode (in hex as 0xXXXX)
#                Column #3 the Unicode name (follows a comment sign, '#')
#
#       The entries are in ISO/IEC 8859-4 order.
#
#       Version history
#       1.0 version updates 0.1 version by adding mappings for all
#       control characters.
#
#       Updated versions of this file may be found in:
#               <ftp://ftp.unicode.org/Public/MAPPINGS/>
#
#       Any comments or problems, contact <errata@unicode.org>
#       Please note that <errata@unicode.org> is an archival address;
#       notices will be checked, but do not expect an immediate response.
#
0x00    0x0000  #       NULL
0x01    0x0001  #       START OF HEADING
0x02    0x0002  #       START OF TEXT
0x03    0x0003  #       END OF TEXT
0x04    0x0004  #       END OF TRANSMISSION
0x05    0x0005  #       ENQUIRY
0x06    0x0006  #       ACKNOWLEDGE
0x07    0x0007  #       BELL
0x08    0x0008  #       BACKSPACE
0x09    0x0009  #       HORIZONTAL TABULATION
0x0A    0x000A  #       LINE FEED
0x0B    0x000B  #       VERTICAL TABULATION
0x0C    0x000C  #       FORM FEED
0x0D    0x000D  #       CARRIAGE RETURN
0x0E    0x000E  #       SHIFT OUT
0x0F    0x000F  #       SHIFT IN
0x10    0x0010  #       DATA LINK ESCAPE
0x11    0x0011  #       DEVICE CONTROL ONE
0x12    0x0012  #       DEVICE CONTROL TWO
0x13    0x0013  #       DEVICE CONTROL THREE
0x14    0x0014  #       DEVICE CONTROL FOUR
0x15    0x0015  #       NEGATIVE ACKNOWLEDGE
0x16    0x0016  #       SYNCHRONOUS IDLE
0x17    0x0017  #       END OF TRANSMISSION BLOCK
0x18    0x0018  #       CANCEL
0x19    0x0019  #       END OF MEDIUM
0x1A    0x001A  #       SUBSTITUTE
0x1B    0x001B  #       ESCAPE
0x1C    0x001C  #       FILE SEPARATOR
0x1D    0x001D  #       GROUP SEPARATOR
0x1E    0x001E  #       RECORD SEPARATOR
0x1F    0x001F  #       UNIT SEPARATOR
0x20    0x0020  #       SPACE
0x21    0x0021  #       EXCLAMATION MARK
0x22    0x0022  #       QUOTATION MARK
0x23    0x0023  #       NUMBER SIGN
0x24    0x0024  #       DOLLAR SIGN
0x25    0x0025  #       PERCENT SIGN
0x26    0x0026  #       AMPERSAND
0x27    0x0027  #       APOSTROPHE
0x28    0x0028  #       LEFT PARENTHESIS
0x29    0x0029  #       RIGHT PARENTHESIS
0x2A    0x002A  #       ASTERISK
0x2B    0x002B  #       PLUS SIGN
0x2C    0x002C  #       COMMA
0x2D    0x002D  #       HYPHEN-MINUS
0x2E    0x002E  #       FULL STOP
0x2F    0x002F  #       SOLIDUS
0x30    0x0030  #       DIGIT ZERO
0x31    0x0031  #       DIGIT ONE
0x32    0x0032  #       DIGIT TWO
0x33    0x0033  #       DIGIT THREE
0x34    0x0034  #       DIGIT FOUR
0x35    0x0035  #       DIGIT FIVE
0x36    0x0036  #       DIGIT SIX
0x37    0x0037  #       DIGIT SEVEN
0x38    0x0038  #       DIGIT EIGHT
0x39    0x0039  #       DIGIT NINE
0x3A    0x003A  #       COLON
0x3B    0x003B  #       SEMICOLON
0x3C    0x003C  #       LESS-THAN SIGN
0x3D    0x003D  #       EQUALS SIGN
0x3E    0x003E  #       GREATER-THAN SIGN
0x3F    0x003F  #       QUESTION MARK
0x40    0x0040  #       COMMERCIAL AT
0x41    0x0041  #       LATIN CAPITAL LETTER A
0x42    0x0042  #       LATIN CAPITAL LETTER B
0x43    0x0043  #       LATIN CAPITAL LETTER C
0x44    0x0044  #       LATIN CAPITAL LETTER D
0x45    0x0045  #       LATIN CAPITAL LETTER E
0x46    0x0046  #       LATIN CAPITAL LETTER F
0x47    0x0047  #       LATIN CAPITAL LETTER G
0x48    0x0048  #       LATIN CAPITAL LETTER H
0x49    0x0049  #       LATIN CAPITAL LETTER I
0x4A    0x004A  #       LATIN CAPITAL LETTER J
0x4B    0x004B  #       LATIN CAPITAL LETTER K
0x4C    0x004C  #       LATIN CAPITAL LETTER L
0x4D    0x004D  #       LATIN CAPITAL LETTER M
0x4E    0x004E  #       LATIN CAPITAL LETTER N
0x4F    0x004F  #       LATIN CAPITAL LETTER O
0x50    0x0050  #       LATIN CAPITAL LETTER P
0x51    0x0051  #       LATIN CAPITAL LETTER Q
0x52    0x0052  #       LATIN CAPITAL LETTER R
0x53    0x0053  #       LATIN CAPITAL LETTER S
0x54    0x0054  #       LATIN CAPITAL LETTER T
0x55    0x0055  #       LATIN CAPITAL LETTER U
0x56    0x0056  #       LATIN CAPITAL LETTER V
0x57    0x0057  #       LATIN CAPITAL LETTER W
0x58    0x0058  #       LATIN CAPITAL LETTER X
0x59    0x0059  #       LATIN CAPITAL LETTER Y
0x5A    0x005A  #       LATIN CAPITAL LETTER Z
0x5B    0x005B  #       LEFT SQUARE BRACKET
0x5C    0x005C  #       REVERSE SOLIDUS
0x5D    0x005D  #       RIGHT SQUARE BRACKET
0x5E    0x005E  #       CIRCUMFLEX ACCENT
0x5F    0x005F  #       LOW LINE
0x60    0x0060  #       GRAVE ACCENT
0x61    0x0061  #       LATIN SMALL LETTER A
0x62    0x0062  #       LATIN SMALL LETTER B
0x63    0x0063  #       LATIN SMALL LETTER C
0x64    0x0064  #       LATIN SMALL LETTER D
0x65    0x0065  #       LATIN SMALL LETTER E
0x66    0x0066  #       LATIN SMALL LETTER F
0x67    0x0067  #       LATIN SMALL LETTER G
0x68    0x0068  #       LATIN SMALL LETTER H
0x69    0x0069  #       LATIN SMALL LETTER I
0x6A    0x006A  #       LATIN SMALL LETTER J
0x6B    0x006B  #       LATIN SMALL LETTER K
0x6C    0x006C  #       LATIN SMALL LETTER L
0x6D    0x006D  #       LATIN SMALL LETTER M
0x6E    0x006E  #       LATIN SMALL LETTER N
0x6F    0x006F  #       LATIN SMALL LETTER O
0x70    0x0070  #       LATIN SMALL LETTER P
0x71    0x0071  #       LATIN SMALL LETTER Q
0x72    0x0072  #       LATIN SMALL LETTER R
0x73    0x0073  #       LATIN SMALL LETTER S
0x74    0x0074  #       LATIN SMALL LETTER T
0x75    0x0075  #       LATIN SMALL LETTER U
0x76    0x0076  #       LATIN SMALL LETTER V
0x77    0x0077  #       LATIN SMALL LETTER W
0x78    0x0078  #       LATIN SMALL LETTER X
0x79    0x0079  #       LATIN SMALL LETTER Y
0x7A    0x007A  #       LATIN SMALL LETTER Z
0x7B    0x007B  #       LEFT CURLY BRACKET
0x7C    0x007C  #       VERTICAL LINE
0x7D    0x007D  #       RIGHT CURLY BRACKET
0x7E    0x007E  #       TILDE
0x7F    0x007F  #       DELETE
0x80    0x0080  #       <control>
0x81    0x0081  #       <control>
0x82    0x0082  #       <control>
0x83    0x0083  #       <control>
0x84    0x0084  #       <control>
0x85    0x0085  #       <control>
0x86    0x0086  #       <control>
0x87    0x0087  #       <control>
0x88    0x0088  #       <control>
0x89    0x0089  #       <control>
0x8A    0x008A  #       <control>
0x8B    0x008B  #       <control>
0x8C    0x008C  #       <control>
0x8D    0x008D  #       <control>
0x8E    0x008E  #       <control>
0x8F    0x008F  #       <control>
0x90    0x0090  #       <control>
0x91    0x0091  #       <control>
0x92    0x0092  #       <control>
0x93    0x0093  #       <control>
0x94    0x0094  #       <control>
0x95    0x0095  #       <control>
0x96    0x0096  #       <control>
0x97    0x0097  #       <control>
0x98    0x0098  #       <control>
0x99    0x0099  #       <control>
0x9A    0x009A  #       <control>
0x9B    0x009B  #       <control>
0x9C    0x009C  #       <control>
0x9D    0x009D  #       <control>
0x9E    0x009E  #       <control>
0x9F    0x009F  #       <control>
0xA0    0x00A0  #       NO-BREAK SPACE
0xA1    0x0104  #       LATIN CAPITAL LETTER A WITH OGONEK
0xA2    0x0138  #       LATIN SMALL LETTER KRA
0xA3    0x0156  #       LATIN CAPITAL LETTER R WITH CEDILLA
0xA4    0x00A4  #       CURRENCY SIGN
0xA5    0x0128  #       LATIN CAPITAL LETTER I WITH TILDE
0xA6    0x013B  #       LATIN CAPITAL LETTER L WITH CEDILLA
0xA7    0x00A7  #       SECTION SIGN
0xA8    0x00A8  #       DIAERESIS
0xA9    0x0160  #       LATIN CAPITAL LETTER S WITH CARON
0xAA    0x0112  #       LATIN CAPITAL LETTER E WITH MACRON
0xAB    0x0122  #       LATIN CAPITAL LETTER G WITH CEDILLA
0xAC    0x0166  #       LATIN CAPITAL LETTER T WITH STROKE
0xAD    0x00AD  #       SOFT HYPHEN
0xAE    0x017D  #       LATIN CAPITAL LETTER Z WITH CARON
0xAF    0x00AF  #       MACRON
0xB0    0x00B0  #       DEGREE SIGN
0xB1    0x0105  #       LATIN SMALL LETTER A WITH OGONEK
0xB2    0x02DB  #       OGONEK
0xB3    0x0157  #       LATIN SMALL LETTER R WITH CEDILLA
0xB4    0x00B4  #       ACUTE ACCENT
0xB5    0x0129  #       LATIN SMALL LETTER I WITH TILDE
0xB6    0x013C  #       LATIN SMALL LETTER L WITH CEDILLA
0xB7    0x02C7  #       CARON
0xB8    0x00B8  #       CEDILLA
0xB9    0x0161  #       LATIN SMALL LETTER S WITH CARON
0xBA    0x0113  #       LATIN SMALL LETTER E WITH MACRON
0xBB    0x0123  #       LATIN SMALL LETTER G WITH CEDILLA
0xBC    0x0167  #       LATIN SMALL LETTER T WITH STROKE
0xBD    0x014A  #       LATIN CAPITAL LETTER ENG
0xBE    0x017E  #       LATIN SMALL LETTER Z WITH CARON
0xBF    0x014B  #       LATIN SMALL LETTER ENG
0xC0    0x0100  #       LATIN CAPITAL LETTER A WITH MACRON
0xC1    0x00C1  #       LATIN CAPITAL LETTER A WITH ACUTE
0xC2    0x00C2  #       LATIN CAPITAL LETTER A WITH CIRCUMFLEX
0xC3    0x00C3  #       LATIN CAPITAL LETTER A WITH TILDE
0xC4    0x00C4  #       LATIN CAPITAL LETTER A WITH DIAERESIS
0xC5    0x00C5  #       LATIN CAPITAL LETTER A WITH RING ABOVE
0xC6    0x00C6  #       LATIN CAPITAL LETTER AE
0xC7    0x012E  #       LATIN CAPITAL LETTER I WITH OGONEK
0xC8    0x010C  #       LATIN CAPITAL LETTER C WITH CARON
0xC9    0x00C9  #       LATIN CAPITAL LETTER E WITH ACUTE
0xCA    0x0118  #       LATIN CAPITAL LETTER E WITH OGONEK
0xCB    0x00CB  #       LATIN CAPITAL LETTER E WITH DIAERESIS
0xCC    0x0116  #       LATIN CAPITAL LETTER E WITH DOT ABOVE
0xCD    0x00CD  #       LATIN CAPITAL LETTER I WITH ACUTE
0xCE    0x00CE  #       LATIN CAPITAL LETTER I WITH CIRCUMFLEX
0xCF    0x012A  #       LATIN CAPITAL LETTER I WITH MACRON
0xD0    0x0110  #       LATIN CAPITAL LETTER D WITH STROKE
0xD1    0x0145  #       LATIN CAPITAL LETTER N WITH CEDILLA
0xD2    0x014C  #       LATIN CAPITAL LETTER O WITH MACRON
0xD3    0x0136  #       LATIN CAPITAL LETTER K WITH CEDILLA
0xD4    0x00D4  #       LATIN CAPITAL LETTER O WITH CIRCUMFLEX
0xD5    0x00D5  #       LATIN CAPITAL LETTER O WITH TILDE
0xD6    0x00D6  #       LATIN CAPITAL LETTER O WITH DIAERESIS
0xD7    0x00D7  #       MULTIPLICATION SIGN
0xD8    0x00D8  #       LATIN CAPITAL LETTER O WITH STROKE
0xD9    0x0172  #       LATIN CAPITAL LETTER U WITH OGONEK
0xDA    0x00DA  #       LATIN CAPITAL LETTER U WITH ACUTE
0xDB    0x00DB  #       LATIN CAPITAL LETTER U WITH CIRCUMFLEX
0xDC    0x00DC  #       LATIN CAPITAL LETTER U WITH DIAERESIS
0xDD    0x0168  #       LATIN CAPITAL LETTER U WITH TILDE
0xDE    0x016A  #       LATIN CAPITAL LETTER U WITH MACRON
0xDF    0x00DF  #       LATIN SMALL LETTER SHARP S
0xE0    0x0101  #       LATIN SMALL LETTER A WITH MACRON
0xE1    0x00E1  #       LATIN SMALL LETTER A WITH ACUTE
0xE2    0x00E2  #       LATIN SMALL LETTER A WITH CIRCUMFLEX
0xE3    0x00E3  #       LATIN SMALL LETTER A WITH TILDE
0xE4    0x00E4  #       LATIN SMALL LETTER A WITH DIAERESIS
0xE5    0x00E5  #       LATIN SMALL LETTER A WITH RING ABOVE
0xE6    0x00E6  #       LATIN SMALL LETTER AE
0xE7    0x012F  #       LATIN SMALL LETTER I WITH OGONEK
0xE8    0x010D  #       LATIN SMALL LETTER C WITH CARON
0xE9    0x00E9  #       LATIN SMALL LETTER E WITH ACUTE
0xEA    0x0119  #       LATIN SMALL LETTER E WITH OGONEK
0xEB    0x00EB  #       LATIN SMALL LETTER E WITH DIAERESIS
0xEC    0x0117  #       LATIN SMALL LETTER E WITH DOT ABOVE
0xED    0x00ED  #       LATIN SMALL LETTER I WITH ACUTE
0xEE    0x00EE  #       LATIN SMALL LETTER I WITH CIRCUMFLEX
0xEF    0x012B  #       LATIN SMALL LETTER I WITH MACRON
0xF0    0x0111  #       LATIN SMALL LETTER D WITH STROKE
0xF1    0x0146  #       LATIN SMALL LETTER N WITH CEDILLA
0xF2    0x014D  #       LATIN SMALL LETTER O WITH MACRON
0xF3    0x0137  #       LATIN SMALL LETTER K WITH CEDILLA
0xF4    0x00F4  #       LATIN SMALL LETTER O WITH CIRCUMFLEX
0xF5    0x00F5  #       LATIN SMALL LETTER O WITH TILDE
0xF6    0x00F6  #       LATIN SMALL LETTER O WITH DIAERESIS
0xF7    0x00F7  #       DIVISION SIGN
0xF8    0x00F8  #       LATIN SMALL LETTER O WITH STROKE
0xF9    0x0173  #       LATIN SMALL LETTER U WITH OGONEK
0xFA    0x00FA  #       LATIN SMALL LETTER U WITH ACUTE
0xFB    0x00FB  #       LATIN SMALL LETTER U WITH CIRCUMFLEX
0xFC    0x00FC  #       LATIN SMALL LETTER U WITH DIAERESIS
0xFD    0x0169  #       LATIN SMALL LETTER U WITH TILDE
0xFE    0x016B  #       LATIN SMALL LETTER U WITH MACRON
0xFF    0x02D9  #       DOT ABOVE

"
! !

!ISO8859_4 class methodsFor:'queries'!

userFriendlyNameOfEncoding
    ^ 'Baltic'
! !

!ISO8859_4 methodsFor:'encoding & decoding'!

decode:codeArg
    "Automagically generated by generateCode - do not modify.
     Decode from my encoding into unicode."

    |code "{ Class: SmallInteger }"|

    code := codeArg.
    code <= 16rA0 ifTrue:[ ^ code ].
    code > 16rFF ifTrue:[
	^ self decodingError.
    ].
    ^ #(
       "16r00A1"    16r0104 " LATIN CAPITAL LETTER A WITH OGONEK " 
       "16r00A2"    16r0138 " LATIN SMALL LETTER KRA " 
       "16r00A3"    16r0156 " LATIN CAPITAL LETTER R WITH CEDILLA " 
       "16r00A4"    16r00A4 " CURRENCY SIGN " 
       "16r00A5"    16r0128 " LATIN CAPITAL LETTER I WITH TILDE " 
       "16r00A6"    16r013B " LATIN CAPITAL LETTER L WITH CEDILLA " 
       "16r00A7"    16r00A7 " SECTION SIGN " 
       "16r00A8"    16r00A8 " DIAERESIS " 
       "16r00A9"    16r0160 " LATIN CAPITAL LETTER S WITH CARON " 
       "16r00AA"    16r0112 " LATIN CAPITAL LETTER E WITH MACRON " 
       "16r00AB"    16r0122 " LATIN CAPITAL LETTER G WITH CEDILLA " 
       "16r00AC"    16r0166 " LATIN CAPITAL LETTER T WITH STROKE " 
       "16r00AD"    16r00AD " SOFT HYPHEN " 
       "16r00AE"    16r017D " LATIN CAPITAL LETTER Z WITH CARON " 
       "16r00AF"    16r00AF " MACRON " 
       "16r00B0"    16r00B0 " DEGREE SIGN " 
       "16r00B1"    16r0105 " LATIN SMALL LETTER A WITH OGONEK " 
       "16r00B2"    16r02DB " OGONEK " 
       "16r00B3"    16r0157 " LATIN SMALL LETTER R WITH CEDILLA " 
       "16r00B4"    16r00B4 " ACUTE ACCENT " 
       "16r00B5"    16r0129 " LATIN SMALL LETTER I WITH TILDE " 
       "16r00B6"    16r013C " LATIN SMALL LETTER L WITH CEDILLA " 
       "16r00B7"    16r02C7 " CARON " 
       "16r00B8"    16r00B8 " CEDILLA " 
       "16r00B9"    16r0161 " LATIN SMALL LETTER S WITH CARON " 
       "16r00BA"    16r0113 " LATIN SMALL LETTER E WITH MACRON " 
       "16r00BB"    16r0123 " LATIN SMALL LETTER G WITH CEDILLA " 
       "16r00BC"    16r0167 " LATIN SMALL LETTER T WITH STROKE " 
       "16r00BD"    16r014A " LATIN CAPITAL LETTER ENG " 
       "16r00BE"    16r017E " LATIN SMALL LETTER Z WITH CARON " 
       "16r00BF"    16r014B " LATIN SMALL LETTER ENG " 
       "16r00C0"    16r0100 " LATIN CAPITAL LETTER A WITH MACRON " 
       "16r00C1"    16r00C1 " LATIN CAPITAL LETTER A WITH ACUTE " 
       "16r00C2"    16r00C2 " LATIN CAPITAL LETTER A WITH CIRCUMFLEX " 
       "16r00C3"    16r00C3 " LATIN CAPITAL LETTER A WITH TILDE " 
       "16r00C4"    16r00C4 " LATIN CAPITAL LETTER A WITH DIAERESIS " 
       "16r00C5"    16r00C5 " LATIN CAPITAL LETTER A WITH RING ABOVE " 
       "16r00C6"    16r00C6 " LATIN CAPITAL LETTER AE " 
       "16r00C7"    16r012E " LATIN CAPITAL LETTER I WITH OGONEK " 
       "16r00C8"    16r010C " LATIN CAPITAL LETTER C WITH CARON " 
       "16r00C9"    16r00C9 " LATIN CAPITAL LETTER E WITH ACUTE " 
       "16r00CA"    16r0118 " LATIN CAPITAL LETTER E WITH OGONEK " 
       "16r00CB"    16r00CB " LATIN CAPITAL LETTER E WITH DIAERESIS " 
       "16r00CC"    16r0116 " LATIN CAPITAL LETTER E WITH DOT ABOVE " 
       "16r00CD"    16r00CD " LATIN CAPITAL LETTER I WITH ACUTE " 
       "16r00CE"    16r00CE " LATIN CAPITAL LETTER I WITH CIRCUMFLEX " 
       "16r00CF"    16r012A " LATIN CAPITAL LETTER I WITH MACRON " 
       "16r00D0"    16r0110 " LATIN CAPITAL LETTER D WITH STROKE " 
       "16r00D1"    16r0145 " LATIN CAPITAL LETTER N WITH CEDILLA " 
       "16r00D2"    16r014C " LATIN CAPITAL LETTER O WITH MACRON " 
       "16r00D3"    16r0136 " LATIN CAPITAL LETTER K WITH CEDILLA " 
       "16r00D4"    16r00D4 " LATIN CAPITAL LETTER O WITH CIRCUMFLEX " 
       "16r00D5"    16r00D5 " LATIN CAPITAL LETTER O WITH TILDE " 
       "16r00D6"    16r00D6 " LATIN CAPITAL LETTER O WITH DIAERESIS " 
       "16r00D7"    16r00D7 " MULTIPLICATION SIGN " 
       "16r00D8"    16r00D8 " LATIN CAPITAL LETTER O WITH STROKE " 
       "16r00D9"    16r0172 " LATIN CAPITAL LETTER U WITH OGONEK " 
       "16r00DA"    16r00DA " LATIN CAPITAL LETTER U WITH ACUTE " 
       "16r00DB"    16r00DB " LATIN CAPITAL LETTER U WITH CIRCUMFLEX " 
       "16r00DC"    16r00DC " LATIN CAPITAL LETTER U WITH DIAERESIS " 
       "16r00DD"    16r0168 " LATIN CAPITAL LETTER U WITH TILDE " 
       "16r00DE"    16r016A " LATIN CAPITAL LETTER U WITH MACRON " 
       "16r00DF"    16r00DF " LATIN SMALL LETTER SHARP S " 
       "16r00E0"    16r0101 " LATIN SMALL LETTER A WITH MACRON " 
       "16r00E1"    16r00E1 " LATIN SMALL LETTER A WITH ACUTE " 
       "16r00E2"    16r00E2 " LATIN SMALL LETTER A WITH CIRCUMFLEX " 
       "16r00E3"    16r00E3 " LATIN SMALL LETTER A WITH TILDE " 
       "16r00E4"    16r00E4 " LATIN SMALL LETTER A WITH DIAERESIS " 
       "16r00E5"    16r00E5 " LATIN SMALL LETTER A WITH RING ABOVE " 
       "16r00E6"    16r00E6 " LATIN SMALL LETTER AE " 
       "16r00E7"    16r012F " LATIN SMALL LETTER I WITH OGONEK " 
       "16r00E8"    16r010D " LATIN SMALL LETTER C WITH CARON " 
       "16r00E9"    16r00E9 " LATIN SMALL LETTER E WITH ACUTE " 
       "16r00EA"    16r0119 " LATIN SMALL LETTER E WITH OGONEK " 
       "16r00EB"    16r00EB " LATIN SMALL LETTER E WITH DIAERESIS " 
       "16r00EC"    16r0117 " LATIN SMALL LETTER E WITH DOT ABOVE " 
       "16r00ED"    16r00ED " LATIN SMALL LETTER I WITH ACUTE " 
       "16r00EE"    16r00EE " LATIN SMALL LETTER I WITH CIRCUMFLEX " 
       "16r00EF"    16r012B " LATIN SMALL LETTER I WITH MACRON " 
       "16r00F0"    16r0111 " LATIN SMALL LETTER D WITH STROKE " 
       "16r00F1"    16r0146 " LATIN SMALL LETTER N WITH CEDILLA " 
       "16r00F2"    16r014D " LATIN SMALL LETTER O WITH MACRON " 
       "16r00F3"    16r0137 " LATIN SMALL LETTER K WITH CEDILLA " 
       "16r00F4"    16r00F4 " LATIN SMALL LETTER O WITH CIRCUMFLEX " 
       "16r00F5"    16r00F5 " LATIN SMALL LETTER O WITH TILDE " 
       "16r00F6"    16r00F6 " LATIN SMALL LETTER O WITH DIAERESIS " 
       "16r00F7"    16r00F7 " DIVISION SIGN " 
       "16r00F8"    16r00F8 " LATIN SMALL LETTER O WITH STROKE " 
       "16r00F9"    16r0173 " LATIN SMALL LETTER U WITH OGONEK " 
       "16r00FA"    16r00FA " LATIN SMALL LETTER U WITH ACUTE " 
       "16r00FB"    16r00FB " LATIN SMALL LETTER U WITH CIRCUMFLEX " 
       "16r00FC"    16r00FC " LATIN SMALL LETTER U WITH DIAERESIS " 
       "16r00FD"    16r0169 " LATIN SMALL LETTER U WITH TILDE " 
       "16r00FE"    16r016B " LATIN SMALL LETTER U WITH MACRON " 
       "16r00FF"    16r02D9 " DOT ABOVE " 
       ) at:(code - 16rA0).
!

encode:unicodeArg
    "Automagically generated by generateCode - do not modify.
     Encode from unicode into my encoding."

    |unicode "{ Class: SmallInteger }"|

    unicode := unicodeArg.
    unicode <= 16rA0 ifTrue:[ ^ unicode ].
    unicode > 16r2DB ifTrue:[
	^ self encodingError.
    ].
    unicode <= 16r17E ifTrue:[
	unicode <= 16rFF ifTrue:[
	    (#[
	       "16r00A1"    0 " invalid " 
	       "16r00A2"    0 " invalid " 
	       "16r00A3"    0 " invalid " 
	       "16r00A4"    1 " CURRENCY SIGN " 
	       "16r00A5"    0 " invalid " 
	       "16r00A6"    0 " invalid " 
	       "16r00A7"    1 " SECTION SIGN " 
	       "16r00A8"    1 " DIAERESIS " 
	       "16r00A9"    0 " invalid " 
	       "16r00AA"    0 " invalid " 
	       "16r00AB"    0 " invalid " 
	       "16r00AC"    0 " invalid " 
	       "16r00AD"    1 " SOFT HYPHEN " 
	       "16r00AE"    0 " invalid " 
	       "16r00AF"    1 " MACRON " 
	       "16r00B0"    1 " DEGREE SIGN " 
	       "16r00B1"    0 " invalid " 
	       "16r00B2"    0 " invalid " 
	       "16r00B3"    0 " invalid " 
	       "16r00B4"    1 " ACUTE ACCENT " 
	       "16r00B5"    0 " invalid " 
	       "16r00B6"    0 " invalid " 
	       "16r00B7"    0 " invalid " 
	       "16r00B8"    1 " CEDILLA " 
	       "16r00B9"    0 " invalid " 
	       "16r00BA"    0 " invalid " 
	       "16r00BB"    0 " invalid " 
	       "16r00BC"    0 " invalid " 
	       "16r00BD"    0 " invalid " 
	       "16r00BE"    0 " invalid " 
	       "16r00BF"    0 " invalid " 
	       "16r00C0"    0 " invalid " 
	       "16r00C1"    1 " LATIN CAPITAL LETTER A WITH ACUTE " 
	       "16r00C2"    1 " LATIN CAPITAL LETTER A WITH CIRCUMFLEX " 
	       "16r00C3"    1 " LATIN CAPITAL LETTER A WITH TILDE " 
	       "16r00C4"    1 " LATIN CAPITAL LETTER A WITH DIAERESIS " 
	       "16r00C5"    1 " LATIN CAPITAL LETTER A WITH RING ABOVE " 
	       "16r00C6"    1 " LATIN CAPITAL LETTER AE " 
	       "16r00C7"    0 " invalid " 
	       "16r00C8"    0 " invalid " 
	       "16r00C9"    1 " LATIN CAPITAL LETTER E WITH ACUTE " 
	       "16r00CA"    0 " invalid " 
	       "16r00CB"    1 " LATIN CAPITAL LETTER E WITH DIAERESIS " 
	       "16r00CC"    0 " invalid " 
	       "16r00CD"    1 " LATIN CAPITAL LETTER I WITH ACUTE " 
	       "16r00CE"    1 " LATIN CAPITAL LETTER I WITH CIRCUMFLEX " 
	       "16r00CF"    0 " invalid " 
	       "16r00D0"    0 " invalid " 
	       "16r00D1"    0 " invalid " 
	       "16r00D2"    0 " invalid " 
	       "16r00D3"    0 " invalid " 
	       "16r00D4"    1 " LATIN CAPITAL LETTER O WITH CIRCUMFLEX " 
	       "16r00D5"    1 " LATIN CAPITAL LETTER O WITH TILDE " 
	       "16r00D6"    1 " LATIN CAPITAL LETTER O WITH DIAERESIS " 
	       "16r00D7"    1 " MULTIPLICATION SIGN " 
	       "16r00D8"    1 " LATIN CAPITAL LETTER O WITH STROKE " 
	       "16r00D9"    0 " invalid " 
	       "16r00DA"    1 " LATIN CAPITAL LETTER U WITH ACUTE " 
	       "16r00DB"    1 " LATIN CAPITAL LETTER U WITH CIRCUMFLEX " 
	       "16r00DC"    1 " LATIN CAPITAL LETTER U WITH DIAERESIS " 
	       "16r00DD"    0 " invalid " 
	       "16r00DE"    0 " invalid " 
	       "16r00DF"    1 " LATIN SMALL LETTER SHARP S " 
	       "16r00E0"    0 " invalid " 
	       "16r00E1"    1 " LATIN SMALL LETTER A WITH ACUTE " 
	       "16r00E2"    1 " LATIN SMALL LETTER A WITH CIRCUMFLEX " 
	       "16r00E3"    1 " LATIN SMALL LETTER A WITH TILDE " 
	       "16r00E4"    1 " LATIN SMALL LETTER A WITH DIAERESIS " 
	       "16r00E5"    1 " LATIN SMALL LETTER A WITH RING ABOVE " 
	       "16r00E6"    1 " LATIN SMALL LETTER AE " 
	       "16r00E7"    0 " invalid " 
	       "16r00E8"    0 " invalid " 
	       "16r00E9"    1 " LATIN SMALL LETTER E WITH ACUTE " 
	       "16r00EA"    0 " invalid " 
	       "16r00EB"    1 " LATIN SMALL LETTER E WITH DIAERESIS " 
	       "16r00EC"    0 " invalid " 
	       "16r00ED"    1 " LATIN SMALL LETTER I WITH ACUTE " 
	       "16r00EE"    1 " LATIN SMALL LETTER I WITH CIRCUMFLEX " 
	       "16r00EF"    0 " invalid " 
	       "16r00F0"    0 " invalid " 
	       "16r00F1"    0 " invalid " 
	       "16r00F2"    0 " invalid " 
	       "16r00F3"    0 " invalid " 
	       "16r00F4"    1 " LATIN SMALL LETTER O WITH CIRCUMFLEX " 
	       "16r00F5"    1 " LATIN SMALL LETTER O WITH TILDE " 
	       "16r00F6"    1 " LATIN SMALL LETTER O WITH DIAERESIS " 
	       "16r00F7"    1 " DIVISION SIGN " 
	       "16r00F8"    1 " LATIN SMALL LETTER O WITH STROKE " 
	       "16r00F9"    0 " invalid " 
	       "16r00FA"    1 " LATIN SMALL LETTER U WITH ACUTE " 
	       "16r00FB"    1 " LATIN SMALL LETTER U WITH CIRCUMFLEX " 
	       "16r00FC"    1 " LATIN SMALL LETTER U WITH DIAERESIS " 
	       "16r00FD"    0 " invalid " 
	       "16r00FE"    0 " invalid " 
	       "16r00FF"    0 " invalid " 
	    ] at:(unicode - 160)) ~~ 0 ifTrue:[^ unicode].
	    ^ self encodingError.
	].
	[
	    |t|
	    t := #[
	       "16r0100"    16rC0 " LATIN CAPITAL LETTER A WITH MACRON " 
	       "16r0101"    16rE0 " LATIN SMALL LETTER A WITH MACRON " 
	       "16r0102"    16r00 " invalid " 
	       "16r0103"    16r00 " invalid " 
	       "16r0104"    16rA1 " LATIN CAPITAL LETTER A WITH OGONEK " 
	       "16r0105"    16rB1 " LATIN SMALL LETTER A WITH OGONEK " 
	       "16r0106"    16r00 " invalid " 
	       "16r0107"    16r00 " invalid " 
	       "16r0108"    16r00 " invalid " 
	       "16r0109"    16r00 " invalid " 
	       "16r010A"    16r00 " invalid " 
	       "16r010B"    16r00 " invalid " 
	       "16r010C"    16rC8 " LATIN CAPITAL LETTER C WITH CARON " 
	       "16r010D"    16rE8 " LATIN SMALL LETTER C WITH CARON " 
	       "16r010E"    16r00 " invalid " 
	       "16r010F"    16r00 " invalid " 
	       "16r0110"    16rD0 " LATIN CAPITAL LETTER D WITH STROKE " 
	       "16r0111"    16rF0 " LATIN SMALL LETTER D WITH STROKE " 
	       "16r0112"    16rAA " LATIN CAPITAL LETTER E WITH MACRON " 
	       "16r0113"    16rBA " LATIN SMALL LETTER E WITH MACRON " 
	       "16r0114"    16r00 " invalid " 
	       "16r0115"    16r00 " invalid " 
	       "16r0116"    16rCC " LATIN CAPITAL LETTER E WITH DOT ABOVE " 
	       "16r0117"    16rEC " LATIN SMALL LETTER E WITH DOT ABOVE " 
	       "16r0118"    16rCA " LATIN CAPITAL LETTER E WITH OGONEK " 
	       "16r0119"    16rEA " LATIN SMALL LETTER E WITH OGONEK " 
	       "16r011A"    16r00 " invalid " 
	       "16r011B"    16r00 " invalid " 
	       "16r011C"    16r00 " invalid " 
	       "16r011D"    16r00 " invalid " 
	       "16r011E"    16r00 " invalid " 
	       "16r011F"    16r00 " invalid " 
	       "16r0120"    16r00 " invalid " 
	       "16r0121"    16r00 " invalid " 
	       "16r0122"    16rAB " LATIN CAPITAL LETTER G WITH CEDILLA " 
	       "16r0123"    16rBB " LATIN SMALL LETTER G WITH CEDILLA " 
	       "16r0124"    16r00 " invalid " 
	       "16r0125"    16r00 " invalid " 
	       "16r0126"    16r00 " invalid " 
	       "16r0127"    16r00 " invalid " 
	       "16r0128"    16rA5 " LATIN CAPITAL LETTER I WITH TILDE " 
	       "16r0129"    16rB5 " LATIN SMALL LETTER I WITH TILDE " 
	       "16r012A"    16rCF " LATIN CAPITAL LETTER I WITH MACRON " 
	       "16r012B"    16rEF " LATIN SMALL LETTER I WITH MACRON " 
	       "16r012C"    16r00 " invalid " 
	       "16r012D"    16r00 " invalid " 
	       "16r012E"    16rC7 " LATIN CAPITAL LETTER I WITH OGONEK " 
	       "16r012F"    16rE7 " LATIN SMALL LETTER I WITH OGONEK " 
	       "16r0130"    16r00 " invalid " 
	       "16r0131"    16r00 " invalid " 
	       "16r0132"    16r00 " invalid " 
	       "16r0133"    16r00 " invalid " 
	       "16r0134"    16r00 " invalid " 
	       "16r0135"    16r00 " invalid " 
	       "16r0136"    16rD3 " LATIN CAPITAL LETTER K WITH CEDILLA " 
	       "16r0137"    16rF3 " LATIN SMALL LETTER K WITH CEDILLA " 
	       "16r0138"    16rA2 " LATIN SMALL LETTER KRA " 
	       "16r0139"    16r00 " invalid " 
	       "16r013A"    16r00 " invalid " 
	       "16r013B"    16rA6 " LATIN CAPITAL LETTER L WITH CEDILLA " 
	       "16r013C"    16rB6 " LATIN SMALL LETTER L WITH CEDILLA " 
	       "16r013D"    16r00 " invalid " 
	       "16r013E"    16r00 " invalid " 
	       "16r013F"    16r00 " invalid " 
	       "16r0140"    16r00 " invalid " 
	       "16r0141"    16r00 " invalid " 
	       "16r0142"    16r00 " invalid " 
	       "16r0143"    16r00 " invalid " 
	       "16r0144"    16r00 " invalid " 
	       "16r0145"    16rD1 " LATIN CAPITAL LETTER N WITH CEDILLA " 
	       "16r0146"    16rF1 " LATIN SMALL LETTER N WITH CEDILLA " 
	       "16r0147"    16r00 " invalid " 
	       "16r0148"    16r00 " invalid " 
	       "16r0149"    16r00 " invalid " 
	       "16r014A"    16rBD " LATIN CAPITAL LETTER ENG " 
	       "16r014B"    16rBF " LATIN SMALL LETTER ENG " 
	       "16r014C"    16rD2 " LATIN CAPITAL LETTER O WITH MACRON " 
	       "16r014D"    16rF2 " LATIN SMALL LETTER O WITH MACRON " 
	       "16r014E"    16r00 " invalid " 
	       "16r014F"    16r00 " invalid " 
	       "16r0150"    16r00 " invalid " 
	       "16r0151"    16r00 " invalid " 
	       "16r0152"    16r00 " invalid " 
	       "16r0153"    16r00 " invalid " 
	       "16r0154"    16r00 " invalid " 
	       "16r0155"    16r00 " invalid " 
	       "16r0156"    16rA3 " LATIN CAPITAL LETTER R WITH CEDILLA " 
	       "16r0157"    16rB3 " LATIN SMALL LETTER R WITH CEDILLA " 
	       "16r0158"    16r00 " invalid " 
	       "16r0159"    16r00 " invalid " 
	       "16r015A"    16r00 " invalid " 
	       "16r015B"    16r00 " invalid " 
	       "16r015C"    16r00 " invalid " 
	       "16r015D"    16r00 " invalid " 
	       "16r015E"    16r00 " invalid " 
	       "16r015F"    16r00 " invalid " 
	       "16r0160"    16rA9 " LATIN CAPITAL LETTER S WITH CARON " 
	       "16r0161"    16rB9 " LATIN SMALL LETTER S WITH CARON " 
	       "16r0162"    16r00 " invalid " 
	       "16r0163"    16r00 " invalid " 
	       "16r0164"    16r00 " invalid " 
	       "16r0165"    16r00 " invalid " 
	       "16r0166"    16rAC " LATIN CAPITAL LETTER T WITH STROKE " 
	       "16r0167"    16rBC " LATIN SMALL LETTER T WITH STROKE " 
	       "16r0168"    16rDD " LATIN CAPITAL LETTER U WITH TILDE " 
	       "16r0169"    16rFD " LATIN SMALL LETTER U WITH TILDE " 
	       "16r016A"    16rDE " LATIN CAPITAL LETTER U WITH MACRON " 
	       "16r016B"    16rFE " LATIN SMALL LETTER U WITH MACRON " 
	       "16r016C"    16r00 " invalid " 
	       "16r016D"    16r00 " invalid " 
	       "16r016E"    16r00 " invalid " 
	       "16r016F"    16r00 " invalid " 
	       "16r0170"    16r00 " invalid " 
	       "16r0171"    16r00 " invalid " 
	       "16r0172"    16rD9 " LATIN CAPITAL LETTER U WITH OGONEK " 
	       "16r0173"    16rF9 " LATIN SMALL LETTER U WITH OGONEK " 
	       "16r0174"    16r00 " invalid " 
	       "16r0175"    16r00 " invalid " 
	       "16r0176"    16r00 " invalid " 
	       "16r0177"    16r00 " invalid " 
	       "16r0178"    16r00 " invalid " 
	       "16r0179"    16r00 " invalid " 
	       "16r017A"    16r00 " invalid " 
	       "16r017B"    16r00 " invalid " 
	       "16r017C"    16r00 " invalid " 
	       "16r017D"    16rAE " LATIN CAPITAL LETTER Z WITH CARON " 
	       "16r017E"    16rBE " LATIN SMALL LETTER Z WITH CARON " 
	       ] at:(unicode - 16rFF).
	    t == 0 ifFalse:[^ t].
	    ^ self encodingError
	] value.
    ].
    unicode <= 16r2C6 ifTrue:[
	^ self encodingError.
    ].
    unicode == 16r2C7 ifTrue:[
	^  "16r02C7" 16r00B7 " CARON " 
    ].
    unicode <= 16r2D8 ifTrue:[
	^ self encodingError.
    ].
    [
	|t|
	t := #[
	   "16r02D9"    16rFF " DOT ABOVE " 
	   "16r02DA"    16r00 " invalid " 
	   "16r02DB"    16rB2 " OGONEK " 
	   ] at:(unicode - 16r2D8).
	t == 0 ifFalse:[^ t].
	^ self encodingError
    ] value.
! !

!ISO8859_4 class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__ISO8859_4.st,v 1.5 2012-07-11 16:43:07 stefan Exp $'
! !