--- a/FourByteString.st	Wed Aug 30 23:34:45 2017 +0200
+++ b/FourByteString.st	Wed Aug 30 23:34:54 2017 +0200
@@ -130,6 +130,14 @@
     ^ true
 ! !
 
+!FourByteString methodsFor:'testing'!
+
+isByteCollection
+    ^ false
+
+    "Created: / 30-08-2017 / 23:31:02 / cg"
+! !
+
 !FourByteString class methodsFor:'documentation'!
 
 version