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
|
#
# eFTE mode for Icon (http://www.cs.arizona.edu/icon/)
#
colorize ICON {
SyntaxParser = "SIMPLE";
color {
{ "Normal", "Editor_Default" },
{ "Function", "Lang_Function" },
{ "Number", "Lang_DecimalNumber" },
{ "Comment", "Lang_Comment" },
{ "String", "Lang_String" },
{ "Punctuation", "Lang_Punctuation" },
};
keyword "Editor_Keywords" {
"break", "by",
"case", "create",
"default", "do",
"else", "end", "every",
"fail",
"global",
"if", "initial", "invocable",
"link", "local",
"next", "not",
"of",
"procedure",
"record", "repeat", "return",
"static", "suspend",
"then", "to",
"until",
"while"
};
keyword "Editor_Keywords2" {
"&allocated", "&ascii",
"&clock", "&collections", "&cset", "¤t",
"&date", "&dateline", "&digits", "&dump",
"&e", "&error", "&errornumber", "&errortext", "&errorvalue", "&errout",
"&fail", "&features", "&file",
"&host",
"&input",
"&lcase", "&letters", "&level", "&line",
"&main",
"&null",
"&output",
"&phi", "&pi", "&pos", "&progname",
"&random", "®ions",
"&source", "&storage", "&subject",
"&time", "&trace",
"&ucase",
"&version"
};
keyword "Editor_Keywords3" {
"$define",
"$else", "$endif", "$error",
"$ifdef", "$ifndef", "$include",
"$line",
"$undef",
"_MACINTOSH", "_MSDOS", "_MSDOS_386", "_MS_WINDOWS_NT",
"_OS2", "_UNIX", "_VMS", "_WINDOW_FUNCTIONS", "_MS_WINDOWS",
"_X_WINDOW_SYSTEM", "_PIPES", "_SYSTEM_FUNCTION"
};
h_state 0 { "Normal" }
h_trans { 1, "-s", /_a-zA-Z&$/, "Normal" }
h_trans { 2, "<", "#", "Comment" }
h_trans { 3, "", "\"", "String" }
h_trans { 4, "", "'", "String" }
h_trans { 5, "s", "-+0-9eE+-", "Number" }
h_trans { 0, "S", /_a-zA-Z0-9&$/, "Punctuation" }
h_state 1 { "Normal" }
h_trans { 0, "$", "", "Normal" }
h_wtype { 1, 1, 0, "", /_a-zA-Z0-9&$/ }
h_state 2 { "Comment" }
h_trans { 0, "$", "", "String" }
h_state 3 { "String" }
h_trans { 0, "", "\"", "String" }
h_trans { 0, "$", "", "String" }
h_trans { 3, "Qq", "\\", "String" }
h_state 4 { "String" }
h_trans { 0, "", "'", "String" }
h_trans { 0, "$", "", "String" }
h_trans { 4, "Qq", "\\", "String" }
h_state 5 { "Number" }
h_trans { 0, "-S", "-+0-9eE+-", "Normal" }
h_trans { 0, "$", "", "Normal" }
}
mode ICON: SOURCE {
FileNameRx = /\c\.icn$/;
HilitOn = 1;
Colorizer = "ICON";
AutoIndent = 1;
IndentMode = "PLAIN";
MatchCase = 1;
Trim = 1;
MultiLineHilit = 1;
AutoHilitParen = 1;
SaveFolds = 0;
RoutineRegexp = /^\s*{{procedure}}\s+/;
}
oinclude 'mym_icon.fte';
|
