On Sat, Jan 7, 2012 at 2:05 PM, Henrik Sperre Johansen <henrik.s.johansen@veloxit.no> wrote:
On 07.01.2012 13:20, St�phane Ducasse wrote:
sounds like :)

Stef

On Jan 7, 2012, at 1:10 PM, Mariano Martinez Peck wrote:

FSReadStream>> �next: count
� � | result |
� � result := ByteArray new: count.
� � handle at: position read: result startingAt: 1 count: count.
� � position := position + 1.
� � �^ result


shouldn't be

FSReadStream>> �next: count
� � | result |
� � result := ByteArray new: count.
� � handle at: position read: result startingAt: 1 count: count.
� � position := position + count.
� � �^ result

At least with that (among some extensions) Fuel tests pass with FS :)

Cheers

--
Mariano
http://marianopeck.wordpress.com


Still wrong though, I think...
It doesn't handle the case where you try to read past end of stream.

next: count
^self nextInto: (ByteArray new: count)

would probably be better.


Indeed.

Cheers,
Henry





--
Mariano
http://marianopeck.wordpress.com