CharacterEncoderImplementations__ISO10646_1.st
author Claus Gittinger <cg@exept.de>
Fri, 05 Mar 2004 18:14:28 +0100
changeset 8079 0c51c515c6b6
child 8114 05274a80fcc4
permissions -rw-r--r--
initial checkin
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
8079
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"{ Encoding: utf8 }"
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
"{ Package: 'stx:libbasic' }"
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
"{ NameSpace: CharacterEncoderImplementations }"
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
CharacterEncoder subclass:#ISO10646_1
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
	instanceVariableNames:''
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
	classVariableNames:''
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
	poolDictionaries:''
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
	category:'Collections-Text-Encodings'
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
!ISO10646_1 class methodsFor:'queries'!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
namesOfEncoding
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
    ^ #( 'unicode' 'iso10646-1' 'iso-10646-1' )
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
userFriendlyNameOfEncoding
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
    ^ 'Unicode'
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
! !
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
!ISO10646_1 methodsFor:'encoding & decoding'!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
decode:aCode
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
    ^ aCode
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
decodeString:aString
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
    ^ aString
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
encode:aCode
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
    ^ aCode
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
encodeString:aString
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
    ^ aString
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
! !
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
!ISO10646_1 class methodsFor:'documentation'!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
version
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__ISO10646_1.st,v 1.1 2004-03-05 17:13:28 cg Exp $'
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
! !