[functional-tests] tweak output
This commit is contained in:
parent
5384d75351
commit
61c4a14c65
@ -236,11 +236,11 @@
|
|||||||
(dsp "pass"))
|
(dsp "pass"))
|
||||||
(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)
|
(fmt #t nl (dsp "There were failures:") nl)
|
||||||
(fmt-scenarios fail-keys
|
(fmt-scenarios fail-keys
|
||||||
(lambda (_)
|
(lambda (_)
|
||||||
(dsp "FAIL")))
|
(dsp "fail")))
|
||||||
(fmt #t (cat nl
|
(fmt #t (cat nl
|
||||||
(num pass)
|
(num pass)
|
||||||
(dsp "/")
|
(dsp "/")
|
||||||
|
Loading…
x
Reference in New Issue
Block a user