Function: treesit-hs-find-block-beginning

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

Signature

(treesit-hs-find-block-beginning)

Documentation

Tree-sitter implementation of hs-find-block-beginning-function.

Source Code

;; Defined in /usr/src/emacs/lisp/treesit.el.gz
(defun treesit-hs-find-block-beginning ()
  "Tree-sitter implementation of `hs-find-block-beginning-function'."
  (let* ((pred (bound-and-true-p hs-treesit-things))
         (thing (treesit-thing-at (point) pred))
         (beg (when thing (treesit-node-start thing)))
         (end (when beg (min (1+ beg) (point-max)))))
    (when thing
      (goto-char beg)
      (set-match-data (list beg end))
      t)))