Function: treesit--cleanup-local-range-overlays

treesit--cleanup-local-range-overlays is a byte-compiled function defined in treesit.el.gz.

Signature

(treesit--cleanup-local-range-overlays MODIFIED-TICK BEG END)

Documentation

Cleanup overlays used to mark local parsers between BEG and END.

For every local parser overlay between BEG and END, if its treesit-parser-ov-timestamp is smaller than MODIFIED-TICK, delete it.

Source Code

;; Defined in /usr/src/emacs/lisp/treesit.el.gz
(defun treesit--cleanup-local-range-overlays (modified-tick beg end)
  "Cleanup overlays used to mark local parsers between BEG and END.

For every local parser overlay between BEG and END, if its
`treesit-parser-ov-timestamp' is smaller than MODIFIED-TICK, delete
it."
  ;; Refer to (ref:local-parser-overlay) for more explanation of local
  ;; parser overlays.
  (dolist (ov (overlays-in beg end))
    (when-let* ((ov-timestamp
                 (overlay-get ov 'treesit-parser-ov-timestamp)))
      (when (< ov-timestamp modified-tick)
        (let ((local-parser (overlay-get ov 'treesit-parser))
              (local-p (overlay-get ov 'treesit-parser-local-p)))
          (when (and local-p local-parser)
            (treesit-parser-delete local-parser)))
        (delete-overlay ov)))))