/
asm68k.vim
391 lines (352 loc) · 14.3 KB
/
asm68k.vim
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
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
" Vim syntax file
" Language: Motorola 68000 Assembler
" Maintainer: Steve Wall
" Last change: 2001 May 01
"
" This is incomplete. In particular, support for 68020 and
" up and 68851/68881 co-processors is partial or non-existant.
" Feel free to contribute...
"
" For version 5.x: Clear all syntax items
" For version 6.x: Quit when a syntax file was already loaded
if version < 600
syntax clear
elseif exists("b:current_syntax")
finish
endif
syn case ignore
" Partial list of register symbols
syn keyword asm68kReg a0 a1 a2 a3 a4 a5 a6 a7 d0 d1 d2 d3 d4 d5 d6 d7
syn keyword asm68kReg pc sr ccr sp usp ssp
" MC68010
syn keyword asm68kReg vbr sfc sfcr dfc dfcr
" MC68020
syn keyword asm68kReg msp isp zpc cacr caar
syn keyword asm68kReg za0 za1 za2 za3 za4 za5 za6 za7
syn keyword asm68kReg zd0 zd1 zd2 zd3 zd4 zd5 zd6 zd7
" MC68030
syn keyword asm68kReg crp srp tc ac0 ac1 acusr tt0 tt1 mmusr
" MC68040
syn keyword asm68kReg dtt0 dtt1 itt0 itt1 urp
" MC68851 registers
syn keyword asm68kReg cal val scc crp srp drp tc ac psr pcsr
syn keyword asm68kReg bac0 bac1 bac2 bac3 bac4 bac5 bac6 bac7
syn keyword asm68kReg bad0 bad1 bad2 bad3 bad4 bad5 bad6 bad7
" MC68881/82 registers
syn keyword asm68kReg fp0 fp1 fp2 fp3 fp4 fp5 fp6 fp7
syn keyword asm68kReg control status iaddr fpcr fpsr fpiar
" M68000 opcodes - order is important!
syn match asm68kOpcode "\<abcd\(\.b\)\=\s"
syn match asm68kOpcode "\<adda\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<addi\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<addq\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<addx\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<add\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<andi\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<and\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<as[lr]\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<b[vc][cs]\(\.[bwls]\)\=\s"
syn match asm68kOpcode "\<beq\(\.[bwls]\)\=\s"
syn match asm68kOpcode "\<bg[et]\(\.[bwls]\)\=\s"
syn match asm68kOpcode "\<b[hm]i\(\.[bwls]\)\=\s"
syn match asm68kOpcode "\<bl[est]\(\.[bwls]\)\=\s"
syn match asm68kOpcode "\<bne\(\.[bwls]\)\=\s"
syn match asm68kOpcode "\<bpl\(\.[bwls]\)\=\s"
syn match asm68kOpcode "\<bchg\(\.[bl]\)\=\s"
syn match asm68kOpcode "\<bclr\(\.[bl]\)\=\s"
syn match asm68kOpcode "\<bfchg\s"
syn match asm68kOpcode "\<bfclr\s"
syn match asm68kOpcode "\<bfexts\s"
syn match asm68kOpcode "\<bfextu\s"
syn match asm68kOpcode "\<bfffo\s"
syn match asm68kOpcode "\<bfins\s"
syn match asm68kOpcode "\<bfset\s"
syn match asm68kOpcode "\<bftst\s"
syn match asm68kOpcode "\<bkpt\s"
syn match asm68kOpcode "\<bra\(\.[bwls]\)\=\s"
syn match asm68kOpcode "\<bset\(\.[bl]\)\=\s"
syn match asm68kOpcode "\<bsr\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<btst\(\.[bl]\)\=\s"
syn match asm68kOpcode "\<callm\s"
syn match asm68kOpcode "\<cas2\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<cas\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<chk2\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<chk\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<clr\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<cmpa\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<cmpi\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<cmpm\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<cmp2\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<cmp\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<db[cv][cs]\(\.w\)\=\s"
syn match asm68kOpcode "\<dbeq\(\.w\)\=\s"
syn match asm68kOpcode "\<db[ft]\(\.w\)\=\s"
syn match asm68kOpcode "\<dbg[et]\(\.w\)\=\s"
syn match asm68kOpcode "\<db[hm]i\(\.w\)\=\s"
syn match asm68kOpcode "\<dbl[est]\(\.w\)\=\s"
syn match asm68kOpcode "\<dbne\(\.w\)\=\s"
syn match asm68kOpcode "\<dbpl\(\.w\)\=\s"
syn match asm68kOpcode "\<dbra\(\.w\)\=\s"
syn match asm68kOpcode "\<div[su]\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<div[su]l\(\.l\)\=\s"
syn match asm68kOpcode "\<eori\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<eor\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<exg\(\.l\)\=\s"
syn match asm68kOpcode "\<extb\(\.l\)\=\s"
syn match asm68kOpcode "\<ext\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<illegal\>"
syn match asm68kOpcode "\<jmp\(\.[ls]\)\=\s"
syn match asm68kOpcode "\<jsr\(\.[ls]\)\=\s"
syn match asm68kOpcode "\<lea\(\.l\)\=\s"
syn match asm68kOpcode "\<link\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<ls[lr]\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<movea\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<movec\(\.l\)\=\s"
syn match asm68kOpcode "\<movem\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<movep\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<moveq\(\.l\)\=\s"
syn match asm68kOpcode "\<moves\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<move\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<mul[su]\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<nbcd\(\.b\)\=\s"
syn match asm68kOpcode "\<negx\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<neg\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<nop\>"
syn match asm68kOpcode "\<not\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<ori\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<or\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<pack\s"
syn match asm68kOpcode "\<pea\(\.l\)\=\s"
syn match asm68kOpcode "\<reset\>"
syn match asm68kOpcode "\<ro[lr]\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<rox[lr]\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<rt[dm]\s"
syn match asm68kOpcode "\<rt[ers]\>"
syn match asm68kOpcode "\<sbcd\(\.b\)\=\s"
syn match asm68kOpcode "\<s[cv][cs]\(\.b\)\=\s"
syn match asm68kOpcode "\<seq\(\.b\)\=\s"
syn match asm68kOpcode "\<s[ft]\(\.b\)\=\s"
syn match asm68kOpcode "\<sg[et]\(\.b\)\=\s"
syn match asm68kOpcode "\<s[hm]i\(\.b\)\=\s"
syn match asm68kOpcode "\<sl[est]\(\.b\)\=\s"
syn match asm68kOpcode "\<sne\(\.b\)\=\s"
syn match asm68kOpcode "\<spl\(\.b\)\=\s"
syn match asm68kOpcode "\<suba\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<subi\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<subq\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<subx\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<sub\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<swap\(\.w\)\=\s"
syn match asm68kOpcode "\<tas\(\.b\)\=\s"
syn match asm68kOpcode "\<tdiv[su]\(\.l\)\=\s"
syn match asm68kOpcode "\<t\(rap\)\=[cv][cs]\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<t\(rap\)\=eq\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<t\(rap\)\=[ft]\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<t\(rap\)\=g[et]\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<t\(rap\)\=[hm]i\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<t\(rap\)\=l[est]\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<t\(rap\)\=ne\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<t\(rap\)\=pl\(\.[wl]\)\=\s"
syn match asm68kOpcode "\<t\(rap\)\=v\>"
syn match asm68kOpcode "\<t\(rap\)\=[cv][cs]\>"
syn match asm68kOpcode "\<t\(rap\)\=eq\>"
syn match asm68kOpcode "\<t\(rap\)\=[ft]\>"
syn match asm68kOpcode "\<t\(rap\)\=g[et]\>"
syn match asm68kOpcode "\<t\(rap\)\=[hm]i\>"
syn match asm68kOpcode "\<t\(rap\)\=l[est]\>"
syn match asm68kOpcode "\<t\(rap\)\=ne\>"
syn match asm68kOpcode "\<t\(rap\)\=pl\>"
syn match asm68kOpcode "\<trap\s"
syn match asm68kOpcode "\<tst\(\.[bwl]\)\=\s"
syn match asm68kOpcode "\<unlk\s"
syn match asm68kOpcode "\<unpk\s"
" Valid labels
syn match asm68kLabel "^[a-z_?.][a-z0-9_?.$]*$"
syn match asm68kLabel "^[a-z_?.][a-z0-9_?.$]*\s"he=e-1
syn match asm68kLabel "^\s*[a-z_?.][a-z0-9_?.$]*:"he=e-1
" Various number formats
syn match hexNumber "\$[0-9a-fA-F]\+\>"
syn match hexNumber "\<[0-9][0-9a-fA-F]*H\>"
syn match octNumber "@[0-7]\+\>"
syn match octNumber "\<[0-7]\+[QO]\>"
syn match binNumber "%[01]\+\>"
syn match binNumber "\<[01]\+B\>"
syn match decNumber "\<[0-9]\+D\=\>"
syn match floatE "_*E_*" contained
syn match floatExponent "_*E_*[-+]\=[0-9]\+" contained contains=floatE
syn match floatNumber "[-+]\=[0-9]\+_*E_*[-+]\=[0-9]\+" contains=floatExponent
syn match floatNumber "[-+]\=[0-9]\+\.[0-9]\+\(E[-+]\=[0-9]\+\)\=" contains=floatExponent
syn match floatNumber ":\([0-9a-f]\+_*\)\+"
" Character string constants
syn match asm68kStringError "'[ -~]*'"
syn match asm68kStringError "'[ -~]*$"
syn region asm68kString start="'" skip="''" end="'" oneline contains=asm68kCharError
syn match asm68kCharError "[^ -~]" contained
" Immediate data
syn match asm68kImmediate "#\$[0-9a-fA-F]\+" contains=hexNumber
syn match asm68kImmediate "#[0-9][0-9a-fA-F]*H" contains=hexNumber
syn match asm68kImmediate "#@[0-7]\+" contains=octNumber
syn match asm68kImmediate "#[0-7]\+[QO]" contains=octNumber
syn match asm68kImmediate "#%[01]\+" contains=binNumber
syn match asm68kImmediate "#[01]\+B" contains=binNumber
syn match asm68kImmediate "#[0-9]\+D\=" contains=decNumber
syn match asm68kSymbol "[a-z_?.][a-z0-9_?.$]*" contained
syn match asm68kImmediate "#[a-z_?.][a-z0-9_?.]*" contains=asm68kSymbol
" Special items for comments
syn keyword asm68kTodo contained TODO
" Operators
syn match asm68kOperator "[-+*/]" " Must occur before Comments
syn match asm68kOperator "\.SIZEOF\."
syn match asm68kOperator "\.STARTOF\."
syn match asm68kOperator "<<" " shift left
syn match asm68kOperator ">>" " shift right
syn match asm68kOperator "&" " bit-wise logical and
syn match asm68kOperator "!" " bit-wise logical or
syn match asm68kOperator "!!" " exclusive or
syn match asm68kOperator "<>" " inequality
syn match asm68kOperator "=" " must be before other ops containing '='
syn match asm68kOperator ">="
syn match asm68kOperator "<="
syn match asm68kOperator "==" " operand existance - used in macro definitions
" Condition code style operators
syn match asm68kOperator "<[CV][CS]>"
syn match asm68kOperator "<EQ>"
syn match asm68kOperator "<G[TE]>"
syn match asm68kOperator "<[HM]I>"
syn match asm68kOperator "<L[SET]>"
syn match asm68kOperator "<NE>"
syn match asm68kOperator "<PL>"
" Comments
syn match asm68kComment ";.*" contains=asm68kTodo
syn match asm68kComment "\s!.*"ms=s+1 contains=asm68kTodo
syn match asm68kComment "^\s*[*!].*" contains=asm68kTodo
" Include
syn match asm68kInclude "\<INCLUDE\s"
" Standard macros
syn match asm68kCond "\<IF\(\.[BWL]\)\=\s"
syn match asm68kCond "\<THEN\(\.[SL]\)\=\>"
syn match asm68kCond "\<ELSE\(\.[SL]\)\=\>"
syn match asm68kCond "\<ENDI\>"
syn match asm68kCond "\<BREAK\(\.[SL]\)\=\>"
syn match asm68kRepeat "\<FOR\(\.[BWL]\)\=\s"
syn match asm68kRepeat "\<DOWNTO\s"
syn match asm68kRepeat "\<TO\s"
syn match asm68kRepeat "\<BY\s"
syn match asm68kRepeat "\<DO\(\.[SL]\)\=\>"
syn match asm68kRepeat "\<ENDF\>"
syn match asm68kRepeat "\<NEXT\(\.[SL]\)\=\>"
syn match asm68kRepeat "\<REPEAT\>"
syn match asm68kRepeat "\<UNTIL\(\.[BWL]\)\=\s"
syn match asm68kRepeat "\<WHILE\(\.[BWL]\)\=\s"
syn match asm68kRepeat "\<ENDW\>"
" Macro definition
syn match asm68kMacro "\<MACRO\>"
syn match asm68kMacro "\<LOCAL\s"
syn match asm68kMacro "\<MEXIT\>"
syn match asm68kMacro "\<ENDM\>"
syn match asm68kMacroParam "\\[0-9]"
" Conditional assembly
syn match asm68kPreCond "\<IFC\s"
syn match asm68kPreCond "\<IFDEF\s"
syn match asm68kPreCond "\<IFEQ\s"
syn match asm68kPreCond "\<IFGE\s"
syn match asm68kPreCond "\<IFGT\s"
syn match asm68kPreCond "\<IFLE\s"
syn match asm68kPreCond "\<IFLT\s"
syn match asm68kPreCond "\<IFNC\>"
syn match asm68kPreCond "\<IFNDEF\s"
syn match asm68kPreCond "\<IFNE\s"
syn match asm68kPreCond "\<ELSEC\>"
syn match asm68kPreCond "\<ENDC\>"
" Loop control
syn match asm68kPreCond "\<REPT\s"
syn match asm68kPreCond "\<IRP\s"
syn match asm68kPreCond "\<IRPC\s"
syn match asm68kPreCond "\<ENDR\>"
" Directives
syn match asm68kDirective "\<ALIGN\s"
syn match asm68kDirective "\<CHIP\s"
syn match asm68kDirective "\<COMLINE\s"
syn match asm68kDirective "\<COMMON\(\.S\)\=\s"
syn match asm68kDirective "\<DC\(\.[BWLSDXP]\)\=\s"
syn match asm68kDirective "\<DC\.\\[0-9]\s"me=e-3 " Special use in a macro def
syn match asm68kDirective "\<DCB\(\.[BWLSDXP]\)\=\s"
syn match asm68kDirective "\<DS\(\.[BWLSDXP]\)\=\s"
syn match asm68kDirective "\<END\>"
syn match asm68kDirective "\<EQU\s"
syn match asm68kDirective "\<FEQU\(\.[SDXP]\)\=\s"
syn match asm68kDirective "\<FAIL\>"
syn match asm68kDirective "\<FOPT\s"
syn match asm68kDirective "\<\(NO\)\=FORMAT\>"
syn match asm68kDirective "\<IDNT\>"
syn match asm68kDirective "\<\(NO\)\=LIST\>"
syn match asm68kDirective "\<LLEN\s"
syn match asm68kDirective "\<MASK2\>"
syn match asm68kDirective "\<NAME\s"
syn match asm68kDirective "\<NOOBJ\>"
syn match asm68kDirective "\<OFFSET\s"
syn match asm68kDirective "\<OPT\>"
syn match asm68kDirective "\<ORG\(\.[SL]\)\=\>"
syn match asm68kDirective "\<\(NO\)\=PAGE\>"
syn match asm68kDirective "\<PLEN\s"
syn match asm68kDirective "\<REG\s"
syn match asm68kDirective "\<RESTORE\>"
syn match asm68kDirective "\<SAVE\>"
syn match asm68kDirective "\<SECT\(\.S\)\=\s"
syn match asm68kDirective "\<SECTION\(\.S\)\=\s"
syn match asm68kDirective "\<SET\s"
syn match asm68kDirective "\<SPC\s"
syn match asm68kDirective "\<TTL\s"
syn match asm68kDirective "\<XCOM\s"
syn match asm68kDirective "\<XDEF\s"
syn match asm68kDirective "\<XREF\(\.S\)\=\s"
syn case match
" Define the default highlighting.
" For version 5.7 and earlier: only when not done already
" For version 5.8 and later: only when an item doesn't have highlighting yet
if version >= 508 || !exists("did_asm68k_syntax_inits")
if version < 508
let did_asm68k_syntax_inits = 1
command -nargs=+ HiLink hi link <args>
else
command -nargs=+ HiLink hi def link <args>
endif
" The default methods for highlighting. Can be overridden later
" Comment Constant Error Identifier PreProc Special Statement Todo Type
"
" Constant Boolean Character Number String
" Identifier Function
" PreProc Define Include Macro PreCondit
" Special Debug Delimiter SpecialChar SpecialComment Tag
" Statement Conditional Exception Keyword Label Operator Repeat
" Type StorageClass Structure Typedef
HiLink asm68kComment Comment
HiLink asm68kTodo Todo
HiLink hexNumber Number " Constant
HiLink octNumber Number " Constant
HiLink binNumber Number " Constant
HiLink decNumber Number " Constant
HiLink floatNumber Number " Constant
HiLink floatExponent Number " Constant
HiLink floatE SpecialChar " Statement
"HiLink floatE Number " Constant
HiLink asm68kImmediate SpecialChar " Statement
"HiLink asm68kSymbol Constant
HiLink asm68kString String " Constant
HiLink asm68kCharError Error
HiLink asm68kStringError Error
HiLink asm68kReg Identifier
HiLink asm68kOperator Identifier
HiLink asm68kInclude Include " PreProc
HiLink asm68kMacro Macro " PreProc
HiLink asm68kMacroParam Keyword " Statement
HiLink asm68kDirective Special
HiLink asm68kPreCond Special
HiLink asm68kOpcode Statement
HiLink asm68kCond Conditional " Statement
HiLink asm68kRepeat Repeat " Statement
HiLink asm68kLabel Type
delcommand HiLink
endif
let b:current_syntax = "asm68k"
" vim: ts=8 sw=2