Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Nicer printing of test results
  • Loading branch information
sionescu committed Mar 31, 2012
1 parent 33a1bee commit 5f916ff
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion tests.lisp
Expand Up @@ -22,7 +22,7 @@
(dolist (*read-default-float-format* '(double-float single-float))
(let ((left (read-from-string value))
(right (parse-number value)))
(format t "~&~16@A (~16@A) = ~16A ~16A~%"
(format t "~&~18@S (~26@A) = ~26A ~20A~%"
value
left
right
Expand Down

0 comments on commit 5f916ff

Please sign in to comment.