@@ -66,11 +66,11 @@ (repository-path libpath))) ;;(declare (uses mtconfigf)) -(use (prefix mtconfigf configf:)) +;; (use (prefix mtconfigf configf:)) ;;(configf:add-eval-string "(use common)") (include "common_records.scm") @@ -272,14 +272,10 @@ ;; This is a cache of pre-reqs met, don't re-calc in cases where called with same params less than ;; five seconds ago (define *pre-reqs-met-cache* (make-hash-table)) -;; cache of verbosity given string -;; -(define *verbosity-cache* (make-hash-table)) - (define (common:clear-caches) (set! *target* (make-hash-table)) (set! *keys* (make-hash-table)) (set! *keyvals* (make-hash-table)) (set! *toptest-paths* (make-hash-table))