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
|
Description="Modula2"
-- Syntax file created by Benjamin Kowarsch
Categories = {"source"}
Keywords={
{ Id=1,
List={"GENERIC", "AND", "ARRAY", "BEGIN", "BY", "CASE", "CONST",
"DEFINITION", "DIV", "DO", "ELSE", "ELSIF", "END", "EXCEPT", "EXIT",
"EXPORT", "FINALLY", "FOR", "FORWARD", "FROM", "IF", "IMPLEMENTATION",
"IMPORT", "IN", "LOOP", "MOD", "MODULE", "NOT", "OF", "OR", "PACKEDSET",
"POINTER", "PROCEDURE", "QUALIFIED", "RECORD", "REM", "REPEAT", "RETRY",
"RETURN", "SET", "THEN", "TO", "TYPE", "UNTIL", "VAR", "WHILE", "WITH"},
},
{ Id=2,
List={"ABS", "BITSET", "BOOLEAN", "CAP", "CARDINAL", "CHAR", "CHR",
"DEC", "DISPOSE", "EXCL", "FALSE", "FLOAT", "HALT", "HIGH", "INC",
"INCL", "INTEGER", "LONGCARD", "LONGINT", "LONGREAL", "MAX", "MIN", "NEW",
"NIL", "ODD", "ORD", "PROC", "REAL", "SIZE", "TRUE", "TRUNC", "TSIZE",
"VAL"},
},
{ Id=3,
Regex=[[(\w+?)\s*\(]],
},
-- Modula dialect selector
{ Id=4,
Regex=[[ \(\*\!m2(r10|iso)\*\) ]], Group=0
},
}
Strings={
Delimiter=[["|']],
}
Comments={
{ Block=true,
Nested=false,
Delimiter= { [[\(\*]],[[\*\)]],}
}
}
IgnoreCase=false
Operators=[[\(|\)|\[|\]|\{|\}|\,|\;|\:|\&|<|>|\!|\=|\/|\*|\%|\+|\-]]
function OnStateChange(oldState, newState, token, kwID)
if newState==HL_KEYWORD and kwID==4 then
-- ISO additional reserved words
if token=="(*!m2iso*)" then
AddKeyword("CMPLX", 2)
AddKeyword("COMPLEX", 2)
AddKeyword("IM", 2)
AddKeyword("INT", 2)
AddKeyword("INTERRUPTIBLE", 2)
AddKeyword("LENGTH", 2)
AddKeyword("LFLOAT", 2)
AddKeyword("LONGCOMPLEX", 2)
AddKeyword("PROTECTION", 2)
AddKeyword("RE", 2)
AddKeyword("UNINTERRUBTIBLE", 2)
end
-- R10 additional reserved words
if token=="(*!m2r10*)" then
AddKeyword("ENUM", 1)
AddKeyword("IMMUTABLE", 1)
AddKeyword("IS", 1)
AddKeyword("OPAQUE", 1)
AddKeyword("VARIADIC", 1)
AddKeyword("BYCOPY", 1)
AddKeyword("BYREF", 1)
AddKeyword("CLASS", 1)
AddKeyword("CONTINUE", 1)
AddKeyword("CRITICAL", 1)
AddKeyword("INOUT", 1)
AddKeyword("METHOD", 1)
AddKeyword("ON", 1)
AddKeyword("OPTIONAL", 1)
AddKeyword("OUT", 1)
AddKeyword("PRIVATE", 1)
AddKeyword("PROTECTED", 1)
AddKeyword("PROTOCOL", 1)
AddKeyword("PUBLIC", 1)
AddKeyword("SUPER", 1)
AddKeyword("TRY", 1)
AddKeyword("INRANGE", 2)
AddKeyword("LENGTH", 2)
AddKeyword("OCTET", 2)
AddKeyword("PRED", 2)
AddKeyword("READ", 2)
AddKeyword("SUCC", 2)
AddKeyword("TMAX", 2)
AddKeyword("TMIN", 2)
AddKeyword("WRITE", 2)
AddKeyword("UNICHAR", 2)
AddKeyword("WRITEF", 2)
AddKeyword("UNICHAR", 2)
AddKeyword("OBJECT", 2)
AddKeyword("YES", 2)
AddKeyword("NO", 2)
end
end
return newState
end
|
