Index: db.scm ================================================================== --- db.scm +++ db.scm @@ -1132,11 +1132,10 @@ (apply sqlite3:execute state-status-msg-stmt params)) ((test_data-pf-rollup) ;; (hash-table-set! rollups (car params) params)) (apply sqlite3:execute test_data-rollup-stmt params)) ((pass-fail-counts) - (debug:print 0 "INFO: pass fail count params are " params) (apply sqlite3:execute pass-fail-counts-stmt params)) ((register-test) (apply sqlite3:execute register-test-stmt params)) (else (debug:print 0 "ERROR: Queued entry not recognised " entry))))) Index: megatest.scm ================================================================== --- megatest.scm +++ megatest.scm @@ -804,10 +804,12 @@ ;;====================================================================== (if (not *didsomething*) (debug:print 0 help)) +;; (if *runremote* (rpc:close-all-connections!)) + (if (not (eq? *globalexitstatus* 0)) (if (or (args:get-arg "-runtests")(args:get-arg "-runall")) (begin (debug:print 0 "NOTE: Subprocesses with non-zero exit code detected: " *globalexitstatus*) (exit 0))