31 Jan
2007
31 Jan
'07
21:16
Hi,
I think I've just uncovered a bug with u8vector ports when the u8vector is more than 64 elements long. Here is the simplest way to reproduce this problem:
(define v (make-u8vector 64 32)) (u8vector-set! v 62 65) (with-input-from-u8vector v read)
A
(define v (make-u8vector 65 32)) (u8vector-set! v 63 65) (with-input-from-u8vector v read)
(u8vector-rbuf-fill #<input-port #11 (u8vector)> 1 #t) 1>
The last two lines are produced by lines 3264-3265 of _io.scm, if this can be of any help.
Dominique