Mercurial > vim

comparison runtime/syntax/perl.vim @ 2531:c9022997af9e vim73

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Runtime file updates.
author Bram Moolenaar <bram@vim.org>
date Mon, 09 Aug 2010 22:33:06 +0200
parents b9e314fe473f
children 0bb74f626ba7
comparison
equal deleted inserted replaced
2530:9fe4164cb586 2531:c9022997af9e
139 " variable - there again, too complicated and too slow. 139 " variable - there again, too complicated and too slow.
140 140
141 " Special variables first ($^A, ...) and ($|, $', ...) 141 " Special variables first ($^A, ...) and ($|, $', ...)
142 syn match perlVarPlain "$^[ACDEFHILMNOPRSTVWX]\=" 142 syn match perlVarPlain "$^[ACDEFHILMNOPRSTVWX]\="
143 syn match perlVarPlain "$[\\\"\[\]'&`+*.,;=%~!?@#$<>(-]" 143 syn match perlVarPlain "$[\\\"\[\]'&`+*.,;=%~!?@#$<>(-]"
144 syn match perlVarPlain "%+"
144 syn match perlVarPlain "$\%(0\|[1-9]\d*\)" 145 syn match perlVarPlain "$\%(0\|[1-9]\d*\)"
145 " Same as above, but avoids confusion in $::foo (equivalent to $main::foo) 146 " Same as above, but avoids confusion in $::foo (equivalent to $main::foo)
146 syn match perlVarPlain "$::\@!" 147 syn match perlVarPlain "$::\@!"
147 " These variables are not recognized within matches. 148 " These variables are not recognized within matches.
148 syn match perlVarNotInMatches "$[|)]" 149 syn match perlVarNotInMatches "$[|)]"
214 " 215 "
215 " Highlight lines with only whitespace (only in blank delimited here documents) as errors 216 " Highlight lines with only whitespace (only in blank delimited here documents) as errors
216 syn match perlNotEmptyLine "^\s\+$" contained 217 syn match perlNotEmptyLine "^\s\+$" contained
217 " Highlight '} else if (...) {', it should be '} else { if (...) { ' or 218 " Highlight '} else if (...) {', it should be '} else { if (...) { ' or
218 " '} elsif (...) {'. 219 " '} elsif (...) {'.
219 syn match perlElseIfError "[^[:space:]{]\+" contained 220 syn match perlElseIfError "\s\+if" contained
221 syn keyword perlElseIfError elseif
220 222
221 " Variable interpolation 223 " Variable interpolation
222 " 224 "
223 " These items are interpolated inside "" strings and similar constructs. 225 " These items are interpolated inside "" strings and similar constructs.
224 syn cluster perlInterpDQ contains=perlSpecialString,perlVarPlain,perlVarNotInMatches,perlVarSlash,perlVarBlock 226 syn cluster perlInterpDQ contains=perlSpecialString,perlVarPlain,perlVarNotInMatches,perlVarSlash,perlVarBlock