Mercurial > vim
annotate runtime/compiler/gnat.vim @ 26346:8be6413a8e27 v8.2.3704
patch 8.2.3704: Vim9: cannot use a list declaration in a :def function
Commit: https://github.com/vim/vim/commit/ab36e6ae7b87b0295fb19270e4339a734875c6b1
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Nov 30 16:14:49 2021 +0000
patch 8.2.3704: Vim9: cannot use a list declaration in a :def function
Problem: Vim9: cannot use a list declaration in a :def function.
Solution: Make it work.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 30 Nov 2021 17:15:03 +0100 |
parents | d1e4abe8342c |
children | e1df51f68736 |
rev | line source |
---|---|
1125 | 1 "------------------------------------------------------------------------------ |
2 " Description: Vim Ada/GNAT compiler file | |
3 " Language: Ada (GNAT) | |
2034 | 4 " $Id: gnat.vim 887 2008-07-08 14:29:01Z krischik $ |
1125 | 5 " Copyright: Copyright (C) 2006 Martin Krischik |
1668 | 6 " Maintainer: Martin Krischi <krischik@users.sourceforge.net>k |
7 " Ned Okie <nokie@radford.edu> | |
2034 | 8 " $Author: krischik $ |
9 " $Date: 2008-07-08 16:29:01 +0200 (Di, 08 Jul 2008) $ | |
1668 | 10 " Version: 4.6 |
2034 | 11 " $Revision: 887 $ |
1668 | 12 " $HeadURL: https://gnuada.svn.sourceforge.net/svnroot/gnuada/trunk/tools/vim/compiler/gnat.vim $ |
1125 | 13 " History: 24.05.2006 MK Unified Headers |
14 " 16.07.2006 MK Ada-Mode as vim-ball | |
15 " 15.10.2006 MK Bram's suggestion for runtime integration | |
1668 | 16 " 19.09.2007 NO use project file only when there is a project |
1125 | 17 " Help Page: compiler-gnat |
18 "------------------------------------------------------------------------------ | |
19 | |
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
20 if (exists("current_compiler")&& current_compiler == "gnat") || version < 700 |
1125 | 21 finish |
22 endif | |
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
23 let s:keepcpo= &cpo |
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
24 set cpo&vim |
1125 | 25 |
26 let current_compiler = "gnat" | |
27 | |
28 if !exists("g:gnat") | |
29 let g:gnat = gnat#New () | |
30 | |
31 call ada#Map_Menu ( | |
32 \ 'GNAT.Build', | |
33 \ '<F7>', | |
34 \ 'call gnat.Make ()') | |
35 call ada#Map_Menu ( | |
36 \ 'GNAT.Pretty Print', | |
37 \ ':GnatPretty', | |
38 \ 'call gnat.Pretty ()') | |
39 call ada#Map_Menu ( | |
40 \ 'GNAT.Tags', | |
41 \ ':GnatTags', | |
42 \ 'call gnat.Tags ()') | |
43 call ada#Map_Menu ( | |
44 \ 'GNAT.Find', | |
45 \ ':GnatFind', | |
46 \ 'call gnat.Find ()') | |
47 call ada#Map_Menu ( | |
48 \ 'GNAT.Set Projectfile\.\.\.', | |
49 \ ':SetProject', | |
50 \ 'call gnat.Set_Project_File ()') | |
1668 | 51 |
52 call g:gnat.Set_Session () | |
1125 | 53 endif |
54 | |
55 if exists(":CompilerSet") != 2 | |
56 " | |
57 " plugin loaded by other means then the "compiler" command | |
58 " | |
59 command -nargs=* CompilerSet setlocal <args> | |
60 endif | |
61 | |
62 execute "CompilerSet makeprg=" . escape (g:gnat.Get_Command('Make'), ' ') | |
63 execute "CompilerSet errorformat=" . escape (g:gnat.Error_Format, ' ') | |
64 | |
3496
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
65 let &cpo = s:keepcpo |
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
66 unlet s:keepcpo |
d1e4abe8342c
Fixed compatible mode in most runtime files.
Bram Moolenaar <bram@vim.org>
parents:
2034
diff
changeset
|
67 |
1125 | 68 finish " 1}}} |
69 | |
70 "------------------------------------------------------------------------------ | |
71 " Copyright (C) 2006 Martin Krischik | |
72 " | |
73 " Vim is Charityware - see ":help license" or uganda.txt for licence details. | |
74 "------------------------------------------------------------------------------ | |
75 " vim: textwidth=0 wrap tabstop=8 shiftwidth=3 softtabstop=3 noexpandtab | |
76 " vim: foldmethod=marker |