From 84d251a6d0333c12bdeb1af69f66bd101c2ffad3 Mon Sep 17 00:00:00 2001 From: = <=> Date: Tue, 25 Mar 2014 23:36:54 +0100 Subject: [PATCH 1/3] fixed mixed line ending format --- plugin/jcl.vim | 266 ++++++++++++++++++++++++------------------------- 1 file changed, 133 insertions(+), 133 deletions(-) diff --git a/plugin/jcl.vim b/plugin/jcl.vim index 6522bb8..9d764e2 100644 --- a/plugin/jcl.vim +++ b/plugin/jcl.vim @@ -1,133 +1,133 @@ -" Vim syntax file -" Language: MVS jcl (jcl) -" Maintainer: Fiorenzo Zanotti -" Last Change: 2002 Sep 22 - -" 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 -syn keyword jclKwd pgm proc class dsn[ame] msgclass space disp contained -syn keyword jclKwd parm member cond msglevel order lrecl recfm unit contained -syn keyword jclKwd sysout outlim blksize region dcb amp contained -syn keyword jclKwd then shr old new mod catlg rlse delete pass keep contained -syn keyword jclKwd cyl trk vol retain ser label recorg sysda contained -syn keyword jclKwd dummy contained -syn keyword jclCKwd pgm proc class dsn[ame] msgclass space disp contained -syn keyword jclCKwd parm member cond msglevel order lrecl recfm unit contained -syn keyword jclCKwd sysout outlim blksize region dcb amp contained -syn keyword jclCKwd then shr old new mod catlg rlse delete pass keep contained -syn keyword jclCKwd cyl trk vol retain ser label recorg sysda contained -syn keyword jclCKwd dummy contained -syn keyword jclPgm idcams iebcopy sort icegener adrdssu ftp rexec contained -syn keyword jclPgm iebgener iefbr14 contained -syn keyword jclCPgm idcams iebcopy sort icegener adrdssu ftp rexec contained -syn keyword jclCPgm iebgener iefbr14 contained -" -" Matches main command and special dd -" -syn match jclMainCommand +^//[^* ]*\s\+EXEC+hs=e-3 contained -syn match jclMainCommand +^//[^* ]*\s\+DD+hs=e-1 contained -syn match jclMainCommand +^//[^* ]*\s\+INCLUDE+hs=e-6 contained -syn match jclMainCommand +^//[^* ]*\s\+JCLLIB+hs=e-5 contained -syn match jclMainCommand +^//[^* ]*\s\+JOB+hs=e-2 contained -syn match jclMainCommand +^//[^* ]*\s\+SET+hs=e-2 contained -syn match jclCMainCommand +^//[^* ]*\s\+EXEC+hs=e-3 contained -syn match jclCMainCommand +^//[^* ]*\s\+DD+hs=e-1 contained -syn match jclCMainCommand +^//[^* ]*\s\+INCLUDE+hs=e-6 contained -syn match jclCMainCommand +^//[^* ]*\s\+JCLLIB+hs=e-5 contained -syn match jclCMainCommand +^//[^* ]*\s\+JOB+hs=e-2 contained -syn match jclCMainCommand +^//[^* ]*\s\+SET+hs=e-2 contained -syn match jclCond +^//[^* ]*\s\+ELSE+ contained -syn match jclOperator "[()]" contained -syn match jclCOperator +[()]+ contained -syn match jclNumber +\<\d\+\>+ contained -syn match jclCNumber +\<\d\+\>+ contained -syn match jclDsn +\(\(\w\{1,8}\.\)\+\w\{1,8}\((\w\{1,8})\)\?\|\(&&\w\{1,8}\)\)+ contained -syn match jclCDsn +\(\(\w\{1,8}\.\)\+\w\{1,8}\((\w\{1,8})\)\?\|\(&&\w\{1,8}\)\)+ contained -syn region jclDblQuote start=+"+ skip=+[^"]+ end=+"+ contained -syn region jclSnglQuote start=+'+ skip=+[^']+ end=+'+ contained -syn region jclCDblQuote start=+"+ skip=+[^"]+ end=+"+ contained -syn region jclCSnglQuote start=+'+ skip=+[^']+ end=+'+ contained - -syn cluster jclConditional contains=jclCMainCommand,jclCIF,jclCData,jclCKwd,jclCond,jclCDblQuote,jclCSnglQuote,jclCComment,jclCOperator,jclCDsn,jclCPgm,jclCNumber -syn region jclIF matchgroup=jclCond start=+^//\w*\s\+IF+ end=+^//\w*\s\+ENDIF+ contains=@jclConditional contained -syn region jclCIF matchgroup=jclCond start=+^//\w*\s\+IF+ end=+^//\w*\s\+ENDIF+ contains=@jclConditional contained -syn match jclCComment +^//\*.*$+ contained - -syn cluster jclNonConditional contains=jclMainCommand,jclKwd,jclIf,jclOperator,jclDblQuote,jclSnglQuote,jclDsn,jclPgm,jclNumber -" High level matches -syn match jclComment +^//\*.*$+ -"syn match jclData +^[^/].*$+ -syn match jclData +^\([^/]\|/[^*/]\).*$+ -syn match jclStatement +^//[^*].*$+ transparent contains=@jclNonConditional -syn match jclCData +^\([^/]\|/[^*/]\).*$+ contained -" 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_jcl_syntax_inits") - if version < 508 - let did_jcl_syntax_inits = 1 - command -nargs=+ HiLink hi link - else - command -nargs=+ HiLink hi def link - endif -" hi Comment guifg=darkgrey -" hi jclIF guibg=white -" hi jclCond guibg=grey guifg=darkblue gui=bold -" hi jclCComm guibg=white guifg=darkred -" hi jclCComment guibg=white guifg=darkgrey -" "hi jclKwd guifg=darkgreen -" "hi jclCKwd guibg=white guifg=darkgreen -" hi jclKwd guifg=brown -" hi jclCKwd guibg=white guifg=brown -" hi jclMainCommand guifg=blue -" hi jclCMainCommand guifg=blue guibg=grey -" hi jclData guifg=violet -" hi jclCData guifg=violet guibg=white -" hi jclOperator guifg=darkred -" hi jclCOperator guifg=darkred guibg=white -" hi jclDsn guifg=darkcyan -" hi jclCDsn guifg=darkcyan guibg=white -" -" Standand colors test : -" - HiLink jclIF Normal - HiLink jclCIF Normal - HiLink jclCond WarningMsg - HiLink jclCComm Statement - HiLink jclCComment Comment - HiLink jclKwd Statement - HiLink jclCKwd Statement - HiLink jclMainCommand Type - HiLink jclCMainCommand WarningMsg - HiLink jclOperator Operator - HiLink jclCOperator Operator - HiLink jclDsn Normal - HiLink jclCDsn Normal - HiLink jclData Special - HiLink jclCData Special - HiLink jclPgm Function - HiLink jclCPgm Function - HiLink jclNumber Number - HiLink jclCNumber Number - HiLink jclDblQuote jclSnglQuote - HiLink jclSnglQuote String - HiLink jclCDblQuote jclCSnglQuote - HiLink jclCSnglQuote String - HiLink jclCIF jclIF - HiLink jclComment Comment - HiLink jclCComment Comment - HiLink jclComm Statement - HiLink jclLabel Label - syn sync fromstart " syncronize from start - delcommand HiLink -endif - -let b:current_syntax = "jcl" - -set expandtab +" Vim syntax file +" Language: MVS jcl (jcl) +" Maintainer: Fiorenzo Zanotti +" Last Change: 2002 Sep 22 + +" 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 +syn keyword jclKwd pgm proc class dsn[ame] msgclass space disp contained +syn keyword jclKwd parm member cond msglevel order lrecl recfm unit contained +syn keyword jclKwd sysout outlim blksize region dcb amp contained +syn keyword jclKwd then shr old new mod catlg rlse delete pass keep contained +syn keyword jclKwd cyl trk vol retain ser label recorg sysda contained +syn keyword jclKwd dummy contained +syn keyword jclCKwd pgm proc class dsn[ame] msgclass space disp contained +syn keyword jclCKwd parm member cond msglevel order lrecl recfm unit contained +syn keyword jclCKwd sysout outlim blksize region dcb amp contained +syn keyword jclCKwd then shr old new mod catlg rlse delete pass keep contained +syn keyword jclCKwd cyl trk vol retain ser label recorg sysda contained +syn keyword jclCKwd dummy contained +syn keyword jclPgm idcams iebcopy sort icegener adrdssu ftp rexec contained +syn keyword jclPgm iebgener iefbr14 contained +syn keyword jclCPgm idcams iebcopy sort icegener adrdssu ftp rexec contained +syn keyword jclCPgm iebgener iefbr14 contained +" +" Matches main command and special dd +" +syn match jclMainCommand +^//[^* ]*\s\+EXEC+hs=e-3 contained +syn match jclMainCommand +^//[^* ]*\s\+DD+hs=e-1 contained +syn match jclMainCommand +^//[^* ]*\s\+INCLUDE+hs=e-6 contained +syn match jclMainCommand +^//[^* ]*\s\+JCLLIB+hs=e-5 contained +syn match jclMainCommand +^//[^* ]*\s\+JOB+hs=e-2 contained +syn match jclMainCommand +^//[^* ]*\s\+SET+hs=e-2 contained +syn match jclCMainCommand +^//[^* ]*\s\+EXEC+hs=e-3 contained +syn match jclCMainCommand +^//[^* ]*\s\+DD+hs=e-1 contained +syn match jclCMainCommand +^//[^* ]*\s\+INCLUDE+hs=e-6 contained +syn match jclCMainCommand +^//[^* ]*\s\+JCLLIB+hs=e-5 contained +syn match jclCMainCommand +^//[^* ]*\s\+JOB+hs=e-2 contained +syn match jclCMainCommand +^//[^* ]*\s\+SET+hs=e-2 contained +syn match jclCond +^//[^* ]*\s\+ELSE+ contained +syn match jclOperator "[()]" contained +syn match jclCOperator +[()]+ contained +syn match jclNumber +\<\d\+\>+ contained +syn match jclCNumber +\<\d\+\>+ contained +syn match jclDsn +\(\(\w\{1,8}\.\)\+\w\{1,8}\((\w\{1,8})\)\?\|\(&&\w\{1,8}\)\)+ contained +syn match jclCDsn +\(\(\w\{1,8}\.\)\+\w\{1,8}\((\w\{1,8})\)\?\|\(&&\w\{1,8}\)\)+ contained +syn region jclDblQuote start=+"+ skip=+[^"]+ end=+"+ contained +syn region jclSnglQuote start=+'+ skip=+[^']+ end=+'+ contained +syn region jclCDblQuote start=+"+ skip=+[^"]+ end=+"+ contained +syn region jclCSnglQuote start=+'+ skip=+[^']+ end=+'+ contained + +syn cluster jclConditional contains=jclCMainCommand,jclCIF,jclCData,jclCKwd,jclCond,jclCDblQuote,jclCSnglQuote,jclCComment,jclCOperator,jclCDsn,jclCPgm,jclCNumber +syn region jclIF matchgroup=jclCond start=+^//\w*\s\+IF+ end=+^//\w*\s\+ENDIF+ contains=@jclConditional contained +syn region jclCIF matchgroup=jclCond start=+^//\w*\s\+IF+ end=+^//\w*\s\+ENDIF+ contains=@jclConditional contained +syn match jclCComment +^//\*.*$+ contained + +syn cluster jclNonConditional contains=jclMainCommand,jclKwd,jclIf,jclOperator,jclDblQuote,jclSnglQuote,jclDsn,jclPgm,jclNumber +" High level matches +syn match jclComment +^//\*.*$+ +"syn match jclData +^[^/].*$+ +syn match jclData +^\([^/]\|/[^*/]\).*$+ +syn match jclStatement +^//[^*].*$+ transparent contains=@jclNonConditional +syn match jclCData +^\([^/]\|/[^*/]\).*$+ contained +" 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_jcl_syntax_inits") + if version < 508 + let did_jcl_syntax_inits = 1 + command -nargs=+ HiLink hi link + else + command -nargs=+ HiLink hi def link + endif +" hi Comment guifg=darkgrey +" hi jclIF guibg=white +" hi jclCond guibg=grey guifg=darkblue gui=bold +" hi jclCComm guibg=white guifg=darkred +" hi jclCComment guibg=white guifg=darkgrey +" "hi jclKwd guifg=darkgreen +" "hi jclCKwd guibg=white guifg=darkgreen +" hi jclKwd guifg=brown +" hi jclCKwd guibg=white guifg=brown +" hi jclMainCommand guifg=blue +" hi jclCMainCommand guifg=blue guibg=grey +" hi jclData guifg=violet +" hi jclCData guifg=violet guibg=white +" hi jclOperator guifg=darkred +" hi jclCOperator guifg=darkred guibg=white +" hi jclDsn guifg=darkcyan +" hi jclCDsn guifg=darkcyan guibg=white +" +" Standand colors test : +" + HiLink jclIF Normal + HiLink jclCIF Normal + HiLink jclCond WarningMsg + HiLink jclCComm Statement + HiLink jclCComment Comment + HiLink jclKwd Statement + HiLink jclCKwd Statement + HiLink jclMainCommand Type + HiLink jclCMainCommand WarningMsg + HiLink jclOperator Operator + HiLink jclCOperator Operator + HiLink jclDsn Normal + HiLink jclCDsn Normal + HiLink jclData Special + HiLink jclCData Special + HiLink jclPgm Function + HiLink jclCPgm Function + HiLink jclNumber Number + HiLink jclCNumber Number + HiLink jclDblQuote jclSnglQuote + HiLink jclSnglQuote String + HiLink jclCDblQuote jclCSnglQuote + HiLink jclCSnglQuote String + HiLink jclCIF jclIF + HiLink jclComment Comment + HiLink jclCComment Comment + HiLink jclComm Statement + HiLink jclLabel Label + syn sync fromstart " syncronize from start + delcommand HiLink +endif + +let b:current_syntax = "jcl" + +set expandtab From 467831b06c3e3d6abb88a2578c9a844204838752 Mon Sep 17 00:00:00 2001 From: Hugo Sanchon Date: Thu, 24 Nov 2016 09:15:17 +0100 Subject: [PATCH 2/3] ftplugin para jcl --- ftplugin/jcl.vim | 133 +++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 133 insertions(+) create mode 100644 ftplugin/jcl.vim diff --git a/ftplugin/jcl.vim b/ftplugin/jcl.vim new file mode 100644 index 0000000..9d764e2 --- /dev/null +++ b/ftplugin/jcl.vim @@ -0,0 +1,133 @@ +" Vim syntax file +" Language: MVS jcl (jcl) +" Maintainer: Fiorenzo Zanotti +" Last Change: 2002 Sep 22 + +" 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 +syn keyword jclKwd pgm proc class dsn[ame] msgclass space disp contained +syn keyword jclKwd parm member cond msglevel order lrecl recfm unit contained +syn keyword jclKwd sysout outlim blksize region dcb amp contained +syn keyword jclKwd then shr old new mod catlg rlse delete pass keep contained +syn keyword jclKwd cyl trk vol retain ser label recorg sysda contained +syn keyword jclKwd dummy contained +syn keyword jclCKwd pgm proc class dsn[ame] msgclass space disp contained +syn keyword jclCKwd parm member cond msglevel order lrecl recfm unit contained +syn keyword jclCKwd sysout outlim blksize region dcb amp contained +syn keyword jclCKwd then shr old new mod catlg rlse delete pass keep contained +syn keyword jclCKwd cyl trk vol retain ser label recorg sysda contained +syn keyword jclCKwd dummy contained +syn keyword jclPgm idcams iebcopy sort icegener adrdssu ftp rexec contained +syn keyword jclPgm iebgener iefbr14 contained +syn keyword jclCPgm idcams iebcopy sort icegener adrdssu ftp rexec contained +syn keyword jclCPgm iebgener iefbr14 contained +" +" Matches main command and special dd +" +syn match jclMainCommand +^//[^* ]*\s\+EXEC+hs=e-3 contained +syn match jclMainCommand +^//[^* ]*\s\+DD+hs=e-1 contained +syn match jclMainCommand +^//[^* ]*\s\+INCLUDE+hs=e-6 contained +syn match jclMainCommand +^//[^* ]*\s\+JCLLIB+hs=e-5 contained +syn match jclMainCommand +^//[^* ]*\s\+JOB+hs=e-2 contained +syn match jclMainCommand +^//[^* ]*\s\+SET+hs=e-2 contained +syn match jclCMainCommand +^//[^* ]*\s\+EXEC+hs=e-3 contained +syn match jclCMainCommand +^//[^* ]*\s\+DD+hs=e-1 contained +syn match jclCMainCommand +^//[^* ]*\s\+INCLUDE+hs=e-6 contained +syn match jclCMainCommand +^//[^* ]*\s\+JCLLIB+hs=e-5 contained +syn match jclCMainCommand +^//[^* ]*\s\+JOB+hs=e-2 contained +syn match jclCMainCommand +^//[^* ]*\s\+SET+hs=e-2 contained +syn match jclCond +^//[^* ]*\s\+ELSE+ contained +syn match jclOperator "[()]" contained +syn match jclCOperator +[()]+ contained +syn match jclNumber +\<\d\+\>+ contained +syn match jclCNumber +\<\d\+\>+ contained +syn match jclDsn +\(\(\w\{1,8}\.\)\+\w\{1,8}\((\w\{1,8})\)\?\|\(&&\w\{1,8}\)\)+ contained +syn match jclCDsn +\(\(\w\{1,8}\.\)\+\w\{1,8}\((\w\{1,8})\)\?\|\(&&\w\{1,8}\)\)+ contained +syn region jclDblQuote start=+"+ skip=+[^"]+ end=+"+ contained +syn region jclSnglQuote start=+'+ skip=+[^']+ end=+'+ contained +syn region jclCDblQuote start=+"+ skip=+[^"]+ end=+"+ contained +syn region jclCSnglQuote start=+'+ skip=+[^']+ end=+'+ contained + +syn cluster jclConditional contains=jclCMainCommand,jclCIF,jclCData,jclCKwd,jclCond,jclCDblQuote,jclCSnglQuote,jclCComment,jclCOperator,jclCDsn,jclCPgm,jclCNumber +syn region jclIF matchgroup=jclCond start=+^//\w*\s\+IF+ end=+^//\w*\s\+ENDIF+ contains=@jclConditional contained +syn region jclCIF matchgroup=jclCond start=+^//\w*\s\+IF+ end=+^//\w*\s\+ENDIF+ contains=@jclConditional contained +syn match jclCComment +^//\*.*$+ contained + +syn cluster jclNonConditional contains=jclMainCommand,jclKwd,jclIf,jclOperator,jclDblQuote,jclSnglQuote,jclDsn,jclPgm,jclNumber +" High level matches +syn match jclComment +^//\*.*$+ +"syn match jclData +^[^/].*$+ +syn match jclData +^\([^/]\|/[^*/]\).*$+ +syn match jclStatement +^//[^*].*$+ transparent contains=@jclNonConditional +syn match jclCData +^\([^/]\|/[^*/]\).*$+ contained +" 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_jcl_syntax_inits") + if version < 508 + let did_jcl_syntax_inits = 1 + command -nargs=+ HiLink hi link + else + command -nargs=+ HiLink hi def link + endif +" hi Comment guifg=darkgrey +" hi jclIF guibg=white +" hi jclCond guibg=grey guifg=darkblue gui=bold +" hi jclCComm guibg=white guifg=darkred +" hi jclCComment guibg=white guifg=darkgrey +" "hi jclKwd guifg=darkgreen +" "hi jclCKwd guibg=white guifg=darkgreen +" hi jclKwd guifg=brown +" hi jclCKwd guibg=white guifg=brown +" hi jclMainCommand guifg=blue +" hi jclCMainCommand guifg=blue guibg=grey +" hi jclData guifg=violet +" hi jclCData guifg=violet guibg=white +" hi jclOperator guifg=darkred +" hi jclCOperator guifg=darkred guibg=white +" hi jclDsn guifg=darkcyan +" hi jclCDsn guifg=darkcyan guibg=white +" +" Standand colors test : +" + HiLink jclIF Normal + HiLink jclCIF Normal + HiLink jclCond WarningMsg + HiLink jclCComm Statement + HiLink jclCComment Comment + HiLink jclKwd Statement + HiLink jclCKwd Statement + HiLink jclMainCommand Type + HiLink jclCMainCommand WarningMsg + HiLink jclOperator Operator + HiLink jclCOperator Operator + HiLink jclDsn Normal + HiLink jclCDsn Normal + HiLink jclData Special + HiLink jclCData Special + HiLink jclPgm Function + HiLink jclCPgm Function + HiLink jclNumber Number + HiLink jclCNumber Number + HiLink jclDblQuote jclSnglQuote + HiLink jclSnglQuote String + HiLink jclCDblQuote jclCSnglQuote + HiLink jclCSnglQuote String + HiLink jclCIF jclIF + HiLink jclComment Comment + HiLink jclCComment Comment + HiLink jclComm Statement + HiLink jclLabel Label + syn sync fromstart " syncronize from start + delcommand HiLink +endif + +let b:current_syntax = "jcl" + +set expandtab From 4d9b62c7cd79838ffb41ebe627808405ed429d7e Mon Sep 17 00:00:00 2001 From: Hugo Sanchon Date: Mon, 28 Nov 2016 18:51:32 +0100 Subject: [PATCH 3/3] movido jcl.vim de plugin a ftplugin --- plugin/jcl.vim | 133 ------------------------------------------------- 1 file changed, 133 deletions(-) delete mode 100644 plugin/jcl.vim diff --git a/plugin/jcl.vim b/plugin/jcl.vim deleted file mode 100644 index 9d764e2..0000000 --- a/plugin/jcl.vim +++ /dev/null @@ -1,133 +0,0 @@ -" Vim syntax file -" Language: MVS jcl (jcl) -" Maintainer: Fiorenzo Zanotti -" Last Change: 2002 Sep 22 - -" 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 -syn keyword jclKwd pgm proc class dsn[ame] msgclass space disp contained -syn keyword jclKwd parm member cond msglevel order lrecl recfm unit contained -syn keyword jclKwd sysout outlim blksize region dcb amp contained -syn keyword jclKwd then shr old new mod catlg rlse delete pass keep contained -syn keyword jclKwd cyl trk vol retain ser label recorg sysda contained -syn keyword jclKwd dummy contained -syn keyword jclCKwd pgm proc class dsn[ame] msgclass space disp contained -syn keyword jclCKwd parm member cond msglevel order lrecl recfm unit contained -syn keyword jclCKwd sysout outlim blksize region dcb amp contained -syn keyword jclCKwd then shr old new mod catlg rlse delete pass keep contained -syn keyword jclCKwd cyl trk vol retain ser label recorg sysda contained -syn keyword jclCKwd dummy contained -syn keyword jclPgm idcams iebcopy sort icegener adrdssu ftp rexec contained -syn keyword jclPgm iebgener iefbr14 contained -syn keyword jclCPgm idcams iebcopy sort icegener adrdssu ftp rexec contained -syn keyword jclCPgm iebgener iefbr14 contained -" -" Matches main command and special dd -" -syn match jclMainCommand +^//[^* ]*\s\+EXEC+hs=e-3 contained -syn match jclMainCommand +^//[^* ]*\s\+DD+hs=e-1 contained -syn match jclMainCommand +^//[^* ]*\s\+INCLUDE+hs=e-6 contained -syn match jclMainCommand +^//[^* ]*\s\+JCLLIB+hs=e-5 contained -syn match jclMainCommand +^//[^* ]*\s\+JOB+hs=e-2 contained -syn match jclMainCommand +^//[^* ]*\s\+SET+hs=e-2 contained -syn match jclCMainCommand +^//[^* ]*\s\+EXEC+hs=e-3 contained -syn match jclCMainCommand +^//[^* ]*\s\+DD+hs=e-1 contained -syn match jclCMainCommand +^//[^* ]*\s\+INCLUDE+hs=e-6 contained -syn match jclCMainCommand +^//[^* ]*\s\+JCLLIB+hs=e-5 contained -syn match jclCMainCommand +^//[^* ]*\s\+JOB+hs=e-2 contained -syn match jclCMainCommand +^//[^* ]*\s\+SET+hs=e-2 contained -syn match jclCond +^//[^* ]*\s\+ELSE+ contained -syn match jclOperator "[()]" contained -syn match jclCOperator +[()]+ contained -syn match jclNumber +\<\d\+\>+ contained -syn match jclCNumber +\<\d\+\>+ contained -syn match jclDsn +\(\(\w\{1,8}\.\)\+\w\{1,8}\((\w\{1,8})\)\?\|\(&&\w\{1,8}\)\)+ contained -syn match jclCDsn +\(\(\w\{1,8}\.\)\+\w\{1,8}\((\w\{1,8})\)\?\|\(&&\w\{1,8}\)\)+ contained -syn region jclDblQuote start=+"+ skip=+[^"]+ end=+"+ contained -syn region jclSnglQuote start=+'+ skip=+[^']+ end=+'+ contained -syn region jclCDblQuote start=+"+ skip=+[^"]+ end=+"+ contained -syn region jclCSnglQuote start=+'+ skip=+[^']+ end=+'+ contained - -syn cluster jclConditional contains=jclCMainCommand,jclCIF,jclCData,jclCKwd,jclCond,jclCDblQuote,jclCSnglQuote,jclCComment,jclCOperator,jclCDsn,jclCPgm,jclCNumber -syn region jclIF matchgroup=jclCond start=+^//\w*\s\+IF+ end=+^//\w*\s\+ENDIF+ contains=@jclConditional contained -syn region jclCIF matchgroup=jclCond start=+^//\w*\s\+IF+ end=+^//\w*\s\+ENDIF+ contains=@jclConditional contained -syn match jclCComment +^//\*.*$+ contained - -syn cluster jclNonConditional contains=jclMainCommand,jclKwd,jclIf,jclOperator,jclDblQuote,jclSnglQuote,jclDsn,jclPgm,jclNumber -" High level matches -syn match jclComment +^//\*.*$+ -"syn match jclData +^[^/].*$+ -syn match jclData +^\([^/]\|/[^*/]\).*$+ -syn match jclStatement +^//[^*].*$+ transparent contains=@jclNonConditional -syn match jclCData +^\([^/]\|/[^*/]\).*$+ contained -" 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_jcl_syntax_inits") - if version < 508 - let did_jcl_syntax_inits = 1 - command -nargs=+ HiLink hi link - else - command -nargs=+ HiLink hi def link - endif -" hi Comment guifg=darkgrey -" hi jclIF guibg=white -" hi jclCond guibg=grey guifg=darkblue gui=bold -" hi jclCComm guibg=white guifg=darkred -" hi jclCComment guibg=white guifg=darkgrey -" "hi jclKwd guifg=darkgreen -" "hi jclCKwd guibg=white guifg=darkgreen -" hi jclKwd guifg=brown -" hi jclCKwd guibg=white guifg=brown -" hi jclMainCommand guifg=blue -" hi jclCMainCommand guifg=blue guibg=grey -" hi jclData guifg=violet -" hi jclCData guifg=violet guibg=white -" hi jclOperator guifg=darkred -" hi jclCOperator guifg=darkred guibg=white -" hi jclDsn guifg=darkcyan -" hi jclCDsn guifg=darkcyan guibg=white -" -" Standand colors test : -" - HiLink jclIF Normal - HiLink jclCIF Normal - HiLink jclCond WarningMsg - HiLink jclCComm Statement - HiLink jclCComment Comment - HiLink jclKwd Statement - HiLink jclCKwd Statement - HiLink jclMainCommand Type - HiLink jclCMainCommand WarningMsg - HiLink jclOperator Operator - HiLink jclCOperator Operator - HiLink jclDsn Normal - HiLink jclCDsn Normal - HiLink jclData Special - HiLink jclCData Special - HiLink jclPgm Function - HiLink jclCPgm Function - HiLink jclNumber Number - HiLink jclCNumber Number - HiLink jclDblQuote jclSnglQuote - HiLink jclSnglQuote String - HiLink jclCDblQuote jclCSnglQuote - HiLink jclCSnglQuote String - HiLink jclCIF jclIF - HiLink jclComment Comment - HiLink jclCComment Comment - HiLink jclComm Statement - HiLink jclLabel Label - syn sync fromstart " syncronize from start - delcommand HiLink -endif - -let b:current_syntax = "jcl" - -set expandtab