2e4653ea31
Co-authored-by: Pascal Kuthe <pascal.kuthe@semimod.de>
272 lines
3.3 KiB
Scheme
272 lines
3.3 KiB
Scheme
; Function calls
|
|
|
|
(appexpr
|
|
function: (appexpr
|
|
(atom
|
|
(qidentifier
|
|
[
|
|
(qvarid) @function
|
|
(qidop) @function
|
|
(identifier
|
|
[(varid) (idop)] @function)
|
|
])))
|
|
["(" (block) (fnexpr)])
|
|
|
|
(ntlappexpr
|
|
function: (ntlappexpr
|
|
(atom
|
|
(qidentifier
|
|
[
|
|
(qvarid) @function
|
|
(qidop) @function
|
|
(identifier
|
|
[(varid) (idop)] @function)
|
|
])))
|
|
["(" (block) (fnexpr)])
|
|
|
|
(appexpr
|
|
field: (atom
|
|
(qidentifier
|
|
[
|
|
(qvarid) @function
|
|
(qidop) @function
|
|
(identifier
|
|
[(varid) (idop)] @function)
|
|
])))
|
|
|
|
(appexpr
|
|
(appexpr
|
|
field: (atom
|
|
(qidentifier
|
|
[
|
|
(qvarid) @variable
|
|
(qidop) @variable
|
|
(identifier
|
|
[(varid) (idop)] @variable)
|
|
])))
|
|
"[")
|
|
|
|
(ntlappexpr
|
|
field: (atom
|
|
(qidentifier
|
|
[
|
|
(qvarid) @function
|
|
(qidop) @function
|
|
(identifier
|
|
[(varid) (idop)] @function)
|
|
])))
|
|
|
|
(ntlappexpr
|
|
(ntlappexpr
|
|
field: (atom
|
|
(qidentifier
|
|
[
|
|
(qvarid) @variable
|
|
(qidop) @variable
|
|
(identifier
|
|
[(varid) (idop)] @variable)
|
|
])))
|
|
"[")
|
|
|
|
[
|
|
"initially"
|
|
"finally"
|
|
] @function.special
|
|
|
|
; Function definitions
|
|
|
|
(puredecl
|
|
(funid
|
|
(identifier
|
|
[(varid) (idop)] @function)))
|
|
|
|
(fundecl
|
|
(funid
|
|
(identifier
|
|
[(varid) (idop)] @function)))
|
|
|
|
(operation
|
|
(identifier
|
|
[(varid) (idop)] @function))
|
|
|
|
; Identifiers
|
|
|
|
(puredecl
|
|
(binder
|
|
(identifier
|
|
[(varid) (idop)] @constant)))
|
|
|
|
; TODO: Highlight vars differently once helix has an appropriate highlight query
|
|
; for that purpose.
|
|
|
|
(pparameter
|
|
(pattern
|
|
(identifier
|
|
(varid) @variable.parameter)))
|
|
|
|
(paramid
|
|
(identifier
|
|
(varid) @variable.parameter))
|
|
|
|
(typedecl
|
|
"effect"
|
|
(varid) @type)
|
|
|
|
(typeid
|
|
(varid) @type)
|
|
|
|
(tbinder
|
|
(varid) @type)
|
|
|
|
(typecon
|
|
(varid) @type)
|
|
|
|
(qvarid
|
|
(qid) @namespace)
|
|
|
|
(modulepath (varid) @namespace)
|
|
|
|
(qconid) @namespace
|
|
|
|
(qidop) @namespace
|
|
|
|
(varid) @variable
|
|
|
|
(conid) @constructor
|
|
|
|
; Operators
|
|
|
|
[
|
|
"!"
|
|
"~"
|
|
"="
|
|
":="
|
|
(idop)
|
|
(op)
|
|
(qidop)
|
|
] @operator
|
|
|
|
; Keywords
|
|
|
|
[
|
|
"as"
|
|
"behind"
|
|
(externtarget)
|
|
"forall"
|
|
"handle"
|
|
"handler"
|
|
"in"
|
|
"infix"
|
|
"infixl"
|
|
"infixr"
|
|
"inject"
|
|
"mask"
|
|
"other"
|
|
"pub"
|
|
"public"
|
|
"some"
|
|
] @keyword
|
|
|
|
[
|
|
"con"
|
|
"control"
|
|
"ctl"
|
|
"fn"
|
|
"fun"
|
|
"rawctl"
|
|
"rcontrol"
|
|
] @keyword.function
|
|
|
|
"with" @keyword.control
|
|
|
|
[
|
|
"elif"
|
|
"else"
|
|
"if"
|
|
"match"
|
|
"then"
|
|
] @keyword.control.conditional
|
|
|
|
[
|
|
"import"
|
|
"include"
|
|
"module"
|
|
] @keyword.control.import
|
|
|
|
[
|
|
"alias"
|
|
"effect"
|
|
"struct"
|
|
"type"
|
|
"val"
|
|
"var"
|
|
] @keyword.storage.type
|
|
|
|
[
|
|
"abstract"
|
|
"co"
|
|
"extend"
|
|
"extern"
|
|
"fbip"
|
|
"final"
|
|
"fip"
|
|
"inline"
|
|
"linear"
|
|
"named"
|
|
"noinline"
|
|
"open"
|
|
"override"
|
|
"raw"
|
|
"rec"
|
|
"ref"
|
|
"reference"
|
|
"scoped"
|
|
"tail"
|
|
"value"
|
|
] @keyword.storage.modifier
|
|
|
|
"return" @keyword.control.return
|
|
|
|
; Delimiters
|
|
|
|
(matchrule "|" @punctuation.delimiter)
|
|
|
|
[
|
|
","
|
|
"->"
|
|
"."
|
|
":"
|
|
"::"
|
|
"<-"
|
|
";"
|
|
] @punctuation.delimiter
|
|
|
|
[
|
|
"<"
|
|
">"
|
|
"("
|
|
")"
|
|
"["
|
|
"]"
|
|
"{"
|
|
"}"
|
|
] @punctuation.bracket
|
|
|
|
; Literals
|
|
|
|
[
|
|
(string)
|
|
(char)
|
|
] @string
|
|
|
|
(escape) @constant.character.escape
|
|
|
|
(float) @constant.numeric.float
|
|
(int) @constant.numeric.integer
|
|
|
|
; Comment
|
|
|
|
[
|
|
(linecomment)
|
|
(blockcomment)
|
|
] @comment
|