You want to append the contents of several files to a single file. For example you want the contents of the file foo.txt to be the contents of bar.txt and baz.txt. In the UNIX shell you might write:
(require (lib"port.ss"))
;; file-append : (U path string) ... -> void
;;
;; Copys the contents of the src files to dest
(define (file-appenddest . src)
)
input-port-append and copy-port are your friends.
To be completed