--- a/Unicode32String.st	Fri Apr 02 09:09:15 2004 +0200
+++ b/Unicode32String.st	Tue Apr 06 18:35:37 2004 +0200
@@ -72,6 +72,10 @@
     ^ s asSymbolIfInterned
 !
 
+asUnicode32String
+    ^ self
+!
+
 asUnicodeString
     ^ self
 !
@@ -83,7 +87,7 @@
 !Unicode32String class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Unicode32String.st,v 1.2 2004-02-21 12:08:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Unicode32String.st,v 1.3 2004-04-06 16:35:37 stefan Exp $'
 ! !
 
 Unicode32String initialize!