Index: Makefile ================================================================== --- Makefile +++ Makefile @@ -215,12 +215,12 @@ (export BASEPATH=/tmp/$(USER)/basepath ; export PATH="$(PWD)/datashare-testing:$(PATH)" ; xterm &) datashare-testing/spublish : spublish.scm $(OFILES) csc spublish.scm $(OFILES) -o datashare-testing/spublish -datashare-testing/sretrieve : sretrieve.scm common.o megatest-version.o margs.o configf.o - csc sretrieve.scm common.o megatest-version.o margs.o configf.o -o datashare-testing/sretrieve +datashare-testing/sretrieve : sretrieve.scm megatest-version.o margs.o configf.o process.o + csc sretrieve.scm megatest-version.o margs.o configf.o process.o -o datashare-testing/sretrieve sretrieve/sretrieve : datashare-testing/sretrieve csc -deploy -deployed sretrieve.scm megatest-version.o margs.o configf.o chicken-install -keep-installed $(PROXY) -deploy -prefix sretrieve defstruct srfi-18 format sql-de-lite \ srfi-1 posix regex regex-case srfi-69 Index: process.scm ================================================================== --- process.scm +++ process.scm @@ -13,11 +13,11 @@ ;; Process convience utils ;;====================================================================== (use regex) (declare (unit process)) -(declare (uses common)) +;;(declare (uses common)) (define (process:conservative-read port) (let loop ((res "")) (if (not (eof-object? (peek-char port))) (loop (conc res (read-char port)))