(defn dot [result] (cond (fail? result) (failure-string \F) (error? result) (error-string \E) (pending? result) (pending-string \P) :default (success-string \.)))
Comments top
No comments for dot. Log in to add a comment.