Re: using collect on a ReadStream

On Tue, 2007-10-30 at 08:27 +0100, Oscar Nierstrasz wrote:
> Strange.  I do not see these methods supported by ReadStream in my  
> image.
> 
> I only see 13 implementors of #collect:
> 
> What does your implementation of ReadStream>>collect: say?
> 
Oh, I'm sorry. The methods in ReadStream are added by Glorp. So
I take another list for asking :)

FYI the implementation is

ReadStream>>collect: aBlock 
        | newStream |
        newStream := AddingWriteStream on: collection species new.
        [self atEnd] whileFalse: [newStream nextPut: (aBlock value: self
next)].
        ^newStream contents

Norbert