chore: query formatting

This commit is contained in:
Pham Huy Hoang 2024-01-06 15:05:50 +09:00 committed by Christian Clason
parent 79975d6557
commit 57a8acf0c4
674 changed files with 18466 additions and 12648 deletions

View file

@ -1,19 +1,25 @@
(comment)+ @fold
(pod) @fold
; fold the block-typed package statements only
(package_statement (block)) @fold
(package_statement
(block)) @fold
[(subroutine_declaration_statement)
(conditional_statement)
(loop_statement)
(for_statement)
(cstyle_for_statement)
(block_statement)
(phaser_statement)] @fold
[
(subroutine_declaration_statement)
(conditional_statement)
(loop_statement)
(for_statement)
(cstyle_for_statement)
(block_statement)
(phaser_statement)
] @fold
(anonymous_subroutine_expression) @fold
; perhaps folks want to fold these too?
[(anonymous_array_expression)
(anonymous_hash_expression)] @fold
[
(anonymous_array_expression)
(anonymous_hash_expression)
] @fold

View file

@ -1,43 +1,84 @@
((source_file . (comment) @keyword.directive)
((source_file
.
(comment) @keyword.directive)
(#lua-match? @keyword.directive "^#!/"))
[ "use" "no" "require" ] @keyword.import
[
"use"
"no"
"require"
] @keyword.import
[ "if" "elsif" "unless" "else" ] @keyword.conditional
[
"if"
"elsif"
"unless"
"else"
] @keyword.conditional
(conditional_expression [ "?" ":" ] @keyword.conditional.ternary)
(conditional_expression
[
"?"
":"
] @keyword.conditional.ternary)
[ "while" "until" "for" "foreach" ] @keyword.repeat
[
"while"
"until"
"for"
"foreach"
] @keyword.repeat
"return" @keyword.return
"sub" @keyword.function
[ "map" "grep" "sort" ] @function.builtin
[
"map"
"grep"
"sort"
] @function.builtin
"package" @keyword.import
[
"do"
"my" "our" "local" "state"
"last" "next" "redo" "goto"
"my"
"our"
"local"
"state"
"last"
"next"
"redo"
"goto"
"undef"
] @keyword
(_ operator: _ @operator)
(_
operator: _ @operator)
"\\" @operator
(yadayada) @keyword.exception
(phaser_statement phase: _ @keyword.phaser)
(phaser_statement
phase: _ @keyword.phaser)
[
"or" "and"
"eq" "ne" "cmp" "lt" "le" "ge" "gt"
"or"
"and"
"eq"
"ne"
"cmp"
"lt"
"le"
"ge"
"gt"
"isa"
] @keyword.operator
(eof_marker) @keyword.directive
(data_section) @comment
(pod) @none
@ -48,10 +89,10 @@
] @number
[
(string_literal)
(interpolated_string_literal)
(quoted_word_list)
(command_string)
(string_literal)
(interpolated_string_literal)
(quoted_word_list)
(command_string)
(heredoc_content)
(replacement)
(transliteration_content)
@ -63,54 +104,69 @@
(heredoc_end)
] @label
[(escape_sequence) (escaped_delimiter)] @string.escape
[
(escape_sequence)
(escaped_delimiter)
] @string.escape
(_ modifiers: _ @character.special)
[
(quoted_regexp)
(match_regexp)
(regexp_content)
(_
modifiers: _ @character.special)
[
(quoted_regexp)
(match_regexp)
(regexp_content)
] @string.regexp
(autoquoted_bareword) @string.special
(use_statement (package) @type)
(package_statement (package) @type)
(require_expression (bareword) @type)
(use_statement
(package) @type)
(package_statement
(package) @type)
(require_expression
(bareword) @type)
(subroutine_declaration_statement
name: (bareword) @function)
(subroutine_declaration_statement name: (bareword) @function)
(attribute_name) @attribute
(attribute_value) @string
(label) @label
(statement_label label: _ @label)
(statement_label
label: _ @label)
(relational_expression operator: "isa" right: (bareword) @type)
(relational_expression
operator: "isa"
right: (bareword) @type)
(function_call_expression (function) @function.call)
(method_call_expression (method) @function.method.call)
(method_call_expression invocant: (bareword) @type)
(function_call_expression
(function) @function.call)
(func0op_call_expression function: _ @function.builtin)
(func1op_call_expression function: _ @function.builtin)
(method_call_expression
(method) @function.method.call)
(method_call_expression
invocant: (bareword) @type)
(func0op_call_expression
function: _ @function.builtin)
(func1op_call_expression
function: _ @function.builtin)
; this was a regex for the CLI
([(function)(expression_statement (bareword))] @function.builtin
(#any-of? @function.builtin
"accept" "atan2" "bind" "binmode" "bless" "crypt" "chmod" "chown" "connect"
"die" "dbmopen" "exec" "fcntl" "flock" "formline" "getpriority"
"getprotobynumber" "gethostbyaddr" "getnetbyaddr" "getservbyname"
"getservbyport" "getsockopt" "glob" "index" "ioctl" "join" "kill" "link"
"listen" "mkdir" "msgctl" "msgget" "msgrcv" "msgsend" "open" "opendir"
"print" "printf" "push" "pack" "pipe" "return" "rename" "rindex" "read"
"recv" "reverse" "say" "select" "seek" "semctl" "semget" "semop" "send"
"setpgrp" "setpriority" "seekdir" "setsockopt" "shmctl" "shmread" "shmwrite"
"shutdown" "socket" "socketpair" "split" "sprintf" "splice" "substr" "system"
"symlink" "syscall" "sysopen" "sysseek" "sysread" "syswrite" "tie" "truncate"
"unlink" "unpack" "utime" "unshift" "vec" "warn"
"waitpid"
))
([
(function)
(expression_statement
(bareword))
] @function.builtin
(#any-of? @function.builtin "accept" "atan2" "bind" "binmode" "bless" "crypt" "chmod" "chown" "connect" "die" "dbmopen" "exec" "fcntl" "flock" "formline" "getpriority" "getprotobynumber" "gethostbyaddr" "getnetbyaddr" "getservbyname" "getservbyport" "getsockopt" "glob" "index" "ioctl" "join" "kill" "link" "listen" "mkdir" "msgctl" "msgget" "msgrcv" "msgsend" "open" "opendir" "print" "printf" "push" "pack" "pipe" "return" "rename" "rindex" "read" "recv" "reverse" "say" "select" "seek" "semctl" "semget" "semop" "send" "setpgrp" "setpriority" "seekdir" "setsockopt" "shmctl" "shmread" "shmwrite" "shutdown" "socket" "socketpair" "split" "sprintf" "splice" "substr" "system" "symlink" "syscall" "sysopen" "sysseek" "sysread" "syswrite" "tie" "truncate" "unlink" "unpack" "utime" "unshift" "vec" "warn" "waitpid"))
(function) @function
@ -119,42 +175,86 @@
(varname)
"}" @punctuation.special)
(varname
(varname
(block
"{" @punctuation.special
"{" @punctuation.special
"}" @punctuation.special))
([(varname) (filehandle)] @variable.builtin
([
(varname)
(filehandle)
] @variable.builtin
(#any-of? @variable.builtin "ENV" "ARGV" "INC" "ARGVOUT" "SIG" "STDIN" "STDOUT" "STDERR" "a" "b" "_"))
((varname) @variable.builtin
; highlights all the reserved ^ vars like ${^THINGS}
(#lua-match? @variable.builtin "%^"))
((varname) @variable.builtin
; highlights punc vars and also numeric only like $11
(#lua-match? @variable.builtin "^%A+$"))
(scalar) @variable.scalar
(scalar_deref_expression [ "$" "*"] @variable.scalar)
[(array) (arraylen)] @variable.array
(array_deref_expression [ "@" "*"] @variable.array)
(scalar_deref_expression
[
"$"
"*"
] @variable.scalar)
[
(array)
(arraylen)
] @variable.array
(array_deref_expression
[
"@"
"*"
] @variable.array)
(hash) @variable.hash
(hash_deref_expression [ "%" "*"] @variable.hash)
(array_element_expression array:(_) @variable.array)
(slice_expression array:(_) @variable.array)
(keyval_expression array:(_) @variable.array)
(hash_deref_expression
[
"%"
"*"
] @variable.hash)
(hash_element_expression hash:(_) @variable.hash)
(slice_expression hash:(_) @variable.hash)
(keyval_expression hash:(_) @variable.hash)
(array_element_expression
array: (_) @variable.array)
(slice_expression
array: (_) @variable.array)
(keyval_expression
array: (_) @variable.array)
(hash_element_expression
hash: (_) @variable.hash)
(slice_expression
hash: (_) @variable.hash)
(keyval_expression
hash: (_) @variable.hash)
(comment) @comment
([ "=>" "," ";" "->" ] @punctuation.delimiter)
([
"=>"
","
";"
"->"
] @punctuation.delimiter)
(
[ "[" "]" "{" "}" "(" ")" ] @punctuation.bracket
([
"["
"]"
"{"
"}"
"("
")"
] @punctuation.bracket
; priority hack so nvim + ts-cli behave the same
(#set! "priority" 90))

View file

@ -1,14 +1,14 @@
; an injections.scm file for nvim-treesitter
((comment) @injection.content
(#set! injection.language "comment"))
(#set! injection.language "comment"))
((pod) @injection.content
(#set! injection.language "pod"))
(#set! injection.language "pod"))
((substitution_regexp
(replacement) @injection.content
(substitution_regexp_modifiers) @_modifiers)
; match if there's a single `e` in the modifiers list
; match if there's a single `e` in the modifiers list
(#lua-match? @_modifiers "e")
(#not-lua-match? @_modifiers "e.*e")
(#set! injection.language "perl"))