Mercurial > vim

comparison runtime/syntax/vim.vim @ 6484:ce4ecfbebded

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Updated runtime files.
author Bram Moolenaar <bram@vim.org>
date Wed, 14 Jan 2015 12:52:36 +0100
parents b3bc99b909c3
children fbc1131f0ba5
comparison
equal deleted inserted replaced
6483:6922222a8ad3 6484:ce4ecfbebded
1 " Vim syntax file 1 " Vim syntax file
2 " Language: Vim 7.4 script 2 " Language: Vim 7.4 script
3 " Maintainer: Charles E. Campbell <NdrOchipS@PcampbellAfamily.Mbiz> 3 " Maintainer: Charles E. Campbell <NdrOchipS@PcampbellAfamily.Mbiz>
4 " Last Change: Nov 28, 2014 4 " Last Change: Jan 13, 2015
5 " Version: 7.4-19 5 " Version: 7.4-28
6 " Automatically generated keyword lists: {{{1 6 " Automatically generated keyword lists: {{{1
7 7
8 " Quit when a syntax file was already loaded {{{2 8 " Quit when a syntax file was already loaded {{{2
9 if exists("b:current_syntax") 9 if exists("b:current_syntax")
10 finish 10 finish
95 let g:vimsyn_noerror= g:vimsyntax_noerror 95 let g:vimsyn_noerror= g:vimsyntax_noerror
96 endif 96 endif
97 97
98 " Numbers {{{2 98 " Numbers {{{2
99 " ======= 99 " =======
100 syn match vimNumber "\<\d\+\([lL]\|\.\d\+\)\=" 100 syn match vimNumber "\<\d\+\%(\.\d\+\%([eE][+-]\=\d\+\)\=\)\=" skipwhite nextgroup=vimGlobal,vimSubst,vimCommand
101 syn match vimNumber "-\d\+\([lL]\|\.\d\+\)\=" 101 syn match vimNumber "-\d\+\%(\.\d\+\%([eE][+-]\=\d\+\)\=\)\=" skipwhite nextgroup=vimGlobal,vimSubst,vimCommand
102 syn match vimNumber "\<0[xX]\x\+" 102 syn match vimNumber "\<0[xX]\x\+"
103 syn match vimNumber "\%(^\|[^a-zA-Z]\)\zs#\x\{6}" 103 syn match vimNumber "\%(^\|[^a-zA-Z]\)\zs#\x\{6}"
104 104
105 " All vimCommands are contained by vimIsCommands. {{{2 105 " All vimCommands are contained by vimIsCommands. {{{2
106 syn match vimCmdSep "[:|]\+" skipwhite nextgroup=vimAddress,vimAutoCmd,vimIsCommand,vimExtCmd,vimFilter,vimLet,vimMap,vimMark,vimSet,vimSyntax,vimUserCmd 106 syn match vimCmdSep "[:|]\+" skipwhite nextgroup=vimAddress,vimAutoCmd,vimIsCommand,vimExtCmd,vimFilter,vimLet,vimMap,vimMark,vimSet,vimSyntax,vimUserCmd
147 endif 147 endif
148 "syn keyword vimAugroupKey contained aug[roup] 148 "syn keyword vimAugroupKey contained aug[roup]
149 149
150 " Operators: {{{2 150 " Operators: {{{2
151 " ========= 151 " =========
152 syn cluster vimOperGroup contains=vimFunc,vimFuncVar,vimOper,vimOperParen,vimNumber,vimString,vimRegister,vimContinue 152 syn cluster vimOperGroup contains=vimEnvvar,vimFunc,vimFuncVar,vimOper,vimOperParen,vimNumber,vimString,vimRegister,vimContinue
153 syn match vimOper "\(==\|!=\|>=\|<=\|=\~\|!\~\|>\|<\|=\)[?#]\{0,2}" skipwhite nextgroup=vimString,vimSpecFile 153 syn match vimOper "\(==\|!=\|>=\|<=\|=\~\|!\~\|>\|<\|=\)[?#]\{0,2}" skipwhite nextgroup=vimString,vimSpecFile
154 syn match vimOper "||\|&&\|[-+.]" skipwhite nextgroup=vimString,vimSpecFile 154 syn match vimOper "||\|&&\|[-+.]" skipwhite nextgroup=vimString,vimSpecFile
155 syn region vimOperParen oneline matchgroup=vimParenSep start="(" end=")" contains=@vimOperGroup 155 syn region vimOperParen oneline matchgroup=vimParenSep start="(" end=")" contains=@vimOperGroup
156 syn region vimOperParen oneline matchgroup=vimSep start="{" end="}" contains=@vimOperGroup nextgroup=vimVar,vimFuncVar 156 syn region vimOperParen oneline matchgroup=vimSep start="{" end="}" contains=@vimOperGroup nextgroup=vimVar,vimFuncVar
157 if !exists("g:vimsyn_noerror") && !exists("g:vimsyn_noopererror") 157 if !exists("g:vimsyn_noerror") && !exists("g:vimsyn_noopererror")
159 endif 159 endif
160 160
161 " Functions : Tag is provided for those who wish to highlight tagged functions {{{2 161 " Functions : Tag is provided for those who wish to highlight tagged functions {{{2
162 " ========= 162 " =========
163 syn cluster vimFuncList contains=vimCommand,vimFunctionError,vimFuncKey,Tag,vimFuncSID 163 syn cluster vimFuncList contains=vimCommand,vimFunctionError,vimFuncKey,Tag,vimFuncSID
164 syn cluster vimFuncBodyList contains=vimAbb,vimAddress,vimAugroupKey,vimAutoCmd,vimCmplxRepeat,vimComment,vimComment,vimContinue,vimCtrlChar,vimEcho,vimEchoHL,vimExecute,vimIf,vimIsCommand,vimFBVar,vimFunc,vimFunction,vimFuncVar,vimGlobal,vimHighlight,vimIsCommand,vimLet,vimLineComment,vimMap,vimMark,vimNorm,vimNotation,vimNotFunc,vimNumber,vimOper,vimOperParen,vimRegion,vimRegister,vimSet,vimSpecFile,vimString,vimSubst,vimSynLine,vimUserCommand 164 syn cluster vimFuncBodyList contains=vimAbb,vimAddress,vimAugroupKey,vimAutoCmd,vimCmplxRepeat,vimComment,vimComment,vimContinue,vimCtrlChar,vimEcho,vimEchoHL,vimExecute,vimIf,vimIsCommand,vimFBVar,vimFunc,vimFunction,vimFuncVar,vimGlobal,vimHighlight,vimIsCommand,vimLet,vimLineComment,vimMap,vimMark,vimNorm,vimNotation,vimNotFunc,vimNumber,vimOper,vimOperParen,vimRegion,vimRegister,vimSet,vimSpecFile,vimString,vimSubst,vimSynLine,vimUnmap,vimUserCommand
165 syn match vimFunction "\<fu\%[nction]!\=\s\+\%(<[sS][iI][dD]>\|[sSgGbBwWtTlL]:\)\=\%(\i\|[#.]\|{.\{-1,}}\)*\ze\s*(" contains=@vimFuncList nextgroup=vimFuncBody 165 syn match vimFunction "\<fu\%[nction]!\=\s\+\%(<[sS][iI][dD]>\|[sSgGbBwWtTlL]:\)\=\%(\i\|[#.]\|{.\{-1,}}\)*\ze\s*(" contains=@vimFuncList nextgroup=vimFuncBody
166 166
167 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'f' 167 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'f'
168 syn region vimFuncBody contained fold start="\ze(" matchgroup=vimCommand end="\<\(endf\>\|endfu\%[nction]\>\)" contains=@vimFuncBodyList 168 syn region vimFuncBody contained fold start="\ze(" matchgroup=vimCommand end="\<\(endf\>\|endfu\%[nction]\>\)" contains=@vimFuncBodyList
169 else 169 else
201 if !exists("g:vimsyn_noerror") && !exists("g:vimsyn_nousercmderror") 201 if !exists("g:vimsyn_noerror") && !exists("g:vimsyn_nousercmderror")
202 syn match vimUserCmdError contained "\S\+\>" 202 syn match vimUserCmdError contained "\S\+\>"
203 endif 203 endif
204 syn case ignore 204 syn case ignore
205 syn keyword vimUserAttrbKey contained bar ban[g] cou[nt] ra[nge] com[plete] n[args] re[gister] 205 syn keyword vimUserAttrbKey contained bar ban[g] cou[nt] ra[nge] com[plete] n[args] re[gister]
206 syn keyword vimUserAttrbCmplt contained augroup buffer command dir environment event expression file function help highlight mapping menu option shellcmd something tag tag_listfiles var 206 syn keyword vimUserAttrbCmplt contained augroup buffer color command compiler cscope dir environment event expression file file_in_path filetype function help highlight locale mapping menu option shellcmd sign syntax tag tag_listfiles var
207 syn keyword vimUserAttrbCmplt contained custom customlist nextgroup=vimUserAttrbCmpltFunc,vimUserCmdError 207 syn keyword vimUserAttrbCmplt contained custom customlist nextgroup=vimUserAttrbCmpltFunc,vimUserCmdError
208 syn match vimUserAttrbCmpltFunc contained ",\%([sS]:\|<[sS][iI][dD]>\)\=\%(\h\w*\%(#\u\w*\)\+\|\u\w*\)"hs=s+1 nextgroup=vimUserCmdError 208 syn match vimUserAttrbCmpltFunc contained ",\%([sS]:\|<[sS][iI][dD]>\)\=\%(\h\w*\%(#\h\w*\)\+\|\h\w*\)"hs=s+1 nextgroup=vimUserCmdError
209 209
210 syn case match 210 syn case match
211 syn match vimUserAttrbCmplt contained "custom,\u\w*" 211 syn match vimUserAttrbCmplt contained "custom,\u\w*"
212 212
213 " Lower Priority Comments: after some vim commands... {{{2 213 " Lower Priority Comments: after some vim commands... {{{2
230 syn match vimPatSep contained "\\|" 230 syn match vimPatSep contained "\\|"
231 syn region vimPatSepZone oneline contained matchgroup=vimPatSepZ start="\\%\=\ze(" skip="\\\\" end="\\)\|[^\]['"]" contains=@vimStringGroup 231 syn region vimPatSepZone oneline contained matchgroup=vimPatSepZ start="\\%\=\ze(" skip="\\\\" end="\\)\|[^\]['"]" contains=@vimStringGroup
232 syn region vimPatRegion contained transparent matchgroup=vimPatSepR start="\\[z%]\=(" end="\\)" contains=@vimSubstList oneline 232 syn region vimPatRegion contained transparent matchgroup=vimPatSepR start="\\[z%]\=(" end="\\)" contains=@vimSubstList oneline
233 syn match vimNotPatSep contained "\\\\" 233 syn match vimNotPatSep contained "\\\\"
234 syn cluster vimStringGroup contains=vimEscapeBrace,vimPatSep,vimNotPatSep,vimPatSepErr,vimPatSepZone,@Spell 234 syn cluster vimStringGroup contains=vimEscapeBrace,vimPatSep,vimNotPatSep,vimPatSepErr,vimPatSepZone,@Spell
235 syn region vimString oneline keepend start=+[^a-zA-Z>!\\@]"+lc=1 skip=+\\\\\|\\"+ end=+"+ contains=@vimStringGroup 235 syn region vimString oneline keepend start=+[^:a-zA-Z>!\\@]"+lc=1 skip=+\\\\\|\\"+ end=+"+ contains=@vimStringGroup
236 syn region vimString oneline keepend start=+[^a-zA-Z>!\\@]'+lc=1 end=+'+ 236 syn region vimString oneline keepend start=+[^:a-zA-Z>!\\@]'+lc=1 end=+'+
237 syn region vimString oneline start=+=!+lc=1 skip=+\\\\\|\\!+ end=+!+ contains=@vimStringGroup 237 syn region vimString oneline start=+=!+lc=1 skip=+\\\\\|\\!+ end=+!+ contains=@vimStringGroup
238 syn region vimString oneline start="=+"lc=1 skip="\\\\\|\\+" end="+" contains=@vimStringGroup 238 syn region vimString oneline start="=+"lc=1 skip="\\\\\|\\+" end="+" contains=@vimStringGroup
239 syn region vimString oneline start="\s/\s*\A"lc=1 skip="\\\\\|\\+" end="/" contains=@vimStringGroup 239 syn region vimString oneline start="\s/\s*\A"lc=1 skip="\\\\\|\\+" end="/" contains=@vimStringGroup
240 syn match vimString contained +"[^"]*\\$+ skipnl nextgroup=vimStringCont 240 syn match vimString contained +"[^"]*\\$+ skipnl nextgroup=vimStringCont
241 syn match vimStringCont contained +\(\\\\\|.\)\{-}[^\\]"+ 241 syn match vimStringCont contained +\(\\\\\|.\)\{-}[^\\]"+
243 " Substitutions: {{{2 243 " Substitutions: {{{2
244 " ============= 244 " =============
245 syn cluster vimSubstList contains=vimPatSep,vimPatRegion,vimPatSepErr,vimSubstTwoBS,vimSubstRange,vimNotation 245 syn cluster vimSubstList contains=vimPatSep,vimPatRegion,vimPatSepErr,vimSubstTwoBS,vimSubstRange,vimNotation
246 syn cluster vimSubstRepList contains=vimSubstSubstr,vimSubstTwoBS,vimNotation 246 syn cluster vimSubstRepList contains=vimSubstSubstr,vimSubstTwoBS,vimNotation
247 syn cluster vimSubstList add=vimCollection 247 syn cluster vimSubstList add=vimCollection
248 syn match vimSubst "\(:\+\s*\|^\s*\||\s*\)\<s\%[ubstitute][:[:alpha:]]\@!" nextgroup=vimSubstPat 248 syn match vimSubst "\(:\+\s*\|^\s*\||\s*\)\<\%(s\%[ubstitute]\|sm\%[agic]\|sno\%[magic]\)[:[:alpha:]]\@!" nextgroup=vimSubstPat
249 syn match vimSubst "s\%[ubstitute][:#[:alpha:]]\@!" nextgroup=vimSubstPat contained 249 syn match vimSubst "s\%[ubstitute][:#[:alpha:]]\@!" nextgroup=vimSubstPat contained
250 syn match vimSubst "/\zss\%[ubstitute]\ze/" nextgroup=vimSubstPat 250 syn match vimSubst "/\zss\%[ubstitute]\ze/" nextgroup=vimSubstPat
251 syn match vimSubst1 contained "s\%[ubstitute]\>" nextgroup=vimSubstPat 251 syn match vimSubst1 contained "s\%[ubstitute]\>" nextgroup=vimSubstPat
252 syn region vimSubstPat contained matchgroup=vimSubstDelim start="\z([^a-zA-Z( \t[\]&]\)"rs=s+1 skip="\\\\\|\\\z1" end="\z1"re=e-1,me=e-1 contains=@vimSubstList nextgroup=vimSubstRep4 oneline 252 syn region vimSubstPat contained matchgroup=vimSubstDelim start="\z([^a-zA-Z( \t[\]&]\)"rs=s+1 skip="\\\\\|\\\z1" end="\z1"re=e-1,me=e-1 contains=@vimSubstList nextgroup=vimSubstRep4 oneline
253 syn region vimSubstRep4 contained matchgroup=vimSubstDelim start="\z(.\)" skip="\\\\\|\\\z1" end="\z1" matchgroup=vimNotation end="<[cC][rR]>" contains=@vimSubstRepList nextgroup=vimSubstFlagErr oneline 253 syn region vimSubstRep4 contained matchgroup=vimSubstDelim start="\z(.\)" skip="\\\\\|\\\z1" end="\z1" matchgroup=vimNotation end="<[cC][rR]>" contains=@vimSubstRepList nextgroup=vimSubstFlagErr oneline
287 syn match vimCmplxRepeat '[^a-zA-Z_/\\()]q[0-9a-zA-Z"]\>'lc=1 287 syn match vimCmplxRepeat '[^a-zA-Z_/\\()]q[0-9a-zA-Z"]\>'lc=1
288 syn match vimCmplxRepeat '@[0-9a-z".=@:]\ze\($\|[^a-zA-Z]\>\)' 288 syn match vimCmplxRepeat '@[0-9a-z".=@:]\ze\($\|[^a-zA-Z]\>\)'
289 289
290 " Set command and associated set-options (vimOptions) with comment {{{2 290 " Set command and associated set-options (vimOptions) with comment {{{2
291 syn region vimSet matchgroup=vimCommand start="\<\%(setl\%[ocal]\|setg\%[lobal]\|se\%[t]\)\>" skip="\%(\\\\\)*\\." end="$" matchgroup=vimNotation end="<[cC][rR]>" keepend oneline contains=vimSetEqual,vimOption,vimErrSetting,vimComment,vimSetString,vimSetMod 291 syn region vimSet matchgroup=vimCommand start="\<\%(setl\%[ocal]\|setg\%[lobal]\|se\%[t]\)\>" skip="\%(\\\\\)*\\." end="$" matchgroup=vimNotation end="<[cC][rR]>" keepend oneline contains=vimSetEqual,vimOption,vimErrSetting,vimComment,vimSetString,vimSetMod
292 syn region vimSetEqual contained start="[=:]\|[-+^]=" skip="\%(\\\\\)*\\." end="[| \t]\|$"me=e-1 contains=vimCtrlChar,vimSetSep,vimNotation oneline 292 syn region vimSetEqual contained start="[=:]\|[-+^]=" skip="\\\\\|\\\s" end="[| \t]\|$"me=e-1 contains=vimCtrlChar,vimSetSep,vimNotation,vimEnvvar oneline
293 syn region vimSetString contained start=+="+hs=s+1 skip=+\\\\\|\\"+ end=+"+ contains=vimCtrlChar 293 syn region vimSetString contained start=+="+hs=s+1 skip=+\\\\\|\\"+ end=+"+ contains=vimCtrlChar
294 syn match vimSetSep contained "[,:]" 294 syn match vimSetSep contained "[,:]"
295 syn match vimSetMod contained "&vim\=\|[!&?<]\|all&" 295 syn match vimSetMod contained "&vim\=\|[!&?<]\|all&"
296 296
297 " Let {{{2 297 " Let {{{2
537 537
538 " Searches And Globals: {{{2 538 " Searches And Globals: {{{2
539 " ==================== 539 " ====================
540 syn match vimSearch '^\s*[/?].*' contains=vimSearchDelim 540 syn match vimSearch '^\s*[/?].*' contains=vimSearchDelim
541 syn match vimSearchDelim '^\s*\zs[/?]\|[/?]$' contained 541 syn match vimSearchDelim '^\s*\zs[/?]\|[/?]$' contained
542 syn region vimGlobal matchgroup=Statement start='\<g\%[lobal]!\=/' skip='\\.' end='/' 542 syn region vimGlobal matchgroup=Statement start='\<g\%[lobal]!\=/' skip='\\.' end='/' skipwhite nextgroup=vimSubst
543 syn region vimGlobal matchgroup=Statement start='\<v\%[global]!\=/' skip='\\.' end='/' 543 syn region vimGlobal matchgroup=Statement start='\<v\%[global]!\=/' skip='\\.' end='/' skipwhite nextgroup=vimSubst
544 544
545 " Scripts : perl,ruby : Benoit Cerrina {{{2 545 " Scripts : perl,ruby : Benoit Cerrina {{{2
546 " ======= python,tcl: Johannes Zellner 546 " ======= python,tcl: Johannes Zellner
547 " lua 547 " lua
548 548
560 endif 560 endif
561 561
562 " [-- lua --] {{{3 562 " [-- lua --] {{{3
563 let s:luapath= fnameescape(expand("<sfile>:p:h")."/lua.vim") 563 let s:luapath= fnameescape(expand("<sfile>:p:h")."/lua.vim")
564 if !filereadable(s:luapath) 564 if !filereadable(s:luapath)
565 let s:luapath= fnameescape(globpath(&rtp,"syntax/lua.vim")) 565 for s:luapath in split(globpath(&rtp,"syntax/lua.vim"),"\n")
566 if filereadable(fnameescape(s:luapath))
567 let s:luapath= fnameescape(s:luapath)
568 break
569 endif
570 endfor
566 endif 571 endif
567 if (g:vimsyn_embed =~ 'l' && has("lua")) && filereadable(s:luapath) 572 if (g:vimsyn_embed =~ 'l' && has("lua")) && filereadable(s:luapath)
568 unlet! b:current_syntax 573 unlet! b:current_syntax
569 exe "syn include @vimLuaScript ".s:luapath 574 exe "syn include @vimLuaScript ".s:luapath
570 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'l' 575 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'l'
582 unlet s:luapath 587 unlet s:luapath
583 588
584 " [-- perl --] {{{3 589 " [-- perl --] {{{3
585 let s:perlpath= fnameescape(expand("<sfile>:p:h")."/perl.vim") 590 let s:perlpath= fnameescape(expand("<sfile>:p:h")."/perl.vim")
586 if !filereadable(s:perlpath) 591 if !filereadable(s:perlpath)
587 let s:perlpath= fnameescape(globpath(&rtp,"syntax/perl.vim")) 592 for s:perlpath in split(globpath(&rtp,"syntax/perl.vim"),"\n")
593 if filereadable(fnameescape(s:perlpath))
594 let s:perlpath= fnameescape(s:perlpath)
595 break
596 endif
597 endfor
588 endif 598 endif
589 if (g:vimsyn_embed =~ 'p' && has("perl")) && filereadable(s:perlpath) 599 if (g:vimsyn_embed =~ 'p' && has("perl")) && filereadable(s:perlpath)
590 unlet! b:current_syntax 600 unlet! b:current_syntax
591 exe "syn include @vimPerlScript ".s:perlpath 601 exe "syn include @vimPerlScript ".s:perlpath
592 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'p' 602 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'p'
604 unlet s:perlpath 614 unlet s:perlpath
605 615
606 " [-- ruby --] {{{3 616 " [-- ruby --] {{{3
607 let s:rubypath= fnameescape(expand("<sfile>:p:h")."/ruby.vim") 617 let s:rubypath= fnameescape(expand("<sfile>:p:h")."/ruby.vim")
608 if !filereadable(s:rubypath) 618 if !filereadable(s:rubypath)
609 let s:rubypath= fnameescape(globpath(&rtp,"syntax/ruby.vim")) 619 for s:rubypath in split(globpath(&rtp,"syntax/ruby.vim"),"\n")
620 if filereadable(fnameescape(s:rubypath))
621 let s:rubypath= fnameescape(s:rubypath)
622 break
623 endif
624 endfor
610 endif 625 endif
611 if (g:vimsyn_embed =~ 'r' && has("ruby")) && filereadable(s:rubypath) 626 if (g:vimsyn_embed =~ 'r' && has("ruby")) && filereadable(s:rubypath)
612 unlet! b:current_syntax 627 unlet! b:current_syntax
613 exe "syn include @vimRubyScript ".s:rubypath 628 exe "syn include @vimRubyScript ".s:rubypath
614 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'r' 629 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'r'
625 unlet s:rubypath 640 unlet s:rubypath
626 641
627 " [-- python --] {{{3 642 " [-- python --] {{{3
628 let s:pythonpath= fnameescape(expand("<sfile>:p:h")."/python.vim") 643 let s:pythonpath= fnameescape(expand("<sfile>:p:h")."/python.vim")
629 if !filereadable(s:pythonpath) 644 if !filereadable(s:pythonpath)
630 let s:pythonpath= fnameescape(globpath(&rtp,"syntax/python.vim")) 645 for s:pythonpath in split(globpath(&rtp,"syntax/python.vim"),"\n")
631 endif 646 if filereadable(fnameescape(s:pythonpath))
632 if (g:vimsyn_embed =~ 'P' && has("python")) && filereadable(s:pythonpath) 647 let s:pythonpath= fnameescape(s:pythonpath)
648 break
649 endif
650 endfor
651 endif
652 if g:vimsyn_embed =~ 'P' && (has("python") || has("python3")) && filereadable(s:pythonpath)
633 unlet! b:current_syntax 653 unlet! b:current_syntax
634 exe "syn include @vimPythonScript ".s:pythonpath 654 exe "syn include @vimPythonScript ".s:pythonpath
635 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'P' 655 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 'P'
636 syn region vimPythonRegion fold matchgroup=vimScriptDelim start=+py\%[thon]3\=\s*<<\s*\z(.*\)$+ end=+^\z1$+ contains=@vimPythonScript 656 syn region vimPythonRegion fold matchgroup=vimScriptDelim start=+py\%[thon]3\=\s*<<\s*\z(.*\)$+ end=+^\z1$+ contains=@vimPythonScript
637 syn region vimPythonRegion fold matchgroup=vimScriptDelim start=+py\%[thon]3\=\s*<<\s*$+ end=+\.$+ contains=@vimPythonScript 657 syn region vimPythonRegion fold matchgroup=vimScriptDelim start=+py\%[thon]3\=\s*<<\s*$+ end=+\.$+ contains=@vimPythonScript
660 let s:trytcl= 1 680 let s:trytcl= 1
661 endif 681 endif
662 if s:trytcl 682 if s:trytcl
663 let s:tclpath= fnameescape(expand("<sfile>:p:h")."/tcl.vim") 683 let s:tclpath= fnameescape(expand("<sfile>:p:h")."/tcl.vim")
664 if !filereadable(s:tclpath) 684 if !filereadable(s:tclpath)
665 let s:tclpath= fnameescape(globpath(&rtp,"syntax/tcl.vim")) 685 for s:tclpath in split(globpath(&rtp,"syntax/tcl.vim"),"\n")
686 if filereadable(fnameescape(s:tclpath))
687 let s:tclpath= fnameescape(s:tclpath)
688 break
689 endif
690 endfor
666 endif 691 endif
667 if (g:vimsyn_embed =~ 't' && has("tcl")) && filereadable(s:tclpath) 692 if (g:vimsyn_embed =~ 't' && has("tcl")) && filereadable(s:tclpath)
668 unlet! b:current_syntax 693 unlet! b:current_syntax
669 exe "syn include @vimTclScript ".s:tclpath 694 exe "syn include @vimTclScript ".s:tclpath
670 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 't' 695 if exists("g:vimsyn_folding") && g:vimsyn_folding =~ 't'
687 unlet s:trytcl 712 unlet s:trytcl
688 713
689 " [-- mzscheme --] {{{3 714 " [-- mzscheme --] {{{3
690 let s:mzschemepath= fnameescape(expand("<sfile>:p:h")."/scheme.vim") 715 let s:mzschemepath= fnameescape(expand("<sfile>:p:h")."/scheme.vim")
691 if !filereadable(s:mzschemepath) 716 if !filereadable(s:mzschemepath)
692 let s:mzschemepath= fnameescape(globpath(&rtp,"syntax/scheme.vim")) 717 for s:mzschemepath in split(globpath(&rtp,"syntax/mzscheme.vim"),"\n")
718 if filereadable(fnameescape(s:mzschemepath))
719 let s:mzschemepath= fnameescape(s:mzschemepath)
720 break
721 endif
722 endfor
693 endif 723 endif
694 if (g:vimsyn_embed =~ 'm' && has("mzscheme")) && filereadable(s:mzschemepath) 724 if (g:vimsyn_embed =~ 'm' && has("mzscheme")) && filereadable(s:mzschemepath)
695 unlet! b:current_syntax 725 unlet! b:current_syntax
696 let iskKeep= &isk 726 let iskKeep= &isk
697 exe "syn include @vimMzSchemeScript ".s:mzschemepath 727 exe "syn include @vimMzSchemeScript ".s:mzschemepath
725 755
726 " ==================== 756 " ====================
727 " Highlighting Settings {{{2 757 " Highlighting Settings {{{2
728 " ==================== 758 " ====================
729 759
730 hi def link vimAuHighlight vimHighlight
731 hi def link vimSubst1 vimSubst 760 hi def link vimSubst1 vimSubst
732 hi def link vimBehaveModel vimBehave 761 hi def link vimBehaveModel vimBehave
733 762
734 if !exists("g:vimsyn_noerror") 763 if !exists("g:vimsyn_noerror")
735 hi def link vimBehaveError vimError 764 hi def link vimBehaveError vimError