1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
" 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
|
