@@ -20,11 +20,20 @@ ;;====================================================================== ;; Process convience utils ;;====================================================================== -(use regex directory-utils) +(import + regex directory-utils + chicken.condition + chicken.file + chicken.io + chicken.process + chicken.process-context.posix + chicken.string + srfi-18 +) (declare (unit process)) (define (process:conservative-read port) (let loop ((res "")) (if (not (eof-object? (peek-char port)))