Function: testcover-before

testcover-before is a byte-compiled function defined in testcover.el.gz.

Signature

(testcover-before BEFORE-INDEX)

Documentation

Update code coverage before a form is evaluated.

BEFORE-INDEX is the form's index into the code-coverage vector.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/testcover.el.gz
(defun testcover-before (before-index)
  "Update code coverage before a form is evaluated.
BEFORE-INDEX is the form's index into the code-coverage vector."
  (let ((before-entry (aref testcover-vector before-index)))
    (when (eq (car-safe before-entry) 'noreturn)
      (let* ((after-index (cdr before-entry)))
        (aset testcover-vector after-index 'edebug-ok-coverage)))))