" Vim syntax file " Language: Ada (95) " Maintainer: David A. Wheeler " Last Change: 1998 Dec 7 " Former Maintainer: Simon Bradley " (was ) " This version fixes an error in String/Character handling from 1997-May-5. " The formal spec of Ada95 is available at "http://www.adahome.com/rm95/". " Remove any old syntax stuff hanging around. syn clear " Ada is entirely case-insensitive. syn case ignore " The Ada 95 reserved words. There are 69 reserved words in total. syn keyword adaConditional abort case else elsif if select when syn keyword adaKeyword all do end exception in is new null out pragma syn keyword adaKeyword separate then until syn keyword adaLabel others syn keyword adaOperator abs and mod not or rem xor syn keyword adaPreCondit begin body declare entry function generic syn keyword adaPreCondit package procedure protected renames task use syn keyword adaPreCondit with syn keyword adaRepeat exit for loop reverse while syn keyword adaStatement accept delay goto raise requeue return syn keyword adaStatement terminate syn keyword adaStructure record syn keyword adaType abstract access aliased array at constant delta syn keyword adaType digits limited of private range tagged subtype syn keyword adaType type " Todo. syn keyword adaTodo contained TODO FIXME XXX " Strings and characters. syn region adaString start=+"+ skip=+""+ end=+"+ syn match adaCharacter "'.'" " Numbers. syn match adaNumber "[+-]\=\<[0-9_]*\.\=[0-9_]*\>" " Labels for the goto statement. syn region adaLabel start="<<" end=">>" " Comments. syn region adaComment oneline contains=adaTodo start="--" end="$" if !exists("did_ada_syntax_inits") let did_ada_syntax_inits = 1 " The default methods for highlighting. Can be overridden later. hi link adaCharacter Character hi link adaComment Comment hi link adaConditional Conditional hi link adaKeyword Keyword hi link adaLabel Label hi link adaNumber Number hi link adaOperator Operator hi link adaPreCondit PreCondit hi link adaRepeat Repeat hi link adaSpecial Special hi link adaStatement Statement hi link adaString String hi link adaStructure Structure hi link adaTodo Todo hi link adaType Type endif let b:current_syntax = "ada" " vim: ts=8