Function: erts-mode--match-not-in-test

erts-mode--match-not-in-test is a byte-compiled function defined in erts-mode.el.gz.

Signature

(erts-mode--match-not-in-test LIMIT)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/erts-mode.el.gz
(defun erts-mode--match-not-in-test (_limit)
  (when (erts-mode--in-test-p (point))
    (erts-mode--end-of-test))
  (let ((start (point)))
    (goto-char
     (if (re-search-forward "^=-=$" nil t)
         (match-beginning 0)
       (point-max)))
    (if (< (point) start)
        nil
      ;; Here we disregard LIMIT so that we may extend the area again.
      (set-match-data (list start (point)))
      (point))))