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

Highlight more complex function parameters

Browse source 
* lisp/progmodes/rust-ts-mode.el
(rust-ts-mode--fontify-parameter): New function.
(rust-ts-mode--font-lock-settings): Use it.
This commit is contained in:
Dmitry Gutov 2023-02-05 16:43:59 +02:00
parent 58dc03ba7e
commit 3ffd0eddce
1 changed files with 13 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
lisp/progmodes/rust-ts-mode.el
View file

@ -161,9 +161,7 @@
(macro_definition "macro_rules!" @font-lock-constant-face) (macro_definition "macro_rules!" @font-lock-constant-face)
(macro_definition (identifier) @font-lock-preprocessor-face) (macro_definition (identifier) @font-lock-preprocessor-face)
(field_declaration name: (field_identifier) @font-lock-property-face) (field_declaration name: (field_identifier) @font-lock-property-face)
(parameter pattern: (identifier) @font-lock-variable-name-face) (parameter) @rust-ts-mode--fontify-parameter)
(parameter
pattern: (reference_pattern (identifier) @font-lock-variable-name-face)))
:language 'rust :language 'rust
:feature 'function :feature 'function
@ -256,6 +254,18 @@
'((ERROR) @font-lock-warning-face)) '((ERROR) @font-lock-warning-face))
"Tree-sitter font-lock settings for `rust-ts-mode'.") "Tree-sitter font-lock settings for `rust-ts-mode'.")
(defalias 'rust-ts-mode--fontify-parameter
(and
(treesit-available-p)
`(lambda (node override start end &rest _)
(let ((captures (treesit-query-capture
(treesit-node-child-by-field-name node "pattern")
,(treesit-query-compile 'rust '((identifier) @id)))))
(pcase-dolist (`(_name . ,id) captures)
(treesit-fontify-with-override
(treesit-node-start id) (treesit-node-end id)
'font-lock-variable-name-face override start end))))))
(defun rust-ts-mode--defun-name (node) (defun rust-ts-mode--defun-name (node)
"Return the defun name of NODE. "Return the defun name of NODE.
Return nil if there is no name or if NODE is not a defun node." Return nil if there is no name or if NODE is not a defun node."