blob: 741f5e544dcfb5f51d33755aa90957c1df7efec7 (
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
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
|
; Attributes
; module declaration
(attribute
name: (atom) @keyword
(arguments (atom) @namespace)
(#match? @keyword "(module|behaviou?r)"))
(attribute
name: (atom) @keyword
(arguments
.
(atom) @namespace)
(#eq? @keyword "import"))
(attribute
name: (atom) @keyword
(arguments
.
[(atom) @type (macro)]
[
(tuple (atom)? @variable.other.member)
(tuple
(binary_operator
left: (atom) @variable.other.member
operator: ["=" "::"]))
(tuple
(binary_operator
left:
(binary_operator
left: (atom) @variable.other.member
operator: "=")
operator: "::"))
])
(#eq? @keyword "record"))
(attribute
name: (atom) @keyword
(arguments
.
[
(atom) @constant
(variable) @constant
(call
function:
[(variable) (atom)] @keyword.directive)
])
(#eq? @keyword "define"))
(attribute
name: (atom) @keyword
(arguments
(_) @keyword.directive)
(#match? @keyword "ifn?def"))
(attribute
name: (atom) @keyword
module: (atom) @namespace
(#match? @keyword "(spec|callback)"))
; Functions
(function_clause name: (atom) @function)
(call module: (atom) @namespace)
(call function: (atom) @function)
(stab_clause name: (atom) @function)
(function_capture module: (atom) @namespace)
(function_capture function: (atom) @function)
; Macros
(macro
"?"+ @constant
name: (_) @constant
!arguments)
(macro
"?"+ @keyword.directive
name: (_) @keyword.directive)
; Ignored variables
((variable) @comment.discard
(#match? @comment.discard "^_"))
; Parameters
; specs
((attribute
name: (atom) @keyword
(stab_clause
pattern: (arguments (variable) @variable.parameter)
body: (variable)? @variable.parameter))
(#match? @keyword "(spec|callback)"))
; functions
(function_clause pattern: (arguments (variable) @variable.parameter))
; anonymous functions
(stab_clause pattern: (arguments (variable) @variable.parameter))
; parametric types
((attribute
name: (atom) @keyword
(arguments
(binary_operator
left: (call (arguments (variable) @variable.parameter))
operator: "::")))
(#match? @keyword "(type|opaque)"))
; macros
((attribute
name: (atom) @keyword
(arguments
(call (arguments (variable) @variable.parameter))))
(#eq? @keyword "define"))
; Records
(record_content
(binary_operator
left: (atom) @variable.other.member
operator: "="))
(record field: (atom) @variable.other.member)
(record name: (atom) @type)
; Keywords
(attribute name: (atom) @keyword)
["case" "fun" "if" "of" "when" "end" "receive" "try" "catch" "after" "begin" "maybe"] @keyword
; Operators
(binary_operator
left: (atom) @function
operator: "/"
right: (integer) @constant.numeric.integer)
((binary_operator operator: _ @keyword.operator)
(#match? @keyword.operator "^\\w+$"))
((unary_operator operator: _ @keyword.operator)
(#match? @keyword.operator "^\\w+$"))
(binary_operator operator: _ @operator)
(unary_operator operator: _ @operator)
["/" ":" "->"] @operator
; Comments
(tripledot) @comment.discard
[(comment) (line_comment) (shebang)] @comment
; Basic types
(variable) @variable
((atom) @constant.builtin.boolean
(#match? @constant.builtin.boolean "^(true|false)$"))
(atom) @string.special.symbol
(string) @string
(character) @constant.character
(integer) @constant.numeric.integer
(float) @constant.numeric.float
; Punctuation
["," "." "-" ";"] @punctuation.delimiter
["(" ")" "#" "{" "}" "[" "]" "<<" ">>"] @punctuation.bracket
; (ERROR) @error
|
