--- a/ReadWriteStream.st	Tue Apr 28 14:41:07 2020 +0200
+++ b/ReadWriteStream.st	Tue Apr 28 14:41:21 2020 +0200
@@ -157,20 +157,6 @@
     "Modified: / 15-10-2019 / 18:27:55 / Stefan Vogel"
 !
 
-isEmpty
-    "redefinde from WriteStream"
-
-    ^ self size == 0
-
-    "Created: / 15-10-2019 / 17:15:09 / Stefan Vogel"
-!
-
-isReadable 
-    "return true if the receiver supports reading - that's true"
-
-    ^ true
-!
-
 remainingSize
     "return the number of remaining elements to read in the streamed collection."
 
@@ -228,6 +214,22 @@
     "Modified: 5.2.1996 / 21:57:47 / stefan"
 ! !
 
+!ReadWriteStream methodsFor:'testing'!
+
+isEmpty
+    "redefinde from WriteStream"
+
+    ^ self size == 0
+
+    "Created: / 15-10-2019 / 17:15:09 / Stefan Vogel"
+!
+
+isReadable 
+    "return true if the receiver supports reading - that's true"
+
+    ^ true
+! !
+
 !ReadWriteStream class methodsFor:'documentation'!
 
 version