--- a/WriteStream.st	Thu May 19 07:07:52 2016 +0200
+++ b/WriteStream.st	Fri May 20 06:45:01 2016 +0200
@@ -184,7 +184,7 @@
      See the comment in WriteStream>>contents"
 
     collection := collection species new:(collection size).
-    super reset
+    position := 0.
 
     "Modified: 19.2.1997 / 08:57:00 / stefan"
 ! !