@@ -143,18 +143,16 @@ ) ;; fake out readline usage of toplevel-command (define (toplevel-command . a) #f) -(define setenv set-environment-variable!) -(define unsetenv unset-environment-variable!) (define *db* #f) ;; this is only for the repl, do not use in general!!!! -(include "common_records.scm") +;; (include "common_records.scm") ;; (include "key_records.scm") -(include "db_records.scm") +;; (include "db_records.scm") (include "run_records.scm") ;; (include "test_records.scm") (include "common.scm") (include "db.scm")