Mercurial > vim
view runtime/compiler/gnat.vim @ 30553:7e5ff77472b2
Added tag v9.0.0611 for changeset a7a9e8b9af899ae3f8184a70464db8ce2311f00b
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Tue, 27 Sep 2022 20:45:03 +0200 |
parents | d1e4abe8342c |
children | e1df51f68736 |
line wrap: on
line source
"------------------------------------------------------------------------------ " Description: Vim Ada/GNAT compiler file " Language: Ada (GNAT) " $Id: gnat.vim 887 2008-07-08 14:29:01Z krischik $ " Copyright: Copyright (C) 2006 Martin Krischik " Maintainer: Martin Krischi <krischik@users.sourceforge.net>k " Ned Okie <nokie@radford.edu> " $Author: krischik $ " $Date: 2008-07-08 16:29:01 +0200 (Di, 08 Jul 2008) $ " Version: 4.6 " $Revision: 887 $ " $HeadURL: https://gnuada.svn.sourceforge.net/svnroot/gnuada/trunk/tools/vim/compiler/gnat.vim $ " History: 24.05.2006 MK Unified Headers " 16.07.2006 MK Ada-Mode as vim-ball " 15.10.2006 MK Bram's suggestion for runtime integration " 19.09.2007 NO use project file only when there is a project " Help Page: compiler-gnat "------------------------------------------------------------------------------ if (exists("current_compiler")&& current_compiler == "gnat") || version < 700 finish endif let s:keepcpo= &cpo set cpo&vim let current_compiler = "gnat" if !exists("g:gnat") let g:gnat = gnat#New () call ada#Map_Menu ( \ 'GNAT.Build', \ '<F7>', \ 'call gnat.Make ()') call ada#Map_Menu ( \ 'GNAT.Pretty Print', \ ':GnatPretty', \ 'call gnat.Pretty ()') call ada#Map_Menu ( \ 'GNAT.Tags', \ ':GnatTags', \ 'call gnat.Tags ()') call ada#Map_Menu ( \ 'GNAT.Find', \ ':GnatFind', \ 'call gnat.Find ()') call ada#Map_Menu ( \ 'GNAT.Set Projectfile\.\.\.', \ ':SetProject', \ 'call gnat.Set_Project_File ()') call g:gnat.Set_Session () endif if exists(":CompilerSet") != 2 " " plugin loaded by other means then the "compiler" command " command -nargs=* CompilerSet setlocal <args> endif execute "CompilerSet makeprg=" . escape (g:gnat.Get_Command('Make'), ' ') execute "CompilerSet errorformat=" . escape (g:gnat.Error_Format, ' ') let &cpo = s:keepcpo unlet s:keepcpo finish " 1}}} "------------------------------------------------------------------------------ " Copyright (C) 2006 Martin Krischik " " Vim is Charityware - see ":help license" or uganda.txt for licence details. "------------------------------------------------------------------------------ " vim: textwidth=0 wrap tabstop=8 shiftwidth=3 softtabstop=3 noexpandtab " vim: foldmethod=marker