Function: testcover-analyze-coverage-compose

testcover-analyze-coverage-compose is a byte-compiled function defined in testcover.el.gz.

Signature

(testcover-analyze-coverage-compose FORMS FUNC)

Documentation

Analyze a list of FORMS for code coverage using FUNC.

The list is 1valued if all of its constituent elements are also 1valued.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/testcover.el.gz
(defun testcover-analyze-coverage-compose (forms func)
  "Analyze a list of FORMS for code coverage using FUNC.
The list is 1valued if all of its constituent elements are also 1valued."
  (let ((result 'testcover-1value))
    (while (consp forms)
      (setq result (testcover-coverage-combine result (funcall func (car forms))))
      (setq forms (cdr forms)))
    (when forms
      (setq result (testcover-coverage-combine result (funcall func forms))))
    result))