Function: erts-mode--preceding-spec

erts-mode--preceding-spec is a byte-compiled function defined in erts-mode.el.gz.

Signature

(erts-mode--preceding-spec NAME)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/erts-mode.el.gz
(defun erts-mode--preceding-spec (name)
  (save-excursion
    ;; Find the name, but skip if it's in a test.
    (while (and (re-search-backward (format "^%s:" name)  nil t)
                (erts-mode--in-test-p (point))))
    (and (not (erts-mode--in-test-p (point)))
         (re-search-forward "^=-=$" nil t)
         (progn
           (goto-char (match-beginning 0))
           (cdr (assq (intern (downcase name))
                      (ert--erts-specifications (point))))))))