home *** CD-ROM | disk | FTP | other *** search
- " Vim syntax file
- " Language: Ada (95)
- " Maintainer: Simon Bradley <sib93@aber.ac.uk>
- " Last change: 1997 May 5
-
- " 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
-
- " 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
-