[Pharo-dev] PositionableStream>>upTo: anObject

While browsing the system I saw that the following method raised a temp read before written... It did not jump to my eyes. Working on something else.... PositionableStream>>upTo: anObject "Answer a subcollection from the current access position to the occurrence (if any, but not inclusive) of anObject in the receiver. If anObject is not in the collection, answer the entire rest of the receiver." | newStream element | newStream := (collection species new: 100) writeStream. [self atEnd or: [(element := self next) = anObject]] whileFalse: [newStream nextPut: element]. ^newStream contents