aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRoi Martin2025-09-21 12:18:03 +0200
committerJuri Linkov2025-09-21 19:49:20 +0300
commit203faa6e42f49a6428e34dfb52ac755d4095b968 (patch)
tree1fc801b3fe56e6f02f11665fe5cf0587691270c0
parent2ae54a8b17f42329c69c3d9d3c4bd8895b35f81c (diff)
downloademacs-203faa6e42f49a6428e34dfb52ac755d4095b968.tar.gz
emacs-203faa6e42f49a6428e34dfb52ac755d4095b968.zip
Suffix tree-sitter cache variables with "-cached"
* lisp/progmodes/cmake-ts-mode.el (cmake-ts-mode--indent-rules) (cmake-ts-mode--indent-rules-cached, cmake-ts-mode--font-lock-settings) (cmake-ts-mode--font-lock-settings-cached): * lisp/progmodes/go-ts-mode.el (go-ts-mode--font-lock-settings) (go-ts-mode--font-lock-settings-cached): * lisp/progmodes/js.el (js--treesit-indent-rules) (js--treesit-indent-rules-cached, js--treesit-font-lock-settings) (js--treesit-font-lock-settings-cached): Suffix tree-sitter cache variables with "-cached" (bug#79363).
-rw-r--r--lisp/progmodes/cmake-ts-mode.el24
-rw-r--r--lisp/progmodes/go-ts-mode.el12
-rw-r--r--lisp/progmodes/js.el24
3 files changed, 30 insertions, 30 deletions
diff --git a/lisp/progmodes/cmake-ts-mode.el b/lisp/progmodes/cmake-ts-mode.el
index 8e49b18f731..9625b0f0330 100644
--- a/lisp/progmodes/cmake-ts-mode.el
+++ b/lisp/progmodes/cmake-ts-mode.el
@@ -61,16 +61,16 @@
61 table) 61 table)
62 "Syntax table for `cmake-ts-mode'.") 62 "Syntax table for `cmake-ts-mode'.")
63 63
64(defvar cmake-ts-mode--indent-rules nil 64(defvar cmake-ts-mode--indent-rules-cached nil
65 "Tree-sitter indent rules for `cmake-ts-mode'.") 65 "Cached tree-sitter indent rules for `cmake-ts-mode'.")
66 66
67(defun cmake-ts-mode--indent-rules () 67(defun cmake-ts-mode--indent-rules ()
68 "Return tree-sitter indent rules for `cmake-ts-mode'. 68 "Return tree-sitter indent rules for `cmake-ts-mode'.
69 69
70Tree-sitter indent rules are evaluated the first time this function 70Tree-sitter indent rules are evaluated the first time this function is
71is called. Subsequent calls return the first evaluated value." 71called. Subsequent calls return the first evaluated value."
72 (or cmake-ts-mode--indent-rules 72 (or cmake-ts-mode--indent-rules-cached
73 (setq cmake-ts-mode--indent-rules 73 (setq cmake-ts-mode--indent-rules-cached
74 `((cmake 74 `((cmake
75 ((node-is ")") parent-bol 0) 75 ((node-is ")") parent-bol 0)
76 ((node-is "else_command") parent-bol 0) 76 ((node-is "else_command") parent-bol 0)
@@ -148,16 +148,16 @@ Check if a node type is available, then return the right font lock rules."
148 eol)) 148 eol))
149 @font-lock-constant-face)))))))) 149 @font-lock-constant-face))))))))
150 150
151(defvar cmake-ts-mode--font-lock-settings nil 151(defvar cmake-ts-mode--font-lock-settings-cached nil
152 "Tree-sitter font-lock settings for `cmake-ts-mode'.") 152 "Cached tree-sitter font-lock settings for `cmake-ts-mode'.")
153 153
154(defun cmake-ts-mode--font-lock-settings () 154(defun cmake-ts-mode--font-lock-settings ()
155 "Return tree-sitter font-lock settings for `cmake-ts-mode'. 155 "Return tree-sitter font-lock settings for `cmake-ts-mode'.
156 156
157Tree-sitter font-lock rules are evaluated the first time this function 157Tree-sitter font-lock settings are evaluated the first time this
158is called. Subsequent calls return the first evaluated value." 158function is called. Subsequent calls return the first evaluated value."
159 (or cmake-ts-mode--font-lock-settings 159 (or cmake-ts-mode--font-lock-settings-cached
160 (setq cmake-ts-mode--font-lock-settings 160 (setq cmake-ts-mode--font-lock-settings-cached
161 (treesit-font-lock-rules 161 (treesit-font-lock-rules
162 :language 'cmake 162 :language 'cmake
163 :feature 'bracket 163 :feature 'bracket
diff --git a/lisp/progmodes/go-ts-mode.el b/lisp/progmodes/go-ts-mode.el
index 1b44478f41a..91664a4de48 100644
--- a/lisp/progmodes/go-ts-mode.el
+++ b/lisp/progmodes/go-ts-mode.el
@@ -162,16 +162,16 @@
162 (ignore-errors 162 (ignore-errors
163 (or (treesit-query-string "" '((method_elem) @cap) 'go) t))) 163 (or (treesit-query-string "" '((method_elem) @cap) 'go) t)))
164 164
165(defvar go-ts-mode--font-lock-settings nil 165(defvar go-ts-mode--font-lock-settings-cached nil
166 "Tree-sitter font-lock settings for `go-ts-mode'.") 166 "Cached tree-sitter font-lock settings for `go-ts-mode'.")
167 167
168(defun go-ts-mode--font-lock-settings () 168(defun go-ts-mode--font-lock-settings ()
169 "Return tree-sitter font-lock settings for `go-ts-mode'. 169 "Return tree-sitter font-lock settings for `go-ts-mode'.
170 170
171Tree-sitter font-lock rules are evaluated the first time this function 171Tree-sitter font-lock settings are evaluated the first time this
172is called. Subsequent calls return the first evaluated value." 172function is called. Subsequent calls return the first evaluated value."
173 (or go-ts-mode--font-lock-settings 173 (or go-ts-mode--font-lock-settings-cached
174 (setq go-ts-mode--font-lock-settings 174 (setq go-ts-mode--font-lock-settings-cached
175 (treesit-font-lock-rules 175 (treesit-font-lock-rules
176 :language 'go 176 :language 'go
177 :feature 'bracket 177 :feature 'bracket
diff --git a/lisp/progmodes/js.el b/lisp/progmodes/js.el
index 0fda7d62145..5e54383cd9f 100644
--- a/lisp/progmodes/js.el
+++ b/lisp/progmodes/js.el
@@ -3513,16 +3513,16 @@ characters of the current line."
3513 node parent bol args) 3513 node parent bol args)
3514 js-indent-level))) 3514 js-indent-level)))
3515 3515
3516(defvar js--treesit-indent-rules nil 3516(defvar js--treesit-indent-rules-cached nil
3517 "Tree-sitter indent rules for `js-ts-mode'.") 3517 "Cached tree-sitter indent rules for `js-ts-mode'.")
3518 3518
3519(defun js--treesit-indent-rules () 3519(defun js--treesit-indent-rules ()
3520 "Return tree-sitter indent rules for `js-ts-mode'. 3520 "Return tree-sitter indent rules for `js-ts-mode'.
3521 3521
3522Tree-sitter indent rules are evaluated the first time this function 3522Tree-sitter indent rules are evaluated the first time this function is
3523is called. Subsequent calls return the first evaluated value." 3523called. Subsequent calls return the first evaluated value."
3524 (or js--treesit-indent-rules 3524 (or js--treesit-indent-rules-cached
3525 (setq js--treesit-indent-rules 3525 (setq js--treesit-indent-rules-cached
3526 `((javascript 3526 `((javascript
3527 ((parent-is "program") parent-bol 0) 3527 ((parent-is "program") parent-bol 0)
3528 ((node-is "}") standalone-parent 0) 3528 ((node-is "}") standalone-parent 0)
@@ -3595,16 +3595,16 @@ is called. Subsequent calls return the first evaluated value."
3595 "&&" "||" "!") 3595 "&&" "||" "!")
3596 "JavaScript operators for tree-sitter font-locking.") 3596 "JavaScript operators for tree-sitter font-locking.")
3597 3597
3598(defvar js--treesit-font-lock-settings nil 3598(defvar js--treesit-font-lock-settings-cached nil
3599 "Tree-sitter font-lock settings for `js-ts-mode'.") 3599 "Cached tree-sitter font-lock settings for `js-ts-mode'.")
3600 3600
3601(defun js--treesit-font-lock-settings () 3601(defun js--treesit-font-lock-settings ()
3602 "Return tree-sitter font-lock settings for `js-ts-mode'. 3602 "Return tree-sitter font-lock settings for `js-ts-mode'.
3603 3603
3604Tree-sitter font-lock rules are evaluated the first time this function 3604Tree-sitter font-lock settings are evaluated the first time this
3605is called. Subsequent calls return the first evaluated value." 3605function is called. Subsequent calls return the first evaluated value."
3606 (or js--treesit-font-lock-settings 3606 (or js--treesit-font-lock-settings-cached
3607 (setq js--treesit-font-lock-settings 3607 (setq js--treesit-font-lock-settings-cached
3608 (treesit-font-lock-rules 3608 (treesit-font-lock-rules
3609 3609
3610 :language 'javascript 3610 :language 'javascript