(defn report-tally
[tally]
(let [{:keys [success failure error pending nsec]} tally]
(println
(apply format "%d success, %d failure, %d error, %d pending [%d msec]"
(map #(or % 0) [success failure error pending (quot nsec 1000000)])))))
Comments top
No comments for report-tally. Log in to add a comment.