1
0
mirror of https://github.com/janet-lang/janet synced 2024-06-21 12:43:15 +00:00

Update test helper to be even les noisy.

This commit is contained in:
Calvin Rose 2021-11-06 11:20:09 -05:00
parent 0284df503f
commit 2aa1ccdd76

View File

@ -34,10 +34,10 @@
(defn start-suite [x]
(set suite-num x)
(set start-time (os/clock))
(eprint "Running test suite " x " tests..."))
(eprint "Starting suite " x "..."))
(defn end-suite []
(def delta (- (os/clock) start-time))
(eprintf "Test suite %d finished in %.3f seconds" suite-num delta)
(eprinf "Finished suite %d in %.3f seconds - " suite-num delta)
(eprint num-tests-passed " of " num-tests-run " tests passed.")
(if (not= num-tests-passed num-tests-run) (os/exit 1)))