Edit File: simula.vim
" Vim syntax file " Language: Simula " Maintainer: Haakon Riiser <hakonrk@fys.uio.no> " URL: http://folk.uio.no/hakonrk/vim/syntax/simula.vim " Last Change: 2001 May 15 " For version 5.x: Clear all syntax items " For version 6.x: Quit when a syntax file was already loaded if version < 600 syn clear elseif exists("b:current_syntax") finish endif " No case sensitivity in Simula syn case ignore syn match simulaComment "^%.*$" contains=simulaTodo syn region simulaComment start="!\|\<comment\>" end=";" contains=simulaTodo " Text between the keyword 'end' and either a semicolon or one of the " keywords 'end', 'else', 'when' or 'otherwise' is also a comment syn region simulaComment start="\<end\>"lc=3 matchgroup=Statement end=";\|\<\(end\|else\|when\|otherwise\)\>" syn match simulaCharError "'.\{-2,}'" syn match simulaCharacter "'.'" syn match simulaCharacter "'!\d\{-}!'" contains=simulaSpecialChar syn match simulaString '".\{-}"' contains=simulaSpecialChar,simulaTodo syn keyword simulaBoolean true false syn keyword simulaCompound begin end syn keyword simulaConditional else if otherwise then until when syn keyword simulaConstant none notext syn keyword simulaFunction procedure syn keyword simulaOperator eq eqv ge gt imp in is le lt ne new not qua syn keyword simulaRepeat while for syn keyword simulaReserved activate after at before delay go goto label prior reactivate switch to syn keyword simulaStatement do inner inspect step this syn keyword simulaStorageClass external hidden name protected value syn keyword simulaStructure class syn keyword simulaType array boolean character integer long real short text virtual syn match simulaAssigned "\<\h\w*\s*\((.*)\)\=\s*:\(=\|-\)"me=e-2 syn match simulaOperator "[&:=<>+\-*/]" syn match simulaOperator "\<and\(\s\+then\)\=\>" syn match simulaOperator "\<or\(\s\+else\)\=\>" syn match simulaReferenceType "\<ref\s*(.\{-})" syn match simulaSemicolon ";" syn match simulaSpecial "[(),.]" syn match simulaSpecialCharErr "!\d\{-4,}!" contained syn match simulaSpecialCharErr "!!" contained syn match simulaSpecialChar "!\d\{-}!" contains=simulaSpecialCharErr contained syn match simulaTodo "xxx\+" contained " Integer number (or float without `.') syn match simulaNumber "-\=\<\d\+\>" " Real with optional exponent syn match simulaReal "-\=\<\d\+\(\.\d\+\)\=\(&&\=[+-]\=\d\+\)\=\>" " Real starting with a `.', optional exponent syn match simulaReal "-\=\.\d\+\(&&\=[+-]\=\d\+\)\=\>" if version >= 508 || !exists("did_simula_syntax_inits") if version < 508 let did_simula_syntax_inits = 1 command -nargs=+ HiLink hi link <args> else command -nargs=+ HiLink hi def link <args> endif HiLink simulaAssigned Identifier HiLink simulaBoolean Boolean HiLink simulaCharacter Character HiLink simulaCharError Error HiLink simulaComment Comment HiLink simulaCompound Statement HiLink simulaConditional Conditional HiLink simulaConstant Constant HiLink simulaFunction Function HiLink simulaNumber Number HiLink simulaOperator Operator HiLink simulaReal Float HiLink simulaReferenceType Type HiLink simulaRepeat Repeat HiLink simulaReserved Error HiLink simulaSemicolon Statement HiLink simulaSpecial Special HiLink simulaSpecialChar SpecialChar HiLink simulaSpecialCharErr Error HiLink simulaStatement Statement HiLink simulaStorageClass StorageClass HiLink simulaString String HiLink simulaStructure Structure HiLink simulaTodo Todo HiLink simulaType Type delcommand HiLink endif let b:current_syntax = "simula" " vim: sts=4 sw=4 ts=8