FileStream next

[Paul Dufresne]

I see that BytreArray is: sequence is now true.
But there still is a(the same) problem with my FileStream next.

Recall I have:
Index: src/stream.slate
===============================
RCS file: /var/lib/cvs/slate/slate/src/stream.slate,v
retrieving revision 1.16
diff -r1.16 stream.slate
536c536
<   fs file read: room into: fs collection.
---
>   fs file next: room into: fs collection.
In FileStream flush.

And this do that:
G:\slate2\slate>slate.fas

WARNING:
INTERN("SOCKET-STREAM"): #<PACKAGE SOCKET> is locked
Ignore the lock and proceed
WARNING:
INTERN("(SETF COMMON-LISP:FILE-POSITION)"): #<PACKAGE COMMON-LISP> is locked
Ignore the lock and proceed
Slate 1> 'src/init.slate' fileIn.
Hi, there!
Nil
Slate 2> lobby addSlot: #p valued: (FileStream newForInputNamed: 
'license.txt').

<@Namespace:  traits lobby prototypes globals Mixins p>
Slate 3> p next.

*** - <@*PRIMITIVE-CLONEABLE*: traits> is not a sequence

G:\slate2\slate>

By the way, the second lock seems to be new.

_________________________________________________________________
MSN Search, le moteur de recherche qui pense comme vous !  
http://fr.ca.search.msn.com/