Function: json--check-position

json--check-position is a byte-compiled function defined in json.el.gz.

Signature

(json--check-position POSITION)

Documentation

Check if the last parsed JSON structure passed POSITION.

Used internally by json-path-to-position.

Source Code

;; Defined in /usr/src/emacs/lisp/json.el.gz
(defun json--check-position (position)
  "Check if the last parsed JSON structure passed POSITION.
Used internally by `json-path-to-position'."
  (let ((start (caar json--path)))
    (when (< start position (1+ (point)))
      (throw :json-path (list :path (nreverse (mapcar #'cdr json--path))
                              :match-start start
                              :match-end (point)))))
  (pop json--path))