--- a/FourByteString.st	Tue Dec 11 15:37:02 2012 +0100
+++ b/FourByteString.st	Wed Dec 12 23:55:08 2012 +0100
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libbasic2' }"
 
 CharacterArray variableLongSubclass:#FourByteString
@@ -104,12 +103,16 @@
      Here, 32 is returned (storing quad byte characters)."
 
     ^ 32
+!
+
+isWideString
+    ^ true
 ! !
 
 !FourByteString class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/FourByteString.st,v 1.2 2004-03-05 19:02:31 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/FourByteString.st,v 1.3 2012-12-12 22:55:08 stefan Exp $'
 ! !
 
 FourByteString initialize!