@@ -37,10 +37,11 @@ (define *waiting-queue* (make-hash-table)) (define *globalexitstatus* 0) ;; attempt to work around possible thread issues (define *passnum* 0) ;; when running track calls to run-tests or similar (define *verbosity* 1) (define *rpc:listener* #f) ;; if set up for server communication this will hold the tcp port +(define *runremote* #f) ;; if set up for server communication this will hold (define (get-with-default val default) (let ((val (args:get-arg val))) (if val val default)))