xref: /vim-8.2.3635/runtime/syntax/plm.vim (revision 89bcfda6)
1" Vim syntax file
2" Language:	PL/M
3" Maintainer:	Philippe Coulonges <[email protected]>
4" Last change:	2003 May 11
5
6" quit when a syntax file was already loaded
7if exists("b:current_syntax")
8  finish
9endif
10
11" PL/M is a case insensitive language
12syn case ignore
13
14syn keyword plmTodo contained	TODO FIXME XXX
15
16" String
17syn region  plmString		start=+'+  end=+'+
18
19syn match   plmOperator		"[@=\+\-\*\/\<\>]"
20
21syn match   plmIdentifier	"\<[a-zA-Z_][a-zA-Z0-9_]*\>"
22
23syn match   plmDelimiter	"[();,]"
24
25syn region  plmPreProc		start="^\s*\$\s*" skip="\\$" end="$"
26
27" FIXME : No Number support for floats, as I'm working on an embedded
28" project that doesn't use any.
29syn match   plmNumber		"-\=\<\d\+\>"
30syn match   plmNumber		"\<[0-9a-fA-F]*[hH]*\>"
31
32" If you don't like tabs
33"syn match plmShowTab "\t"
34"syn match plmShowTabc "\t"
35
36"when wanted, highlight trailing white space
37if exists("c_space_errors")
38  syn match	plmSpaceError	"\s*$"
39  syn match	plmSpaceError	" \+\t"me=e-1
40endif
41
42"
43  " Use the same control variable as C language for I believe
44  " users will want the same behavior
45if exists("c_comment_strings")
46  " FIXME : don't work fine with c_comment_strings set,
47  "	    which I don't care as I don't use
48
49  " A comment can contain plmString, plmCharacter and plmNumber.
50  " But a "*/" inside a plmString in a plmComment DOES end the comment!  So we
51  " need to use a special type of plmString: plmCommentString, which also ends on
52  " "*/", and sees a "*" at the start of the line as comment again.
53  syntax match	plmCommentSkip	contained "^\s*\*\($\|\s\+\)"
54  syntax region plmCommentString	contained start=+"+ skip=+\\\\\|\\"+ end=+"+ end=+\*/+me=s-1 contains=plmSpecial,plmCommentSkip
55  syntax region plmComment2String	contained start=+"+ skip=+\\\\\|\\"+ end=+"+ end="$" contains=plmSpecial
56  syntax region plmComment	start="/\*" end="\*/" contains=plmTodo,plmCommentString,plmCharacter,plmNumber,plmFloat,plmSpaceError
57  syntax match  plmComment	"//.*" contains=plmTodo,plmComment2String,plmCharacter,plmNumber,plmSpaceError
58else
59  syn region	plmComment	start="/\*" end="\*/" contains=plmTodo,plmSpaceError
60  syn match	plmComment	"//.*" contains=plmTodo,plmSpaceError
61endif
62
63syntax match	plmCommentError	"\*/"
64
65syn keyword plmReserved	ADDRESS AND AT BASED BY BYTE CALL CASE
66syn keyword plmReserved DATA DECLARE DISABLE DO DWORD
67syn keyword plmReserved	ELSE ENABLE END EOF EXTERNAL
68syn keyword plmReserved GO GOTO HALT IF INITIAL INTEGER INTERRUPT
69syn keyword plmReserved LABEL LITERALLY MINUS MOD NOT OR
70syn keyword plmReserved PLUS POINTER PROCEDURE PUBLIC
71syn keyword plmReserved REAL REENTRANT RETURN SELECTOR STRUCTURE
72syn keyword plmReserved THEN TO WHILE WORD XOR
73syn keyword plm386Reserved CHARINT HWORD LONGINT OFFSET QWORD SHORTINT
74
75syn keyword plmBuiltIn ABS ADJUSTRPL BLOCKINPUT BLOCKINWORD BLOCKOUTPUT
76syn keyword plmBuiltIn BLOCKOUTWORD BUILPTR CARRY CAUSEINTERRUPT CMPB
77syn keyword plmBuiltIn CMPW DEC DOUBLE FINDB FINDRB FINDRW FINDW FIX
78syn keyword plmBuiltIn FLAGS FLOAT GETREALERROR HIGH IABS INITREALMATHUNIT
79syn keyword plmBuiltIn INPUT INT INWORD LAST LOCKSET LENGTH LOW MOVB MOVE
80syn keyword plmBuiltIn MOVRB MOVRW MOVW NIL OUTPUT OUTWORD RESTOREREALSTATUS
81syn keyword plmBuiltIn ROL ROR SAL SAVEREALSTATUS SCL SCR SELECTOROF SETB
82syn keyword plmBuiltIn SETREALMODE SETW SHL SHR SIGN SIGNED SIZE SKIPB
83syn keyword plmBuiltIn SKIPRB SKIPRW SKIPW STACKBASE STACKPTR TIME SIZE
84syn keyword plmBuiltIn UNSIGN XLAT ZERO
85syn keyword plm386BuiltIn INTERRUPT SETINTERRUPT
86syn keyword plm286BuiltIn CLEARTASKSWITCHEDFLAG GETACCESSRIGHTS
87syn keyword plm286BuiltIn GETSEGMENTLIMIT LOCALTABLE MACHINESTATUS
88syn keyword plm286BuiltIn OFFSETOF PARITY RESTOREGLOBALTABLE
89syn keyword plm286BuiltIn RESTOREINTERRUPTTABLE SAVEGLOBALTABLE
90syn keyword plm286BuiltIn SAVEINTERRUPTTABLE SEGMENTREADABLE
91syn keyword plm286BuiltIn SEGMENTWRITABLE TASKREGISTER WAITFORINTERRUPT
92syn keyword plm386BuiltIn CONTROLREGISTER DEBUGREGISTER FINDHW
93syn keyword plm386BuiltIn FINDRHW INHWORD MOVBIT MOVRBIT MOVHW MOVRHW
94syn keyword plm386BuiltIn OUTHWORD SCANBIT SCANRBIT SETHW SHLD SHRD
95syn keyword plm386BuiltIn SKIPHW SKIPRHW TESTREGISTER
96syn keyword plm386w16BuiltIn BLOCKINDWORD BLOCKOUTDWORD CMPD FINDD
97syn keyword plm386w16BuiltIn FINDRD INDWORD MOVD MOVRD OUTDWORD
98syn keyword plm386w16BuiltIn SETD SKIPD SKIPRD
99
100syn sync lines=50
101
102" Define the default highlighting.
103" Only when an item doesn't have highlighting yet
104command -nargs=+ HiLink hi def link <args>
105
106" The default methods for highlighting.  Can be overridden later
107"  HiLink plmLabel			Label
108"  HiLink plmConditional		Conditional
109"  HiLink plmRepeat			Repeat
110HiLink plmTodo			Todo
111HiLink plmNumber			Number
112HiLink plmOperator			Operator
113HiLink plmDelimiter			Operator
114"HiLink plmShowTab			Error
115"HiLink plmShowTabc			Error
116HiLink plmIdentifier			Identifier
117HiLink plmBuiltIn			Statement
118HiLink plm286BuiltIn			Statement
119HiLink plm386BuiltIn			Statement
120HiLink plm386w16BuiltIn		Statement
121HiLink plmReserved			Statement
122HiLink plm386Reserved			Statement
123HiLink plmPreProc			PreProc
124HiLink plmCommentError		plmError
125HiLink plmCommentString		plmString
126HiLink plmComment2String		plmString
127HiLink plmCommentSkip			plmComment
128HiLink plmString			String
129HiLink plmComment			Comment
130
131delcommand HiLink
132
133let b:current_syntax = "plm"
134
135" vim: ts=8 sw=2
136
137