CharacterEncoderImplementations__ISO10646_1.st
author Jan Vrany <jan.vrany@labware.com>
Tue, 01 Jun 2021 20:19:13 +0100
branchjv
changeset 25424 51bd8a6b196f
parent 21387 e3865533e6a6
permissions -rw-r--r--
Cherry-picked `Context` cherry-picked Context.st from a6b6dda4caff: * 4aaf30c174e9: #DOCUMENTATION by cg, Claus Gittinger <cg@exept.de> * c67311afcc6c: #OTHER by cg, Claus Gittinger <cg@exept.de> * 883f79e7b2a6: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 716f3fbb09e9: Don't mark contexts with `CATCHMARK`, Jan Vrany <jan.vrany@fit.cvut.cz> * cff24fa817b0: #REFACTORING by stefan, Stefan Vogel <sv@exept.de> * 521f0d837330: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * bf1118f0fcca: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * e587cdd22868: #BUGFIX by cg, Claus Gittinger <cg@exept.de> * fe9f9487a3ed: #DOCUMENTATION by cg, Claus Gittinger <cg@exept.de> * d5b781899274: #BUGFIX by cg, Claus Gittinger <cg@exept.de> * 8258751a7465: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 40173e082cbc: Copyright updates, Jan Vrany <jan.vrany@fit.cvut.cz> * 6db5c28207d5: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 871ea64fd5dc: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 4b544a108e4e: #DOCUMENTATION by cg, Claus Gittinger <cg@exept.de> * 9a8d8399e566: #FEATURE by cgexept.de, Claus Gittinger <cg@exept.de> * 170b00be0103: #BUGFIX by stefan, Stefan Vogel <sv@exept.de> * a6c73965eae8: #FEATURE by cg, Claus Gittinger <cg@exept.de> * ce2a0e462ff0: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 46a260a9ca92: #FEATURE by cg, Claus Gittinger <cg@exept.de> * 46cab49167fb: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de> * 7d52dfd3997d: #DOCUMENTATION by exept, Claus Gittinger <cg@exept.de> * c52eeea62763: Fix `Context >> argAndVarNames` in cases when debug info is not available, Jan Vrany <jan.vrany@labware.com> * b5d6963fe4a9: Backed out changeset c52eeea62763, Jan Vrany <jan.vrany@labware.com> * 6fd3896f8703: #FEATURE by exept, Claus Gittinger <cg@exept.de> * b530ee616256: #REFACTORING by cg, Claus Gittinger <cg@exept.de> * ef9b481d7498: #FEATURE by cg, Claus Gittinger <cg@exept.de> * ea663b72bd51: #UI_ENHANCEMENT by cg, Claus Gittinger <cg@exept.de> * 6179572a733c: #FEATURE by exept, Claus Gittinger <cg@exept.de> * 84155b1b6622: #DOCUMENTATION by exept, Claus Gittinger <cg@exept.de> * 37d06602d856: *** empty log message ***, Claus Gittinger <cg@exept.de> * f927b9022fea: *** empty log message ***, Claus Gittinger <cg@exept.de> * 427d3be62d97: #UI_ENHANCEMENT by exept, Claus Gittinger <cg@exept.de>
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
8148
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
     1
"
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
     2
 COPYRIGHT (c) 2004 by eXept Software AG
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
     3
              All Rights Reserved
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
     4
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
     5
 This software is furnished under a license and may be used
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
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: 8118
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
     8
 be provided or otherwise made available to, or used by, any
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
     9
 other person.  No title to or ownership of the software is
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    10
 hereby transferred.
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    11
"
8079
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
"{ Package: 'stx:libbasic' }"
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
"{ NameSpace: CharacterEncoderImplementations }"
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
8118
efc99c0f68bc *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8114
diff changeset
    16
CharacterEncoder subclass:#ISO10646_1
8079
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
	instanceVariableNames:''
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
	classVariableNames:''
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
	poolDictionaries:''
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
	category:'Collections-Text-Encodings'
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
8148
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    23
!ISO10646_1 class methodsFor:'documentation'!
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    24
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    25
copyright
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    26
"
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    27
 COPYRIGHT (c) 2004 by eXept Software AG
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    28
              All Rights Reserved
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    29
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    30
 This software is furnished under a license and may be used
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
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: 8118
diff changeset
    32
 inclusion of the above copyright notice.   This software may not
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    33
 be provided or otherwise made available to, or used by, any
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    34
 other person.  No title to or ownership of the software is
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    35
 hereby transferred.
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    36
"
21297
1f1d63e46f28 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    37
!
1f1d63e46f28 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    38
1f1d63e46f28 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    39
documentation
1f1d63e46f28 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    40
"
1f1d63e46f28 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    41
    I am a dummy encoder for Unicode.
1f1d63e46f28 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    42
    Dummy, because that is the standard encding inside ST/X anyway
1f1d63e46f28 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    43
"
8148
dbf64e3142d9 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents: 8118
diff changeset
    44
! !
8079
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
!ISO10646_1 class methodsFor:'queries'!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
userFriendlyNameOfEncoding
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
    ^ 'Unicode'
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
! !
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
!ISO10646_1 methodsFor:'encoding & decoding'!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
decode:aCode
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
    ^ aCode
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
decodeString:aString
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
    ^ aString
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
encode:aCode
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
    ^ aCode
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
encodeString:aString
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    67
    ^ aString
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    68
! !
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    69
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    70
!ISO10646_1 class methodsFor:'documentation'!
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    71
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    72
version
21297
1f1d63e46f28 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    73
    ^ '$Header$'
17865
598963c6ff8e Recommited from itself
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17846
diff changeset
    74
!
598963c6ff8e Recommited from itself
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17846
diff changeset
    75
598963c6ff8e Recommited from itself
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17846
diff changeset
    76
version_SVN
17940
985e22966acb Merged with /trunk
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17911
diff changeset
    77
    ^ '$Id: CharacterEncoderImplementations__ISO10646_1.st 10807 2012-05-05 21:58:24Z vranyj1 $'
8079
0c51c515c6b6 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    78
! !
21297
1f1d63e46f28 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 8148
diff changeset
    79
17910
8d796ca8bd1d Merged with /trunk
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17892
diff changeset
    80
17911
a99f15c5efa5 Updated with /trunk
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 17910
diff changeset
    81