2 " Language: JCL job control language - DOS/VSE
3 " Maintainer: Davyd Ondrejko <david.ondrejko@safelite.com>
5 " Last change: 2001 May 10
7 " For version 5.x: Clear all syntax items
8 " For version 6.x: Quit when a syntax file was already loaded
11 elseif exists("b:current_syntax")
16 syn keyword vsejclKeyword DLBL EXEC JOB ASSGN EOJ
17 syn keyword vsejclField JNM CLASS DISP USER SYSID JSEP SIZE
18 syn keyword vsejclField VSAM
19 syn region vsejclComment start="^/\*" end="$"
20 syn region vsejclComment start="^[\* ]\{}$" end="$"
21 syn region vsejclMisc start="^ " end="$" contains=Jparms
22 syn match vsejclString /'.\{-}'/
23 syn match vsejclParms /(.\{-})/ contained
25 " Define the default highlighting.
26 " For version 5.7 and earlier: only when not done already
27 " For version 5.8 and later: only when an item doesn't have highlighting yet
28 if version >= 508 || !exists("did_vsejcl_syntax")
30 let did_vsejcl_syntax = 1
31 command -nargs=+ HiLink hi link <args>
33 command -nargs=+ HiLink hi def link <args>
36 HiLink vsejclComment Comment
37 HiLink vsejclField Type
38 HiLink vsejclKeyword Statement
39 HiLink vsejclObject Constant
40 HiLink vsejclString Constant
41 HiLink vsejclMiscq Special
42 HiLink vsejclParms Constant
47 let b:current_syntax = "vsejcl"