Re: [Clorb-devel] clorb-0.2 on CMUCL and CLISP

[Eric M. <ema...@ma...>]

>>>>> "ecm" == Eric Marsden <ema...@ma...> writes:

  ecm> I get the same error whether using native CMUCL sockets, or my
  ecm> Solaris port of db-sockets.

ok, I think the problem is in the CMUCL definition of read-sequence on
socket streams. After replacing it by a simple version, everything
works as expected.

   (defun my-read-sequence (sequence stream &key (start 0) (end nil))
     (unless end (setq end (length sequence)))
     (do ((index start (1+ index)))
         ((eql index end) index)
       (let ((b (read-byte stream nil :eof)))
         (when (eq b :eof) (return index))
         (setf (aref sequence index) b))))
 
There are two calls to read-sequence in clorb-request.lisp to change.  
  
-- 
Eric Marsden                          <URL:http://www.laas.fr/~emarsden>