annotate runtime/ftplugin/ada.vim @ 22627:1064b9f05b0a v8.2.1862

patch 8.2.1862: vim9: memory leak when compiling lambda fails Commit: https://github.com/vim/vim/commit/2ea79ad83584f5d668adfb935be67ee0e0e9995b Author: Bram Moolenaar <Bram@vim.org> Date: Sun Oct 18 23:32:13 2020 +0200 patch 8.2.1862: vim9: memory leak when compiling lambda fails Problem: vim9: memory leak when compiling lambda fails. Solution: Call clear_evalarg().
author Bram Moolenaar <Bram@vim.org>
date Sun, 18 Oct 2020 23:45:03 +0200
parents 2d1383658bb4
children 34b4eb3a8458
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
1 "------------------------------------------------------------------------------
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
2 " Description: Perform Ada specific completion & tagging.
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
3 " Language: Ada (2005)
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1668
diff changeset
4 " $Id: ada.vim 887 2008-07-08 14:29:01Z krischik $
1668
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
5 " Maintainer: Martin Krischik <krischik@users.sourceforge.net>
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
6 " Taylor Venable <taylor@metasyntax.net>
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
7 " Neil Bird <neil@fnxweb.com>
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1668
diff changeset
8 " $Author: krischik $
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1668
diff changeset
9 " $Date: 2008-07-08 16:29:01 +0200 (Di, 08 Jul 2008) $
4264
2d1383658bb4 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
10 " Version: 4.6 with patch from David Bürgin
2034
7bc41231fbc7 Update runtime files.
Bram Moolenaar <bram@zimbu.org>
parents: 1668
diff changeset
11 " $Revision: 887 $
1668
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
12 " $HeadURL: https://gnuada.svn.sourceforge.net/svnroot/gnuada/trunk/tools/vim/ftplugin/ada.vim $
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
13 " History: 24.05.2006 MK Unified Headers
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
14 " 26.05.2006 MK ' should not be in iskeyword.
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
15 " 16.07.2006 MK Ada-Mode as vim-ball
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
16 " 02.10.2006 MK Better folding.
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
17 " 15.10.2006 MK Bram's suggestion for runtime integration
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
18 " 05.11.2006 MK Bram suggested not to use include protection for
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
19 " autoload
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
20 " 05.11.2006 MK Bram suggested to save on spaces
1668
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
21 " 08.07.2007 TV fix default compiler problems.
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
22 " Help Page: ft-ada-plugin
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
23 "------------------------------------------------------------------------------
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
24 " Provides mapping overrides for tag jumping that figure out the current
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
25 " Ada object and tag jump to that, not the 'simple' vim word.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
26 " Similarly allows <Ctrl-N> matching of full-length ada entities from tags.
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
27 "------------------------------------------------------------------------------
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
28
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
29 " Only do this when not done yet for this buffer
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
30 if exists ("b:did_ftplugin") || version < 700
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
31 finish
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
32 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
33
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
34 " Don't load another plugin for this buffer
1668
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
35 let b:did_ftplugin = 45
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
36
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
37 "
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
38 " Temporarily set cpoptions to ensure the script loads OK
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
39 "
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
40 let s:cpoptions = &cpoptions
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
41 set cpoptions-=C
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
42
1668
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
43 " Section: Comments {{{1
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
44 "
4264
2d1383658bb4 Updated runtime files.
Bram Moolenaar <bram@vim.org>
parents: 2034
diff changeset
45 setlocal comments=O:--,:--\ \
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
46 setlocal commentstring=--\ \ %s
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
47 setlocal complete=.,w,b,u,t,i
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
48
1668
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
49 " Section: case {{{1
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
50 "
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
51 setlocal nosmartcase
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
52 setlocal ignorecase
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
53
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
54 " Section: formatoptions {{{1
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
55 "
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
56 setlocal formatoptions+=ron
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
57
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
58 " Section: Tagging {{{1
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
59 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
60 if exists ("g:ada_extended_tagging")
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
61 " Make local tag mappings for this buffer (if not already set)
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
62 if g:ada_extended_tagging == 'jump'
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
63 if mapcheck('<C-]>','n') == ''
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
64 nnoremap <unique> <buffer> <C-]> :call ada#Jump_Tag ('', 'tjump')<cr>
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
65 endif
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
66 if mapcheck('g<C-]>','n') == ''
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
67 nnoremap <unique> <buffer> g<C-]> :call ada#Jump_Tag ('','stjump')<cr>
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
68 endif
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
69 elseif g:ada_extended_tagging == 'list'
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
70 if mapcheck('<C-]>','n') == ''
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
71 nnoremap <unique> <buffer> <C-]> :call ada#List_Tag ()<cr>
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
72 endif
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
73 if mapcheck('g<C-]>','n') == ''
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
74 nnoremap <unique> <buffer> g<C-]> :call ada#List_Tag ()<cr>
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
75 endif
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
76 endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
77 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
78
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
79 " Section: Completion {{{1
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
80 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
81 setlocal completefunc=ada#User_Complete
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
82 setlocal omnifunc=adacomplete#Complete
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
83
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
84 if exists ("g:ada_extended_completion")
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
85 if mapcheck ('<C-N>','i') == ''
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
86 inoremap <unique> <buffer> <C-N> <C-R>=ada#Completion("\<lt>C-N>")<cr>
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
87 endif
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
88 if mapcheck ('<C-P>','i') == ''
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
89 inoremap <unique> <buffer> <C-P> <C-R>=ada#Completion("\<lt>C-P>")<cr>
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
90 endif
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
91 if mapcheck ('<C-X><C-]>','i') == ''
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
92 inoremap <unique> <buffer> <C-X><C-]> <C-R>=<SID>ada#Completion("\<lt>C-X>\<lt>C-]>")<cr>
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
93 endif
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
94 if mapcheck ('<bs>','i') == ''
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
95 inoremap <silent> <unique> <buffer> <bs> <C-R>=ada#Insert_Backspace ()<cr>
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
96 endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
97 endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
98
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
99 " Section: Matchit {{{1
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
100 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
101 " Only do this when not done yet for this buffer & matchit is used
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
102 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
103 if !exists ("b:match_words") &&
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
104 \ exists ("loaded_matchit")
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
105 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
106 " The following lines enable the macros/matchit.vim plugin for
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
107 " Ada-specific extended matching with the % key.
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
108 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
109 let s:notend = '\%(\<end\s\+\)\@<!'
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
110 let b:match_words =
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
111 \ s:notend . '\<if\>:\<elsif\>:\<else\>:\<end\>\s\+\<if\>,' .
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
112 \ s:notend . '\<case\>:\<when\>:\<end\>\s\+\<case\>,' .
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
113 \ '\%(\<while\>.*\|\<for\>.*\|'.s:notend.'\)\<loop\>:\<end\>\s\+\<loop\>,' .
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
114 \ '\%(\<do\>\|\<begin\>\):\<exception\>:\<end\>\s*\%($\|[;A-Z]\),' .
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
115 \ s:notend . '\<record\>:\<end\>\s\+\<record\>'
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
116 endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
117
1668
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
118
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
119 " Section: Compiler {{{1
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
120 "
1668
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
121 if ! exists("g:ada_default_compiler")
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
122 if has("vms")
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
123 let g:ada_default_compiler = 'decada'
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
124 else
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
125 let g:ada_default_compiler = 'gnat'
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
126 endif
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
127 endif
0b796e045c42 updated for version 7.2b-000
vimboss
parents: 1121
diff changeset
128
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
129 if ! exists("current_compiler") ||
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
130 \ current_compiler != g:ada_default_compiler
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
131 execute "compiler " . g:ada_default_compiler
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
132 endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
133
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
134 " Section: Folding {{{1
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
135 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
136 if exists("g:ada_folding")
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
137 if g:ada_folding[0] == 'i'
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
138 setlocal foldmethod=indent
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
139 setlocal foldignore=--
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
140 setlocal foldnestmax=5
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
141 elseif g:ada_folding[0] == 'g'
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
142 setlocal foldmethod=expr
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
143 setlocal foldexpr=ada#Pretty_Print_Folding(v:lnum)
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
144 elseif g:ada_folding[0] == 's'
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
145 setlocal foldmethod=syntax
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
146 endif
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
147 setlocal tabstop=8
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
148 setlocal softtabstop=3
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
149 setlocal shiftwidth=3
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
150 endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
151
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
152 " Section: Abbrev {{{1
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
153 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
154 if exists("g:ada_abbrev")
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
155 iabbrev ret return
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
156 iabbrev proc procedure
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
157 iabbrev pack package
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
158 iabbrev func function
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
159 endif
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
160
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
161 " Section: Commands, Mapping, Menus {{{1
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
162 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
163 call ada#Map_Popup (
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
164 \ 'Tag.List',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
165 \ 'l',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
166 \ 'call ada#List_Tag ()')
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
167 call ada#Map_Popup (
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
168 \'Tag.Jump',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
169 \'j',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
170 \'call ada#Jump_Tag ()')
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
171 call ada#Map_Menu (
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
172 \'Tag.Create File',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
173 \':AdaTagFile',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
174 \'call ada#Create_Tags (''file'')')
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
175 call ada#Map_Menu (
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
176 \'Tag.Create Dir',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
177 \':AdaTagDir',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
178 \'call ada#Create_Tags (''dir'')')
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
179
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
180 call ada#Map_Menu (
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
181 \'Highlight.Toggle Space Errors',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
182 \ ':AdaSpaces',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
183 \'call ada#Switch_Syntax_Option (''space_errors'')')
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
184 call ada#Map_Menu (
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
185 \'Highlight.Toggle Lines Errors',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
186 \ ':AdaLines',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
187 \'call ada#Switch_Syntax_Option (''line_errors'')')
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
188 call ada#Map_Menu (
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
189 \'Highlight.Toggle Rainbow Color',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
190 \ ':AdaRainbow',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
191 \'call ada#Switch_Syntax_Option (''rainbow_color'')')
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
192 call ada#Map_Menu (
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
193 \'Highlight.Toggle Standard Types',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
194 \ ':AdaTypes',
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
195 \'call ada#Switch_Syntax_Option (''standard_types'')')
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
196
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
197 " 1}}}
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
198 " Reset cpoptions
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
199 let &cpoptions = s:cpoptions
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
200 unlet s:cpoptions
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
201
1121
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
202 finish " 1}}}
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
203
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
204 "------------------------------------------------------------------------------
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
205 " Copyright (C) 2006 Martin Krischik
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
206 "
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
207 " Vim is Charityware - see ":help license" or uganda.txt for licence details.
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
208 "------------------------------------------------------------------------------
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
209 " vim: textwidth=78 nowrap tabstop=8 shiftwidth=3 softtabstop=3 noexpandtab
e63691e7c504 updated for version 7.1a
vimboss
parents: 839
diff changeset
210 " vim: foldmethod=marker