# Using with-*-port $ csi -s gz.scm Error: (z3:read-decoded) can not read encoded data - Bad message Call history: (##core#begin (print "hello")) gz.scm:3 (print "hello") gz.scm:2 (with-output-to-port (z3:open-compressed-output-file "hello.gz") (lambda () (print "hello"))) gz.scm:2 (z3:open-compressed-output-file "hello.gz") gz.scm:3 (print "hello") gz.scm:4 (with-input-from-port (z3:open-compressed-input-file "hello.gz") (lambda () (print (read-line)))) gz.scm:4 (z3:open-compressed-input-file "hello.gz") gz.scm:5 (lambda () (print (read-line))) gz.scm:5 (##core#lambda () (print (read-line))) (##core#begin (print (read-line))) gz.scm:5 (print (read-line)) gz.scm:5 (read-line) gz.scm:4 (with-input-from-port (z3:open-compressed-input-file "hello.gz") (lambda () (print (read-line)))) gz.scm:4 (z3:open-compressed-input-file "hello.gz") gz.scm:5 (print (read-line)) gz.scm:5 (read-line) <-- # Without with-*-port $ csi -s gz.scm hello