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
|
filetype: forth
detect:
filename: "\\.(forth|4th|fs|fs8|ft|fth|frt)$"
rules:
- identifier: "\\b[A-Za-z_0-9-]*\\b"
- statement: "\\b(?i:(if|else|then|do|loop|case|endcase|of|endof|begin|while|repeat|until|again|unloop|leave|exit|done|next|\\?do|\\+do|\\-do|\\+loop|\\-loop|\\?leave))\\b"
- statement: "(^:|;$)"
- type: "\\b(?i:(variable|constant|cells))\\b"
- special: "\\B[?.]\\B" #for some reason, \b and \B are inverted for symbols
- constant.number: "\\b[0-9]+\\b"
- constant.string:
start: "\\b([Ss.]\" )"
end: "\""
rules: []
- comment:
start: "\\("
end: "\\)"
rules:
- todo: "(TODO|NOTE|XXX|FIXME):?"
- comment:
start: "\\\\"
end: "$"
rules:
- todo: "(TODO|NOTE|XXX|FIXME):?"
|
