package tm-grammars

  1. Overview
  2. Docs
package tm-grammars
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file tm_grammar_raku.ml

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
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
let lang_id = "raku"
let json = {json|{
  "displayName": "Raku",
  "name": "raku",
  "patterns": [
    {
      "begin": "^=begin",
      "end": "^=end",
      "name": "comment.block.perl"
    },
    {
      "begin": "(^[\\t ]+)?(?=#)",
      "beginCaptures": {
        "1": {
          "name": "punctuation.whitespace.comment.leading.perl"
        }
      },
      "end": "(?!\\G)",
      "patterns": [
        {
          "begin": "#",
          "beginCaptures": {
            "0": {
              "name": "punctuation.definition.comment.perl"
            }
          },
          "end": "\\n",
          "name": "comment.line.number-sign.perl"
        }
      ]
    },
    {
      "captures": {
        "1": {
          "name": "storage.type.class.perl.6"
        },
        "3": {
          "name": "entity.name.type.class.perl.6"
        }
      },
      "match": "(class|enum|grammar|knowhow|module|package|role|slang|subset)(\\s+)(((?:::|')?([$A-Z_a-zÀ-ÿ])([$0-9A-Z\\\\_a-zÀ-ÿ]|[-'][$0-9A-Z_a-zÀ-ÿ])*)+)",
      "name": "meta.class.perl.6"
    },
    {
      "begin": "(?<=\\s)'",
      "beginCaptures": {
        "0": {
          "name": "punctuation.definition.string.begin.perl"
        }
      },
      "end": "'",
      "endCaptures": {
        "0": {
          "name": "punctuation.definition.string.end.perl"
        }
      },
      "name": "string.quoted.single.perl",
      "patterns": [
        {
          "match": "\\\\['\\\\]",
          "name": "constant.character.escape.perl"
        }
      ]
    },
    {
      "begin": "\"",
      "beginCaptures": {
        "0": {
          "name": "punctuation.definition.string.begin.perl"
        }
      },
      "end": "\"",
      "endCaptures": {
        "0": {
          "name": "punctuation.definition.string.end.perl"
        }
      },
      "name": "string.quoted.double.perl",
      "patterns": [
        {
          "match": "\\\\[\"\\\\abefnrt]",
          "name": "constant.character.escape.perl"
        }
      ]
    },
    {
      "begin": "q(q|to|heredoc)*\\s*:?(q|to|heredoc)*\\s*/(.+)/",
      "end": "\\3",
      "name": "string.quoted.single.heredoc.perl"
    },
    {
      "begin": "([Qq])(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*:?(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*\\{\\{",
      "end": "}}",
      "name": "string.quoted.double.heredoc.brace.perl",
      "patterns": [
        {
          "include": "#qq_brace_string_content"
        }
      ]
    },
    {
      "begin": "([Qq])(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*:?(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*\\(\\(",
      "end": "\\)\\)",
      "name": "string.quoted.double.heredoc.paren.perl",
      "patterns": [
        {
          "include": "#qq_paren_string_content"
        }
      ]
    },
    {
      "begin": "([Qq])(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*:?(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*\\[\\[",
      "end": "]]",
      "name": "string.quoted.double.heredoc.bracket.perl",
      "patterns": [
        {
          "include": "#qq_bracket_string_content"
        }
      ]
    },
    {
      "begin": "([Qq])(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*:?(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*\\{",
      "end": "}",
      "name": "string.quoted.single.heredoc.brace.perl",
      "patterns": [
        {
          "include": "#qq_brace_string_content"
        }
      ]
    },
    {
      "begin": "([Qq])(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*:?(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*/",
      "end": "/",
      "name": "string.quoted.single.heredoc.slash.perl",
      "patterns": [
        {
          "include": "#qq_slash_string_content"
        }
      ]
    },
    {
      "begin": "([Qq])(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*:?(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*\\(",
      "end": "\\)",
      "name": "string.quoted.single.heredoc.paren.perl",
      "patterns": [
        {
          "include": "#qq_paren_string_content"
        }
      ]
    },
    {
      "begin": "([Qq])(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*:?(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*\\[",
      "end": "]",
      "name": "string.quoted.single.heredoc.bracket.perl",
      "patterns": [
        {
          "include": "#qq_bracket_string_content"
        }
      ]
    },
    {
      "begin": "([Qq])(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*:?(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*'",
      "end": "'",
      "name": "string.quoted.single.heredoc.single.perl",
      "patterns": [
        {
          "include": "#qq_single_string_content"
        }
      ]
    },
    {
      "begin": "([Qq])(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*:?(x|exec|w|words|ww|quotewords|v|val|q|single|qq|double|s|scalar|a|array|h|hash|f|function|c|closure|b|blackslash|regexp|substr|trans|codes|p|path)*\\s*\"",
      "end": "\"",
      "name": "string.quoted.single.heredoc.double.perl",
      "patterns": [
        {
          "include": "#qq_double_string_content"
        }
      ]
    },
    {
      "match": "\\b\\$\\w+\\b",
      "name": "variable.other.perl"
    },
    {
      "match": "\\b(macro|sub|submethod|method|multi|proto|only|rule|token|regex|category)\\b",
      "name": "storage.type.declare.routine.perl"
    },
    {
      "match": "\\b(self)\\b",
      "name": "variable.language.perl"
    },
    {
      "match": "\\b(use|require)\\b",
      "name": "keyword.other.include.perl"
    },
    {
      "match": "\\b(if|else|elsif|unless)\\b",
      "name": "keyword.control.conditional.perl"
    },
    {
      "match": "\\b(let|my|our|state|temp|has|constant)\\b",
      "name": "storage.type.variable.perl"
    },
    {
      "match": "\\b(for|loop|repeat|while|until|gather|given)\\b",
      "name": "keyword.control.repeat.perl"
    },
    {
      "match": "\\b(take|do|when|next|last|redo|return|contend|maybe|defer|default|exit|make|continue|break|goto|leave|async|lift)\\b",
      "name": "keyword.control.flowcontrol.perl"
    },
    {
      "match": "\\b(is|as|but|trusts|of|returns|handles|where|augment|supersede)\\b",
      "name": "storage.modifier.type.constraints.perl"
    },
    {
      "match": "\\b(BEGIN|CHECK|INIT|START|FIRST|ENTER|LEAVE|KEEP|UNDO|NEXT|LAST|PRE|POST|END|CATCH|CONTROL|TEMP)\\b",
      "name": "meta.function.perl"
    },
    {
      "match": "\\b(die|fail|try|warn)\\b",
      "name": "keyword.control.control-handlers.perl"
    },
    {
      "match": "\\b(prec|irs|ofs|ors|export|deep|binary|unary|reparsed|rw|parsed|cached|readonly|defequiv|will|ref|copy|inline|tighter|looser|equiv|assoc|required)\\b",
      "name": "storage.modifier.perl"
    },
    {
      "match": "\\b(NaN|Inf)\\b",
      "name": "constant.numeric.perl"
    },
    {
      "match": "\\b(oo|fatal)\\b",
      "name": "keyword.other.pragma.perl"
    },
    {
      "match": "\\b(Object|Any|Junction|Whatever|Capture|MatchSignature|Proxy|Matcher|Package|Module|ClassGrammar|Scalar|Array|Hash|KeyHash|KeySet|KeyBagPair|List|Seq|Range|Set|Bag|Mapping|Void|UndefFailure|Exception|Code|Block|Routine|Sub|MacroMethod|Submethod|Regex|Str|str|Blob|Char|ByteCodepoint|Grapheme|StrPos|StrLen|Version|NumComplex|num|complex|Bit|bit|bool|True|FalseIncreasing|Decreasing|Ordered|Callable|AnyCharPositional|Associative|Ordering|KeyExtractorComparator|OrderingPair|IO|KitchenSink|RoleInt|int1??|int2|int4|int8|int16|int32|int64Rat|rat1??|rat2|rat4|rat8|rat16|rat32|rat64Buf|buf1??|buf2|buf4|buf8|buf16|buf32|buf64UInt|uint1??|uint2|uint4|uint8|uint16|uint32uint64|Abstraction|utf8|utf16|utf32)\\b",
      "name": "support.type.perl6"
    },
    {
      "match": "\\b(div|xx?|mod|also|leg|cmp|before|after|eq|ne|le|lt|not|gt|ge|eqv|fff??|and|andthen|or|xor|orelse|extra|lcm|gcd)\\b",
      "name": "keyword.operator.perl"
    },
    {
      "match": "([$%\\&@])([!*:=?^~]|(<(?=.+>)))?([$A-Z_a-zÀ-ÿ])([$0-9A-Z_a-zÀ-ÿ]|[-'][$0-9A-Z_a-zÀ-ÿ])*",
      "name": "variable.other.identifier.perl.6"
    },
    {
      "match": "\\b(eager|hyper|substr|index|rindex|grep|map|sort|join|lines|hints|chmod|split|reduce|min|max|reverse|truncate|zip|cat|roundrobin|classify|first|sum|keys|values|pairs|defined|delete|exists|elems|end|kv|any|all|one|wrap|shape|key|value|name|pop|push|shift|splice|unshift|floor|ceiling|abs|exp|log|log10|rand|sign|sqrt|sin|cos|tan|round|strand|roots|cis|unpolar|polar|atan2|pick|chop|p5chop|chomp|p5chomp|lc|lcfirst|uc|ucfirst|capitalize|normalize|pack|unpack|quotemeta|comb|samecase|sameaccent|chars|nfd|nfc|nfkd|nfkc|printf|sprintf|caller|evalfile|run|runinstead|nothing|want|bless|chr|ord|gmtime|time|eof|localtime|gethost|getpw|chroot|getlogin|getpeername|kill|fork|wait|perl|graphs|codes|bytes|clone|print|open|read|write|readline|say|seek|close|opendir|readdir|slurp|spurt|shell|run|pos|fmt|vec|link|unlink|symlink|uniq|pair|asin|atan|sec|cosec|cotan|asec|acosec|acotan|sinh|cosh|tanh|asinh|done|acosh??|atanh|sech|cosech|cotanh|sech|acosech|acotanh|asech|ok|nok|plan_ok|dies_ok|lives_ok|skip|todo|pass|flunk|force_todo|use_ok|isa_ok|diag|is_deeply|isnt|like|skip_rest|unlike|cmp_ok|eval_dies_ok|nok_error|eval_lives_ok|approx|is_approx|throws_ok|version_lt|plan|EVAL|succ|pred|times|nonce|once|signature|new|connect|operator|undef|undefine|sleep|from|to|infix|postfix|prefix|circumfix|postcircumfix|minmax|lazy|count|unwrap|getc|pi|e|context|void|quasi|body|each|contains|rewinddir|subst|can|isa|flush|arity|assuming|rewind|callwith|callsame|nextwith|nextsame|attr|eval_elsewhere|none|srand|trim|trim_start|trim_end|lastcall|WHAT|WHERE|HOW|WHICH|VAR|WHO|WHENCE|ACCEPTS|REJECTS|not|true|iterator|by|re|im|invert|flip|gist|flat|tree|is-prime|throws_like|trans)\\b",
      "name": "support.function.perl"
    }
  ],
  "repository": {
    "qq_brace_string_content": {
      "begin": "\\{",
      "end": "}",
      "patterns": [
        {
          "include": "#qq_brace_string_content"
        }
      ]
    },
    "qq_bracket_string_content": {
      "begin": "\\[",
      "end": "]",
      "patterns": [
        {
          "include": "#qq_bracket_string_content"
        }
      ]
    },
    "qq_double_string_content": {
      "begin": "\"",
      "end": "\"",
      "patterns": [
        {
          "include": "#qq_double_string_content"
        }
      ]
    },
    "qq_paren_string_content": {
      "begin": "\\(",
      "end": "\\)",
      "patterns": [
        {
          "include": "#qq_paren_string_content"
        }
      ]
    },
    "qq_single_string_content": {
      "begin": "'",
      "end": "'",
      "patterns": [
        {
          "include": "#qq_single_string_content"
        }
      ]
    },
    "qq_slash_string_content": {
      "begin": "\\\\/",
      "end": "\\\\/",
      "patterns": [
        {
          "include": "#qq_slash_string_content"
        }
      ]
    }
  },
  "scopeName": "source.perl.6"
}|json}