On Fri 08 Apr 2011 04:06, Ian Price writes:
> I'm not too familiar with guile's codebase, but I think I've found the
> bug. It's a fencepost error in the SEEK_SET case of bip_seek from
> libguile/r6rs-ports.c . I've attached a fix for stable-2.0
Yes, that does sound right. Good catch. Applied,
Hello,
I'm not too familiar with guile's codebase, but I think I've found the
bug. It's a fencepost error in the SEEK_SET case of bip_seek from
libguile/r6rs-ports.c . I've attached a fix for stable-2.0
Regards,
Ian
>From c3fd372c573ae1bc9cdf3cb0ef69d6a0592ec020 Mon Sep 17 00:00:00 2001
From: Ia
The following program fails:
#!r6rs
(import (rnrs))
(define port (open-bytevector-input-port '#vu8()))
(set-port-position! port (port-position port))
and the following fails, too:
#!r6rs
(import (rnrs))
(define port (open-bytevector-input-port '#vu8(1 2 3)))
(write (port-position port))(newlin
