Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

; Fix recently added treesit tests

Browse source 
* test/src/treesit-tests.el (treesit-linecol-basic)
(treesit-linecol-search-back-across-newline)
(treesit-linecol-col-same-line): Skip tests if tree-sitter is not
available.
This commit is contained in:
Eli Zaretskii 2025-05-05 15:07:28 +03:00
parent 9261d353cc
commit b84e306be7
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
test/src/treesit-tests.el
View file

@ -228,6 +228,7 @@
(ert-deftest treesit-linecol-basic ()
"Tests for basic lincol synchronization."
(skip-unless (fboundp 'treesit--linecol-cache))
(with-temp-buffer
(should (equal (treesit--linecol-cache)
'(:line 0 :col 0 :bytepos 0)))
@ -271,6 +272,7 @@
(ert-deftest treesit-linecol-search-back-across-newline ()
"Search for newline backwards."
(skip-unless (fboundp 'treesit--linecol-at))
(with-temp-buffer
(insert "\n ")
(treesit--linecol-cache-set 2 1 3)
@ -280,6 +282,7 @@
(ert-deftest treesit-linecol-col-same-line ()
"Test col calculation when cache and target pos is in the same line."
(skip-unless (fboundp 'treesit--linecol-at))
(with-temp-buffer
(insert "aaaaaa")
(treesit--linecol-cache-set 1 5 6)