blob: fba44359f1af858246e9855929608d43a4bdd833 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
((atom) @constant (#set! "priority" "90"))
(var) @variable
(char) @character
(integer) @number
(float) @float
(comment) @comment
;; keyword
[
"fun"
"div"
] @keyword
;; bracket
[
"("
")"
"{"
"}"
"["
"]"
"#"
] @punctuation.bracket
;;; Comparisons
[
"=="
"=:="
"=/="
"=<"
">="
"<"
">"
] @operator ;; .comparison
;;; operator
[
":"
":="
"!"
;; "-"
"+"
"="
"->"
"=>"
"|"
] @operator
[
","
"."
";"
] @punctuation.delimiter
;; conditional
([
"receive"
"if"
"case"
"of"
"when"
"after"
"end"
] @conditional (#set! "priority" 95))
[
"catch"
"try"
] @exception
((atom) @boolean (#any-of? @boolean "true" "false"))
;; Macros
((macro_call_expr) @constant.macro (#set! "priority" 101))
;; Preprocessor
(pp_define
lhs: _ @constant.macro (#set! "priority" 101)
)
(_preprocessor_directive) @preproc (#set! "priority" 99)
;; Attributes
(pp_include) @include
(pp_include_lib) @include
(export_attribute) @include
(export_type_attribute) @type.definition
(export_type_attribute types: (fa fun: _ @type (#set! "priority" 101)))
(behaviour_attribute) @include
(module_attribute (atom) @namespace) @include
(wild_attribute name: (attr_name name: _ @attribute)) @attribute
;; Records
(record_expr) @type
(record_field_expr _ @field) @type
(record_field_name _ @field) @type
(record_name "#" @type name: _ @type) @type
(record_decl name: _ @type) @type.definition
(record_field name: _ @field)
(record_field name: _ @field ty: _ @type)
;; Type alias
(type_alias name: _ @type) @type.definition
(spec) @type.definition
(comment) @comment
[(string) (binary)] @string
;;; expr_function_call
(call expr: [(atom) (remote) (var)] @function)
(call (atom) @exception (#any-of? @exception "error" "throw" "exit"))
;;; Parenthesized expression: (SomeFunc)(), only highlight the parens
(call
expr: (paren_expr "(" @function.call ")" @function.call)
)
;;; function
(external_fun) @function.call
(internal_fun fun: (atom) @function.call)
(function_clause name: (atom) @function)
(fa fun: (atom) @function)
|
