1"------------------------------------------------------------------------------ 2" Description: Vim Ada/GNAT compiler file 3" Language: Ada (GNAT) 4" $Id: gnat.vim 887 2008-07-08 14:29:01Z krischik $ 5" Copyright: Copyright (C) 2006 Martin Krischik 6" Maintainer: Martin Krischi <[email protected]>k 7" Ned Okie <[email protected]> 8" $Author: krischik $ 9" $Date: 2008-07-08 16:29:01 +0200 (Di, 08 Jul 2008) $ 10" Version: 4.6 11" $Revision: 887 $ 12" $HeadURL: https://gnuada.svn.sourceforge.net/svnroot/gnuada/trunk/tools/vim/compiler/gnat.vim $ 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 16" 19.09.2007 NO use project file only when there is a project 17" Help Page: compiler-gnat 18"------------------------------------------------------------------------------ 19 20if (exists("current_compiler")&& current_compiler == "gnat") || version < 700 21 finish 22endif 23let s:keepcpo= &cpo 24set cpo&vim 25 26let current_compiler = "gnat" 27 28if !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 ()') 51 52 call g:gnat.Set_Session () 53endif 54 55if exists(":CompilerSet") != 2 56 " 57 " plugin loaded by other means then the "compiler" command 58 " 59 command -nargs=* CompilerSet setlocal <args> 60endif 61 62execute "CompilerSet makeprg=" . escape (g:gnat.Get_Command('Make'), ' ') 63execute "CompilerSet errorformat=" . escape (g:gnat.Error_Format, ' ') 64 65let &cpo = s:keepcpo 66unlet s:keepcpo 67 68finish " 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 77