What steps will reproduce the problem?
1. make test.scm file
2. write following scripts to above file
(import (rnrs))
(define file "test.scm")
(call-with-port (open-file-input-port file (file-options no-fail) 'none)
(lambda (in)
(lookahead-u8 in)
(let ((bv (make-bytevector 1 20)))
(get-bytevector-n! in bv 0 0))))
3. run it
What is the expected output? What do you see instead?
0 should be returned.
Condition components:
1. &i/o-read
2. &who who: "close-port"
3. &message message: "Bad address"
4. &i/o-port port: ()
5. &irritants irritants: (())
Exception:
error in raise: returned from non-continuable exception
Stack trace:
1. throw: <subr>
2. (raise c): baselib.scm:943
3. get-bytevector-n!: <subr>
4. (lambda in): <unknown location>
5. (dynamic-wind in body out): baselib.scm:779
6. eval: <subr>
7. (<top-level>): <unknown location>
What version of the product are you using? On what operating system?
% mosh -V
Mosh R6RS scheme interpreter, version 0.2.7 (mosh-0.2.7 Tue, 14 Jun 2011
07:00:31 +0900)
Please provide any additional information below.
Original issue reported on code.google.com by ktakash...@gmail.com on 6 Nov 2014 at 6:19
Original issue reported on code.google.com by
ktakash...@gmail.com
on 6 Nov 2014 at 6:19