-
Notifications
You must be signed in to change notification settings - Fork 4
/
Pascal.tmLanguage
197 lines (195 loc) · 5.25 KB
/
Pascal.tmLanguage
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
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>fileTypes</key>
<array>
<string>pas</string>
<string>dpr</string>
<string>lpr</string>
<string>pp</string>
<string>p</string>
</array>
<key>foldingStartMarker</key>
<string>\b(?i:(function|package|procedure|try|type))\b</string>
<key>foldingStopMarker</key>
<string>\b(?i:(end))\b</string>
<key>keyEquivalent</key>
<string>^~P</string>
<key>name</key>
<string>Pascal</string>
<key>patterns</key>
<array>
<dict>
<key>match</key>
<string>\b(?i:(absolute|abstract|all|and|and_then|array|as|asm|assembler|attribute|begin|bindable|case|class|const|constructor|destructor|delay|div|do|downto|else|end|except|export|exports|external|far|file|finalization|finally|for|forward|goto|if|inc|implementation|import|in|index|inherited|initialization|inline|interface|interrupt|is|label|library|mod|module|near|nil|not|object|of|only|operator|or|or_else|otherwise|packed|pow|private|property|protected|public|published|qualified|record|repeat|resident|restricted|segment|set|shl|shr|then|to|try|type|unit|until|uses|value|var|view|virtual|while|with|xor|write|writeln))\b</string>
<key>name</key>
<string>keyword.control.pascal</string>
</dict>
<dict>
<key>captures</key>
<dict>
<key>1</key>
<dict>
<key>name</key>
<string>storage.type.prototype.pascal</string>
</dict>
<key>2</key>
<dict>
<key>name</key>
<string>entity.name.function.prototype.pascal</string>
</dict>
</dict>
<key>match</key>
<string>\b(?i:(function|procedure))\b\s+(\w+(\.\w+)?)(\(.*?\))?;\s*(?=(?i:attribute|forward|external))</string>
<key>name</key>
<string>meta.function.prototype.pascal</string>
</dict>
<dict>
<key>captures</key>
<dict>
<key>1</key>
<dict>
<key>name</key>
<string>storage.type.function.pascal</string>
</dict>
<key>2</key>
<dict>
<key>name</key>
<string>entity.name.function.pascal</string>
</dict>
</dict>
<key>match</key>
<string>\b(?i:(function|procedure|program))\b\s+(\w+(\.\w+)?)</string>
<key>name</key>
<string>meta.function.pascal</string>
</dict>
<!-- prueba-->
<dict>
<key>captures</key>
<dict>
<key>1</key>
<dict>
<key>name</key>
<string>storage.type.function.pascal</string>
</dict>
<key>2</key>
<dict>
<key>name</key>
<string>entity.name.function.pascal</string>
</dict>
</dict>
<key>match</key>
<string>\b(?i:(Shortint|Integer|Longint|Byte|Word|Boolean|WordBool|LongBool|ByteBool|Real|Single|Double|Extended|Comp|String|Char|Length|Upcase|textbackground|textcolor|gotoxy|crt|clrscr|readkey|read|readln))\b</string>
<key>name</key>
<string>meta.function.pascal</string>
</dict>
<!-- prueba-->
<dict>
<key>match</key>
<string>\b((0(x|X)[0-9a-fA-F]*)|(([0-9]+\.?[0-9]*)|(\.[0-9]+))((e|E)(\+|-)?[0-9]+)?)(L|l|UL|ul|u|U|F|f|ll|LL|ull|ULL)?\b</string>
<key>name</key>
<string>constant.numeric.pascal</string>
</dict>
<dict>
<key>captures</key>
<dict>
<key>1</key>
<dict>
<key>name</key>
<string>punctuation.definition.comment.pascal</string>
</dict>
</dict>
<key>match</key>
<string>(--).*$\n?</string>
<key>name</key>
<string>comment.line.double-dash.pascal.one</string>
</dict>
<dict>
<key>captures</key>
<dict>
<key>1</key>
<dict>
<key>name</key>
<string>punctuation.definition.comment.pascal</string>
</dict>
</dict>
<key>match</key>
<string>(//).*$\n?</string>
<key>name</key>
<string>comment.line.double-slash.pascal.two</string>
</dict>
<dict>
<key>begin</key>
<string>\(\*</string>
<key>captures</key>
<dict>
<key>0</key>
<dict>
<key>name</key>
<string>punctuation.definition.comment.pascal</string>
</dict>
</dict>
<key>end</key>
<string>\*\)</string>
<key>name</key>
<string>comment.block.pascal.one</string>
</dict>
<dict>
<key>begin</key>
<string>\{</string>
<key>captures</key>
<dict>
<key>0</key>
<dict>
<key>name</key>
<string>punctuation.definition.comment.pascal</string>
</dict>
</dict>
<key>end</key>
<string>\}</string>
<key>name</key>
<string>comment.block.pascal.two</string>
</dict>
<dict>
<key>applyEndPatternLast</key>
<integer>1</integer>
<key>begin</key>
<string>'</string>
<key>beginCaptures</key>
<dict>
<key>0</key>
<dict>
<key>name</key>
<string>punctuation.definition.string.begin.pascal</string>
</dict>
</dict>
<key>end</key>
<string>'</string>
<key>endCaptures</key>
<dict>
<key>0</key>
<dict>
<key>name</key>
<string>punctuation.definition.string.end.pascal</string>
</dict>
</dict>
<key>name</key>
<string>string.quoted.single.pascal</string>
<key>patterns</key>
<array>
<dict>
<key>match</key>
<string>''</string>
<key>name</key>
<string>constant.character.escape.apostrophe.pascal</string>
</dict>
</array>
</dict>
</array>
<key>scopeName</key>
<string>source.pascal</string>
<key>uuid</key>
<string>F42FA544-6B1C-11D9-9517-000D93589AF6</string>
</dict>
</plist>