I seem to be monopolizing this list lately.
This is, as usual, from latest CVS build.
> (setf f (open "/tmp/out1" :direction :output :element-type
#<OUTPUT BUFFERED FILE-STREAM (UNSIGNED-BYTE 8) #P"/tmp/out1">
> (EXT:WRITE-BYTE-SEQUENCE '#(1) f)
> (EXT:WRITE-BYTE-SEQUENCE #(1) f :no-hang t)
*** - WRITE-BYTE-SEQUENCE on
#<OUTPUT BUFFERED FILE-STREAM (UNSIGNED-BYTE 8) #P"/tmp/out1"> is
not as expected
The error message doesn't say what's illegal about the args, but ...
The following restarts are available:
ABORT :R1 Abort main loop
Break 1 > (type-of #(1))
Break 1 > (EXT:WRITE-BYTE-SEQUENCE (make-array 1 :element-type
'(unsigned-byte 8)) f :no-hang t)
Break 1 >
Since impnotes says
This function is especially efficient if sequence is a (VECTOR
(UNSIGNED-BYTE 8)) and stream is ...
I gather that it's still supposed to work if sequence has other types.
Same thing happens if the stream is unbuffered, btw.