Mercurial > vim

comparison runtime/compiler/gnat.vim @ 3496:d1e4abe8342c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed compatible mode in most runtime files.
author Bram Moolenaar <bram@vim.org>
date Mon, 30 Apr 2012 15:56:52 +0200
parents 7bc41231fbc7
children e1df51f68736
comparison
equal deleted inserted replaced
3495:0973ed3043c6 3496:d1e4abe8342c
15 " 15.10.2006 MK Bram's suggestion for runtime integration 15 " 15.10.2006 MK Bram's suggestion for runtime integration
16 " 19.09.2007 NO use project file only when there is a project 16 " 19.09.2007 NO use project file only when there is a project
17 " Help Page: compiler-gnat 17 " Help Page: compiler-gnat
18 "------------------------------------------------------------------------------ 18 "------------------------------------------------------------------------------
19 19
20 if (exists("current_compiler") && 20 if (exists("current_compiler")&& current_compiler == "gnat") || version < 700
21 \ current_compiler == "gnat") ||
22 \ version < 700
23 finish 21 finish
24 endif 22 endif
23 let s:keepcpo= &cpo
24 set cpo&vim
25 25
26 let current_compiler = "gnat" 26 let current_compiler = "gnat"
27 27
28 if !exists("g:gnat") 28 if !exists("g:gnat")
29 let g:gnat = gnat#New () 29 let g:gnat = gnat#New ()
60 endif 60 endif
61 61
62 execute "CompilerSet makeprg=" . escape (g:gnat.Get_Command('Make'), ' ') 62 execute "CompilerSet makeprg=" . escape (g:gnat.Get_Command('Make'), ' ')
63 execute "CompilerSet errorformat=" . escape (g:gnat.Error_Format, ' ') 63 execute "CompilerSet errorformat=" . escape (g:gnat.Error_Format, ' ')
64 64
65 let &cpo = s:keepcpo
66 unlet s:keepcpo
67
65 finish " 1}}} 68 finish " 1}}}
66 69
67 "------------------------------------------------------------------------------ 70 "------------------------------------------------------------------------------
68 " Copyright (C) 2006 Martin Krischik 71 " Copyright (C) 2006 Martin Krischik
69 " 72 "