Runs all tests for current configuration, or as
passed in via tests.
Source
circumspec/runner.clj:90
top
(defn run-tests
"Runs all tests for current configuration, or as
passed in via tests."
[& tests]
(let [tests (or (seq tests) (locator/tests))
start (System/nanoTime)
results (test-results tests)
report (config/report-function)]
;; report first, tally later so reports print incrementally
(report results)
(raw/dump-results results)
(let [tally (assoc (tally results) :nsec (- (System/nanoTime) start))]
(report-tally tally)
tally)))
Comments top
No comments for run-tests. Log in to add a comment.