chore: update queries from nvim-treesitter

Author: clason

queries/query/highlights.scm

@@ -5,17 +5,17 @@
 (capture
   (identifier) @type)
 
-(anonymous_node
-  (string) @string)
-
 (predicate
   name: (identifier) @function.call)
 
 (named_node
   name: (identifier) @variable)
 
+(missing_node
+  name: (identifier) @variable)
+
 (field_definition
-  name: (identifier) @property)
+  name: (identifier) @variable.member)
 
 (negated_field
   "!" @operator
@@ -36,14 +36,22 @@
   ")"
 ] @punctuation.bracket
 
-":" @punctuation.delimiter
+[
+  ":"
+  "/"
+] @punctuation.delimiter
 
 [
   "@"
   "#"
 ] @punctuation.special
 
-"_" @constant
+(predicate
+  "." @punctuation.special)
+
+"_" @character.special
+
+"MISSING" @keyword
 
 ((parameters
   (identifier) @number)
@@ -53,19 +61,28 @@
   .
   (comment)*
   .
-  (comment) @keyword.import)
+  (comment) @keyword.import @nospell)
   (#lua-match? @keyword.import "^;+ *inherits *:"))
 
 ((program
   .
   (comment)*
   .
-  (comment) @keyword.directive)
+  (comment) @keyword.directive @nospell)
   (#lua-match? @keyword.directive "^;+ *extends *$"))
 
-((comment) @keyword.directive
+((comment) @keyword.directive @nospell
   (#lua-match? @keyword.directive "^;+%s*format%-ignore%s*$"))
 
+((predicate
+  name: (identifier) @_name
+  parameters: (parameters
+    .
+    (capture)?
+    .
+    (identifier) @property))
+  (#eq? @_name "set"))
+
 ((predicate
   name: (identifier) @_name
   parameters: (parameters

queries/query/injections.scm

@@ -1,28 +1,28 @@
 ((predicate
   name: (identifier) @_name
   parameters: (parameters
-    (string) @injection.content))
-  (#any-of? @_name "match" "not-match" "vim-match" "not-vim-match")
-  (#set! injection.language "regex")
-  (#offset! @injection.content 0 1 0 -1))
+    (string
+      (string_content) @injection.content)))
+  (#any-of? @_name "match" "not-match" "any-match" "vim-match" "not-vim-match" "any-vim-match")
+  (#set! injection.language "regex"))
 
 ((predicate
   name: (identifier) @_name
   parameters: (parameters
-    (string) @injection.content))
-  (#any-of? @_name "lua-match" "not-lua-match")
-  (#set! injection.language "luap")
-  (#offset! @injection.content 0 1 0 -1))
+    (string
+      (string_content) @injection.content)))
+  (#any-of? @_name "lua-match" "not-lua-match" "any-lua-match")
+  (#set! injection.language "luap"))
 
 ((predicate
   name: (identifier) @_name
   parameters: (parameters
-    (string) @injection.content
+    (string
+      (string_content) @injection.content)
     .
     (string) .))
   (#any-of? @_name "gsub" "not-gsub")
-  (#set! injection.language "luap")
-  (#offset! @injection.content 0 1 0 -1))
+  (#set! injection.language "luap"))
 
 ((comment) @injection.content
   (#set! injection.language "comment"))

test/highlight/statements.scm

@@ -11,16 +11,16 @@
 ;        ^ @type
 
 name: (identifier)
-; <- @property
+; <- @variable.member
 ;   ^ @punctuation.delimiter
 
 (program
   name: (_))
-;        ^ @constant
+;        ^ @character.special
 
 (program
   name: _)
-;       ^ @constant
+;       ^ @character.special
 
 (program
   field: (identifier) @capture