--- a/Unicode32String.st	Tue Aug 02 19:03:07 2005 +0200
+++ b/Unicode32String.st	Wed Sep 21 20:42:52 2005 +0200
@@ -41,7 +41,7 @@
 
 documentation
 "
-    Not yet finished - unicode support is currently being implemented.
+    Not yet fully finished - unicode support is still being implemented.
 "
 ! !
 
@@ -71,6 +71,10 @@
 !Unicode32String methodsFor:'conversion'!
 
 asSymbolIfInterned
+    "Because ST/X does not support non-8-bit symbols, this method
+     has been redefined to only return a symbol, if the receiver does NOT contain
+     any non-8 bit characters."
+
     |s|
 
     Error catch:[
@@ -81,21 +85,27 @@
 !
 
 asUnicode32String
+    "as the receiver already is a unicode-32 string, return it"
+
     ^ self
 !
 
 asUnicodeString
+    "as the receiver already is a unicode string, return it"
+
     ^ self
 !
 
 printOn:aStream
+    "print the receiver utf-8 encoded on aStream"
+
     self utf8EncodedOn:aStream
 ! !
 
 !Unicode32String class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Unicode32String.st,v 1.4 2004-06-16 12:18:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Unicode32String.st,v 1.5 2005-09-21 18:42:52 cg Exp $'
 ! !
 
 Unicode32String initialize!