Skip to content
This repository has been archived by the owner on Aug 13, 2020. It is now read-only.

Commit

Permalink
Tidying
Browse files Browse the repository at this point in the history
  • Loading branch information
@adlai
adlai committed Sep 1, 2009
1 parent 06210bf commit 365a4e3
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/explain.lisp
View file
Expand Up @@ -82,7 +82,7 @@
(values 0 nil 0 0 nil 0 0 nil 0 0 nil 0 0) (values 0 nil 0 0 nil 0 0 nil 0 0 nil 0 0)
(values (values
num-checks num-checks
passed (length passed) (floor (* 100 (/ (length passed) num-checks))) passed (length passed) (floor (* 100 (/ (length passed) num-checks)))
skipped (length skipped) (floor (* 100 (/ (length skipped) num-checks))) skipped (length skipped) (floor (* 100 (/ (length skipped) num-checks)))
failed (length failed) (floor (* 100 (/ (length failed) num-checks))) failed (length failed) (floor (* 100 (/ (length failed) num-checks)))
unknown (length unknown) (floor (* 100 (/ (length failed) num-checks))))))) unknown (length unknown) (floor (* 100 (/ (length failed) num-checks)))))))

0 comments on commit 365a4e3

Please sign in to comment.