[r6rs-discuss] Typos

[Abdulaziz Ghuloum]

Hello,

Section 1.13 and example D.2.2 both have incorrect programs using put- 
bytes, get-bytes-all, and not flushing the output port.  The  
following can be used instead:

(import (rnrs base) (rnrs io ports) (rnrs programs))

(let ([p (standard-output-port)])
   (put-bytevector p
     (call-with-port
       (open-file-input-port
          (cadr (command-line)))
           get-bytevector-all))
   (flush-output-port p))

Aziz,,,