Function: cider-test-echo-summary

cider-test-echo-summary is a byte-compiled function defined in cider-test.el.

Signature

(cider-test-echo-summary SUMMARY RESULTS &optional ELAPSED-TIME)

Documentation

Echo SUMMARY statistics for a test run returning RESULTS in ELAPSED-TIME.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260414.1619/cider-test.el
(defun cider-test-echo-summary (summary results &optional elapsed-time)
  "Echo SUMMARY statistics for a test run returning RESULTS in ELAPSED-TIME."
  (nrepl-dbind-response summary (ns test var fail error)
    (if (nrepl-dict-empty-p results)
        (message (concat (propertize "No assertions (or no tests) were run." 'face 'cider-test-error-face)
                         "Did you forget to use `is' in your tests?"))
      (let* ((ms (nrepl-dict-get elapsed-time "ms"))
             (ms (if ms
                     (propertize (format " in %s ms" ms ) 'face 'font-lock-comment-face)
                   ".")))
        (message (propertize
                  "%sRan %d assertions, in %d test functions. %d failures, %d errors%s"
                  'face (cond ((not (zerop error)) 'cider-test-error-face)
                              ((not (zerop fail))  'cider-test-failure-face)
                              (t                   'cider-test-success-face)))
                 (concat (if (= 1 ns)     ; ns count from summary
                             (cider-propertize (car (nrepl-dict-keys results)) 'ns)
                           (propertize (format "%d namespaces" ns) 'face 'default))
                         (propertize ": " 'face 'default))
                 test var fail error ms)))))