UninterpretedBytes.st
changeset 18600 35de4089788f
parent 18346 c73f81214ed9
child 18608 7d521f25267c
child 18616 9e97c42bc5df
--- a/UninterpretedBytes.st	Sat Jul 18 01:26:27 2015 +0200
+++ b/UninterpretedBytes.st	Sat Jul 18 01:27:15 2015 +0200
@@ -2695,6 +2695,20 @@
     "Modified: / 30-11-2013 / 11:42:21 / cg"
 !
 
+asSingleByteString
+    "return the receiver converted to a 'normal' string.
+     Raises an error if unrepresentable characters are encountered.
+     See also: asSingleByteStringIfPossible and asSingleByteStringReplaceInvalidWith:"
+
+    ^ String fromString:self
+
+    "
+     #[60 61 62 63] asSingleByteString
+     (Unicode16String with:(Character value:16rFF)) asSingleByteString
+     (Unicode16String with:(Character value:16rFFFF)) asSingleByteString
+    "
+!
+
 asUUID
     ^ UUID fromBytes:self
 ! !
@@ -3176,11 +3190,11 @@
 !UninterpretedBytes class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.102 2015-05-16 09:46:43 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.102 2015-05-16 09:46:43 cg Exp $'
+    ^ '$Header$'
 ! !