diff options
| author | Yuan Fu | 2022-11-21 13:34:38 -0800 |
|---|---|---|
| committer | Yuan Fu | 2022-11-21 13:34:38 -0800 |
| commit | 3f37f6b43565242db4409022dd9bc980cb86c3f6 (patch) | |
| tree | a4ebc61a9a2b6820db921b4979e1e5025c8fdc0c /test/src | |
| parent | eb1a35adc1c5a1a9d14ec8594580c5eb0e3d28fe (diff) | |
| download | emacs-3f37f6b43565242db4409022dd9bc980cb86c3f6.tar.gz emacs-3f37f6b43565242db4409022dd9bc980cb86c3f6.zip | |
; * test/src/treesit-tests.el (treesit-misc): Remove test.
This test is for treesit--setting-for-mode, which is removed when we
switched from using treesit-settings to using separate major modes.
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/treesit-tests.el | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/test/src/treesit-tests.el b/test/src/treesit-tests.el index c736f97e312..59264722bac 100644 --- a/test/src/treesit-tests.el +++ b/test/src/treesit-tests.el | |||
| @@ -522,27 +522,6 @@ visible_end.)" | |||
| 522 | (insert "]") | 522 | (insert "]") |
| 523 | (should (treesit-node-check array-node 'outdated)))) | 523 | (should (treesit-node-check array-node 'outdated)))) |
| 524 | 524 | ||
| 525 | (ert-deftest treesit-misc () | ||
| 526 | "Misc helper functions." | ||
| 527 | (skip-unless (treesit-available-p)) | ||
| 528 | (let ((settings '((t 0 t) | ||
| 529 | (c-mode 1 t) | ||
| 530 | (text-mode 2 nil) | ||
| 531 | (prog-mode 3 t) | ||
| 532 | (fundamental-mode 4 t)))) | ||
| 533 | ;; `treesit--setting-for-mode'. | ||
| 534 | ;; Exact match. | ||
| 535 | (should (eq 1 (treesit--setting-for-mode 'c-mode settings))) | ||
| 536 | ;; Inherit from t. | ||
| 537 | (should (eq 0 (treesit--setting-for-mode 'non-exist settings))) | ||
| 538 | ;; Inherit from prog-mode rather than fundamental-mode. | ||
| 539 | (require 'elisp-mode) | ||
| 540 | (should (eq 3 (treesit--setting-for-mode 'emacs-lisp-mode settings))) | ||
| 541 | ;; Not inherit from text-mode. | ||
| 542 | (require 'outline) | ||
| 543 | (should (not (eq 2 (treesit--setting-for-mode 'outline-mode settings)))) | ||
| 544 | )) | ||
| 545 | |||
| 546 | ;; TODO | 525 | ;; TODO |
| 547 | ;; - Functions in treesit.el | 526 | ;; - Functions in treesit.el |
| 548 | ;; - treesit-load-name-override-list | 527 | ;; - treesit-load-name-override-list |