[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#39610: R6RS `flush-output-port` not playing along with `transcoded-p
From: |
Andreas Rottmann |
Subject: |
bug#39610: R6RS `flush-output-port` not playing along with `transcoded-port` |
Date: |
Sat, 15 Feb 2020 11:27:06 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux) |
Andreas Rottmann <address@hidden> writes:
> [...] I isolated the cause; the following snippet hangs on Guile 2.2
> and 3.0, while it worked as expected on 2.0:
>
> ;; ------------------
> (import (rnrs))
>
> (let* ((p (pipe))
> (in (car p))
> (out (transcoded-port (cdr p) (make-transcoder (utf-8-codec)))))
> (put-datum out "foo")
> (flush-output-port out)
> (display "Should have written to pipe by now, attempting reading a byte\n")
> (display "Got")
> (display (get-u8 in))
> (newline))
> ;; -------------------
>
> It seems the underlying port is no longer flushed to the OS, so the
> `get-u8` now hangs waiting for input, starting with Guile 2.2.
>
I'd like to add that this is indeed not passing data to the OS, as
verified by strace. Also, I have now figured out the commit introducing
the regression, namely 8399e7af5 ("Generic port facility provides
buffering uniformly"); the commit before (e8eeeeb1d) still runs the
above code to completion.
I'd be somewhat motivated to try coming up with a fix, and turn the
above snippet into a testcase, but I guess I could use some hinting in
the right direction.
Regards, Rotty