Function: ert-char-for-test-result

ert-char-for-test-result is a byte-compiled function defined in ert.el.gz.

Signature

(ert-char-for-test-result RESULT EXPECTEDP)

Documentation

Return a character that represents the test result RESULT.

EXPECTEDP specifies whether the result was expected.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/ert.el.gz
(defun ert-char-for-test-result (result expectedp)
  "Return a character that represents the test result RESULT.

EXPECTEDP specifies whether the result was expected."
  (let ((s (cl-etypecase result
             (ert-test-passed ".P")
             (ert-test-failed "fF")
             (ert-test-skipped "sS")
             (null "--")
             (ert-test-aborted-with-non-local-exit "aA")
             (ert-test-quit "qQ"))))
    (elt s (if expectedp 0 1))))