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,,,
_______________________________________________
r6rs-discuss mailing list
[email protected]
http://lists.r6rs.org/cgi-bin/mailman/listinfo/r6rs-discuss
