[functional-tests] only repeat failures if there are some :)
This commit is contained in:
parent
52f17c3230
commit
029db28b3b
@ -237,10 +237,11 @@
|
|||||||
(begin (inc! fail)
|
(begin (inc! fail)
|
||||||
(set! fail-keys (cons keys fail-keys))
|
(set! fail-keys (cons keys fail-keys))
|
||||||
(dsp "fail"))))))
|
(dsp "fail"))))))
|
||||||
(fmt #t nl (dsp "There were failures:") nl)
|
(unless (zero? fail)
|
||||||
(fmt-scenarios fail-keys
|
(fmt #t nl (dsp "There were failures:") nl)
|
||||||
(lambda (_)
|
(fmt-scenarios fail-keys
|
||||||
(dsp "fail")))
|
(lambda (_)
|
||||||
|
(dsp "fail"))))
|
||||||
(fmt #t (cat nl
|
(fmt #t (cat nl
|
||||||
(num pass)
|
(num pass)
|
||||||
(dsp "/")
|
(dsp "/")
|
||||||
|
Loading…
Reference in New Issue
Block a user