diff options
| author | Yuan Fu | 2023-11-09 20:49:30 -0800 |
|---|---|---|
| committer | Yuan Fu | 2023-11-09 20:49:30 -0800 |
| commit | 0db75b80e1ce54f3597f7d19468157fd5ec2bd71 (patch) | |
| tree | 27ee6e2f0bbee26f43b7020588f13eef5318680c /test/src | |
| parent | 1653389b5744606e04838cdede310ea76fba31f9 (diff) | |
| download | emacs-0db75b80e1ce54f3597f7d19468157fd5ec2bd71.tar.gz emacs-0db75b80e1ce54f3597f7d19468157fd5ec2bd71.zip | |
Add treesit-node-enclosed-p
* doc/lispref/parsing.texi (Accessing Node Information):
Add manual entry.
* lisp/treesit.el (treesit-node-enclosed-p): New function.
(treesit): Add shortdoc entry.
* test/src/treesit-tests.el (treesit-node-api): Add tests.
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/treesit-tests.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test/src/treesit-tests.el b/test/src/treesit-tests.el index 4308e4048f6..791e902bd0a 100644 --- a/test/src/treesit-tests.el +++ b/test/src/treesit-tests.el | |||
| @@ -166,6 +166,13 @@ | |||
| 166 | ;; `treesit-node-eq'. | 166 | ;; `treesit-node-eq'. |
| 167 | (should (treesit-node-eq root-node root-node)) | 167 | (should (treesit-node-eq root-node root-node)) |
| 168 | (should (not (treesit-node-eq root-node doc-node))) | 168 | (should (not (treesit-node-eq root-node doc-node))) |
| 169 | ;; `treesit-node-enclosed-p' | ||
| 170 | (should (treesit-node-enclosed-p '(1 . 3) '(1 . 4))) | ||
| 171 | (should (treesit-node-enclosed-p '(1 . 3) '(1 . 3))) | ||
| 172 | (should (not (treesit-node-enclosed-p '(1 . 3) '(1 . 4) t))) | ||
| 173 | (should (treesit-node-enclosed-p '(1 . 3) '(1 . 4) 'partial)) | ||
| 174 | (should (treesit-node-enclosed-p '(2 . 3) '(1 . 4) t)) | ||
| 175 | (should (treesit-node-enclosed-p object-node root-node)) | ||
| 169 | 176 | ||
| 170 | ;; Further test for `treesit-node-check'. | 177 | ;; Further test for `treesit-node-check'. |
| 171 | (treesit-parser-delete parser) | 178 | (treesit-parser-delete parser) |