diff options
Diffstat (limited to 'runtime/syntax/pascal.vim')
-rw-r--r-- | runtime/syntax/pascal.vim | 91 |
1 files changed, 40 insertions, 51 deletions
diff --git a/runtime/syntax/pascal.vim b/runtime/syntax/pascal.vim index d2b6060ac..4a290f059 100644 --- a/runtime/syntax/pascal.vim +++ b/runtime/syntax/pascal.vim @@ -12,11 +12,8 @@ " Austin Ziegler <austin@halostatue.ca>, " Markus Koenig <markus@stber-koenig.de> -" 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") +" quit when a syntax file was already loaded +if exists("b:current_syntax") finish endif @@ -320,52 +317,44 @@ if !exists("pascal_traditional") endif " 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_pascal_syn_inits") - if version < 508 - let did_pascal_syn_inits = 1 - command -nargs=+ HiLink hi link <args> - else - command -nargs=+ HiLink hi def link <args> - endif - - HiLink pascalAcces pascalStatement - HiLink pascalBoolean Boolean - HiLink pascalComment Comment - HiLink pascalConditional Conditional - HiLink pascalConstant Constant - HiLink pascalDelimiter Identifier - HiLink pascalDirective pascalStatement - HiLink pascalException Exception - HiLink pascalFloat Float - HiLink pascalFunction Function - HiLink pascalLabel Label - HiLink pascalMatrixDelimiter Identifier - HiLink pascalModifier Type - HiLink pascalNumber Number - HiLink pascalOperator Operator - HiLink pascalPredefined pascalStatement - HiLink pascalPreProc PreProc - HiLink pascalRepeat Repeat - HiLink pascalSpaceError Error - HiLink pascalStatement Statement - HiLink pascalString String - HiLink pascalStringEscape Special - HiLink pascalStringEscapeGPC Special - HiLink pascalStringError Error - HiLink pascalStruct pascalStatement - HiLink pascalSymbolOperator pascalOperator - HiLink pascalTodo Todo - HiLink pascalType Type - HiLink pascalUnclassified pascalStatement - " HiLink pascalAsm Assembler - HiLink pascalError Error - HiLink pascalAsmKey pascalStatement - HiLink pascalShowTab Error - - delcommand HiLink -endif +" Only when an item doesn't have highlighting yet +command -nargs=+ HiLink hi def link <args> + +HiLink pascalAcces pascalStatement +HiLink pascalBoolean Boolean +HiLink pascalComment Comment +HiLink pascalConditional Conditional +HiLink pascalConstant Constant +HiLink pascalDelimiter Identifier +HiLink pascalDirective pascalStatement +HiLink pascalException Exception +HiLink pascalFloat Float +HiLink pascalFunction Function +HiLink pascalLabel Label +HiLink pascalMatrixDelimiter Identifier +HiLink pascalModifier Type +HiLink pascalNumber Number +HiLink pascalOperator Operator +HiLink pascalPredefined pascalStatement +HiLink pascalPreProc PreProc +HiLink pascalRepeat Repeat +HiLink pascalSpaceError Error +HiLink pascalStatement Statement +HiLink pascalString String +HiLink pascalStringEscape Special +HiLink pascalStringEscapeGPC Special +HiLink pascalStringError Error +HiLink pascalStruct pascalStatement +HiLink pascalSymbolOperator pascalOperator +HiLink pascalTodo Todo +HiLink pascalType Type +HiLink pascalUnclassified pascalStatement +" HiLink pascalAsm Assembler +HiLink pascalError Error +HiLink pascalAsmKey pascalStatement +HiLink pascalShowTab Error + +delcommand HiLink let b:current_syntax = "pascal" |