--- a/ArrayedCollection.st	Tue May 02 20:16:56 1995 +0200
+++ b/ArrayedCollection.st	Wed May 03 01:55:59 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic/ArrayedCollection.st,v 1.16 1995-03-08 23:36:39 claus Exp $
+$Header: /cvs/stx/stx/libbasic/ArrayedCollection.st,v 1.17 1995-05-02 23:55:26 claus Exp $
 '!
 
 !ArrayedCollection class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/ArrayedCollection.st,v 1.16 1995-03-08 23:36:39 claus Exp $
+$Header: /cvs/stx/stx/libbasic/ArrayedCollection.st,v 1.17 1995-05-02 23:55:26 claus Exp $
 "
 !
 
@@ -256,9 +256,7 @@
 	^ self
     ].
 
-    aStream nextPutAll:'(('.
-    aStream nextPutAll:self class name.
-    aStream nextPutAll:' new:'.
+    aStream nextPutAll:'(('; nextPutAll:self class name; nextPutAll:' new:'.
     self size printOn:aStream.
     aStream nextPutAll:')'.
     index := 1.