procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; Add treesit-no-parser error

Browse source 
* lisp/treesit.el (treesit-no-parser): New error.
(treesit-buffer-root-node): Use the new error.
This commit is contained in:
Yuan Fu 2022-12-24 14:48:50 -08:00
parent b6a2e1ddf6
commit 7f7def2ae6
No known key found for this signature in database
GPG key ID: 56E19BC57664A442
1 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
lisp/treesit.el
View file

@ -141,6 +141,9 @@ parser in `treesit-parser-list', or nil if there is no parser."
;;; Node API supplement
(define-error 'treesit-no-parser "No available parser for this buffer"
'treesit-error)
(defun treesit-node-buffer (node)
"Return the buffer in which NODE belongs."
(treesit-parser-buffer
@ -248,11 +251,10 @@ Use the first parser in `treesit-parser-list'.
If optional argument LANGUAGE is non-nil, use the first parser
for LANGUAGE."
(if-let ((parser
(or (if language
(treesit-parser-create language)
(or (car (treesit-parser-list))
(signal 'treesit-error
'("Buffer has no parser")))))))
(if language
(treesit-parser-create language)
(or (car (treesit-parser-list))
(signal 'treesit-no-parser (list (current-buffer)))))))
(treesit-parser-root-node parser)))
(defun treesit-filter-child (node pred &optional named)