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
|
# m4
=Idle
=Comment green
=Constant cyan
=Var magenta
=Brace bold magenta
=Kw bold
:start Idle
* start noeat call=.m4()
.subr m4
.ifdef quote
:idle Constant
.else
:idle Idle
.endif
* idle
"[" idle recolor=-1 call=.m4(quote -brace)
# "[" idle recolor=-1 call=.quote()
"a-zA-Z_" ident buffer mark
.ifdef quote
"]" idle return
.endif
.ifdef brace
")" endbrace recolor=-1
.endif
:quote Constant
* quote
"]" idle
:endbrace Brace
* idle noeat return
.ifdef quote
:ident Constant
.else
:ident Idle
.endif
* maybe_macro noeat strings
"builtin" maybe_kw
"changecom" maybe_kw
"changequote" maybe_kw
"changeword" maybe_kw
"debugfile" maybe_kw
"debugmode" maybe_kw
"decr" maybe_kw
"define" maybe_kw
"defn" maybe_kw
"divert" maybe_kw
"divnum" maybe_kw
"dnl" comment
"dumpdef" maybe_kw
"errprint" maybe_kw
"esyscmd" maybe_kw
"eval" maybe_kw
"file" maybe_kw
"format" maybe_kw
"ifdef" maybe_kw
"ifelse" maybe_kw
"include" maybe_kw
"incr" maybe_kw
"index" maybe_kw
"indir" maybe_kw
"len" maybe_kw
"line" maybe_kw
"m4exit" maybe_kw
"m4wrap" maybe_kw
"maketemp" maybe_kw
"patsubst" maybe_kw
"popdef" maybe_kw
"pushdef" maybe_kw
"regexp" maybe_kw
"shift" maybe_kw
"sinclude" maybe_kw
"substr" maybe_kw
"syscmd" maybe_kw
"sysval" maybe_kw
"traceoff" maybe_kw
"traceon" maybe_kw
"translit" maybe_kw
"undefine" maybe_kw
"undivert" maybe_kw
done
"a-zA-Z0-9_" ident
:maybe_macro Idle
* idle noeat
"(" macro recolormark noeat
:maybe_kw Idle
* idle noeat
"(" kw recolormark noeat
:kw Kw
* idle noeat
"(" macro noeat
:comment Comment
* comment
"\n" idle
:macro Var
* idle noeat
"(" brace recolor=-1
:brace Brace
* idle noeat call=.m4(brace -quote)
.end
.subr quote
:idle Constant
* idle
"]" idle return
"[" idle call=.quote()
.end
|
