Function: lisp--match-hidden-arg

lisp--match-hidden-arg is a byte-compiled function defined in lisp-mode.el.gz.

Signature

(lisp--match-hidden-arg LIMIT)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/lisp-mode.el.gz
;;;; Font-lock support.

(defun lisp--match-hidden-arg (limit)
  (let ((res nil))
    (forward-line 0)
    (while
        (let ((ppss (parse-partial-sexp (point)
                                        (line-end-position)
                                        -1)))
          (skip-syntax-forward " )")
          (if (or (>= (car ppss) 0)
                  (eolp)
                  (looking-at ";")
                  (nth 8 (syntax-ppss))) ;Within a string or comment.
              (progn
                (forward-line 1)
                (< (point) limit))
            (looking-at ".*")           ;Set the match-data.
	    (forward-line 1)
            (setq res (point))
            nil)))
    res))