--- a/CharacterArray.st Tue Apr 06 18:35:40 2004 +0200
+++ b/CharacterArray.st Tue Apr 06 18:36:31 2004 +0200
@@ -2490,6 +2490,24 @@
"
!
+asUnicode16String
+ "thats not really true - characters above ascii 16r7F may need special treatment"
+
+ ^ ((Unicode16String new:self size) replaceFrom:1 to:self size with:self startingAt:1)
+!
+
+asUnicode32String
+ "thats not really true - characters above ascii 16r7F may need special treatment"
+
+ ^ ((Unicode32String new:self size) replaceFrom:1 to:self size with:self startingAt:1)
+!
+
+asUnicodeString
+ "thats not really true - characters above ascii 16r7F may need special treatment"
+
+ ^ ((UnicodeString new:self size) replaceFrom:1 to:self size with:self startingAt:1)
+!
+
asUppercase
"return a copy of myself in uppercase letters"
@@ -4945,7 +4963,7 @@
!CharacterArray class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.299 2004-03-17 16:17:11 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.300 2004-04-06 16:36:31 stefan Exp $'
! !
CharacterArray initialize!
--- a/String.st Tue Apr 06 18:35:40 2004 +0200
+++ b/String.st Tue Apr 06 18:36:31 2004 +0200
@@ -1652,12 +1652,6 @@
"
!
-asUnicodeString
- "thats not really true - characters above ascii 16r7F may need special treatment"
-
- ^ ((UnicodeString new:self size) replaceFrom:1 to:self size with:self startingAt:1)
-!
-
decodeAsLiteralArray
"given a literalEncoding in the receiver,
create & return the corresponding object.
@@ -3246,8 +3240,9 @@
! !
+
!String class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.203 2004-03-16 09:01:36 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.204 2004-04-06 16:36:12 stefan Exp $'
! !