Hi Paolo,
from time to time I get the below exception. I fail to properly reproduce it
with a standalone test case though.
FileDescriptor)>>nextAvailable:into:startingAt:
...
self isOpen ifFalse: [^available].
^^^ just checks if the fd is >= 0
count := self
fileOp: 3
with: aCollection
with: position + available
with: (position + n - 1 min: aCollection size).
^^^ okay an error happened here that will not throw an exception and the
default fileOp:with:with:with will return nil. So maybe we should add an
ifFail: [0] to it?
count := count + available.
Exception
Object: nil error: did not understand #+
MessageNotUnderstood(Exception)>>signal (ExcHandling.st:254)
UndefinedObject(Object)>>doesNotUnderstand: #+ (SysExcept.st:1407)
Sockets.TCPSocketImpl(FileDescriptor)>>nextAvailable:into:startingAt:
(FileDescr.st:802)
optimized [] in Sockets.StreamSocket>>newReadBuffer:
(Sockets.star#VFS.ZipFile/Sockets.st:1323)
Sockets.ReadBuffer>>atEnd (Sockets.star#VFS.ZipFile/Buffers.st:129)
Sockets.StreamSocket>>peek (Sockets.star#VFS.ZipFile/Sockets.st:1267)
Sockets.StreamSocket>>atEnd (Sockets.star#VFS.ZipFile/Sockets.st:1152)
Sockets.StreamSocket(Stream)>>nextLine (Stream.st:215)
_______________________________________________
help-smalltalk mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/help-smalltalk