Function: treesit-hs-block-end

treesit-hs-block-end is a byte-compiled function defined in treesit.el.gz.

Signature

(treesit-hs-block-end)

Documentation

Tree-sitter implementation of hs-block-end-regexp.

Source Code

;; Defined in /usr/src/emacs/lisp/treesit.el.gz
;;; Hideshow mode

(defun treesit-hs-block-end ()
  "Tree-sitter implementation of `hs-block-end-regexp'."
  (let* ((pred (bound-and-true-p hs-treesit-things))
         (thing (treesit-thing-at
                 (if (bobp) (point) (1- (point))) pred))
         (end (when thing (treesit-node-end thing)))
         (last (when thing (treesit-node-child thing -1)))
         (beg (treesit-node-start (or last thing))))
    (when (and thing (eq (point) end))
      (set-match-data (list beg end))
      t)))