--- a/SequenceableCollection.st Sun Jan 09 10:38:33 2011 +0100
+++ b/SequenceableCollection.st Sun Jan 09 10:39:44 2011 +0100
@@ -201,20 +201,6 @@
"
! !
-!SequenceableCollection class methodsFor:'Compatibility-Squeak'!
-
-writeStream
- "create a write-stream on an instance of the receiver-class"
-
- ^ WriteStream on:(self new:50).
-
- "
- OrderedCollection writeStream
- "
-
- "Modified: / 29-03-2007 / 15:20:02 / cg"
-! !
-
!SequenceableCollection class methodsFor:'Signal constants'!
missingClassInLiteralArrayErrorSignal
@@ -346,6 +332,42 @@
"
"Created: / 29-03-2007 / 15:05:30 / cg"
+!
+
+writeStream
+ "create a write-stream on an instance of the receiver-class"
+
+ ^ self writeStreamClass on:(self new:50).
+
+ "
+ OrderedCollection writeStream
+ "
+
+ "Modified: / 09-01-2011 / 10:37:35 / cg"
+!
+
+writeStreamClass
+ "the type of stream used in writeStream"
+
+ ^ WriteStream
+
+ "
+ OrderedCollection writeStreamClass
+ "
+
+ "Created: / 09-01-2011 / 10:37:15 / cg"
+!
+
+writeStreamWithInitialSize:l
+ "create a write-stream on an instance of the receiver-class"
+
+ ^ self writeStreamClass on:(self new:l).
+
+ "
+ OrderedCollection writeStream
+ "
+
+ "Created: / 09-01-2011 / 10:36:28 / cg"
! !
!SequenceableCollection class methodsFor:'queries'!
@@ -2076,7 +2098,6 @@
"
! !
-
!SequenceableCollection methodsFor:'converting'!
asCollectionOfSubCollectionsOfSize:pieceSize
@@ -7849,11 +7870,11 @@
!SequenceableCollection class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.299 2010-08-24 08:16:49 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.300 2011-01-09 09:39:44 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.299 2010-08-24 08:16:49 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.300 2011-01-09 09:39:44 cg Exp $'
! !
SequenceableCollection initialize!