benbot/nvim-treesitter
1
0
Fork 0
mirror of https://github.com/nvim-treesitter/nvim-treesitter.git synced 2026-07-03 03:56:52 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

highlights(commonlisp): use any-of?

Browse source
This commit is contained in:
Stephan Seitz 2021-05-16 23:01:47 +02:00 • committed by Stephan Seitz
parent 048317174c
commit 355d1e54ab
1 changed files with 46 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

48
queries/commonlisp/highlights.scm
View file

@ -111,7 +111,39 @@
.
(sym_lit) @function.macro
;; For a complete and more efficient version install theHamsta/nvim-treesitter-commonlisp
(#match? @function.macro "^(let|function|the|unwind-protect|labels|flet|tagbody|go|(symbol-)?macrolet|progn|prog1|error|or|and|defvar|defparameter|in-package|defpackage|[e]?(type)?case|defstruct|defclass|if|if-let|when-let|when|unless|cond|switch|declaim|optimize)[*]?$"))
(#match? @function.macro
"let"
"function"
"the"
"unwind-protect"
"labels"
"flet"
"tagbody"
"go"
"symbol-macrolet"
"symbol-macrolet"
"progn"
"prog1"
"error"
"or"
"and"
"defvar"
"defparameter"
"in-package"
"defpackage"
"case"
"ecase"
"typecase"
"etypecase"
"defstruct"
"defclass"
"if"
"when"
"unless"
"cond"
"switch"
"declaim"
"optimize"))
;; constant
((sym_lit) @constant
@ -127,7 +159,19 @@
.
(sym_lit) @function.builtin
;; For a complete and more efficient version install theHamsta/nvim-treesitter-commonlisp
(#match? @function.builtin "^(mapcar|reduce|remove-if-not|cons|car|last|nth|equal[p]?|cdr|first|rest|format)$"))
(#any-of? @function.builtin
"mapcar"
"reduce"
"remove-if-not"
"cons"
"car"
"last"
"nth"
"equal"
"cdr"
"first"
"rest"
"format"))
(list_lit
.