get-bytevector-n! raises an error

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

seanjensengrey / mosh-scheme

get-bytevector-n! raises an error #245