1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
;;; chicanery#.scm -*- geiser-scheme-implementation: gambit; -*- (##include "~~lib/r7rs#.scm") (##namespace ("" ; extras list-map list-for-each list-append ref copy atom? read-port read-port-chunk-size defined? displayed ->string written print))