Skip to content

L
lis.pl
Commit 40049148 authored by Juergen Nickelsen's avatar Juergen Nickelsen
Browse files
Options

better FAIL output formatting

parent 8ff1e9d8
Hide whitespace changes
Inline Side-by-side
Showing with 1 addition and 1 deletion
tests/run-tests.lisp
View file @ 40049148
......@@ -33,7 +33,7 @@ the evaluation of FORM and VALUE are equal."
(format t "%d tests, %d FAILS" ntests (length fails))
(dolist (err (reverse fails))
(format t " \"%s:%s\"" (cdr err) (car err)))
(format t "\n FAIL \"%s:%s\"" (cdr err) (car err)))
(terpri)
(when fails
(exit 1))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment