neovim

Neovim text editor
git clone https://git.dasho.dev/neovim.git
Log | Files | Refs | README

gnat.vim (2259B)

      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 <krischik@users.sourceforge.net>
      7 "		Ned Okie <nokie@radford.edu>
      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 
     20 if (exists("current_compiler")&& current_compiler == "gnat") || version < 700
     21   finish
     22 endif
     23 let s:keepcpo= &cpo
     24 set cpo&vim
     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 ()')
     51 
     52   call g:gnat.Set_Session ()
     53 endif
     54 
     55 execute "CompilerSet makeprg="     . escape (g:gnat.Get_Command('Make'), ' ')
     56 execute "CompilerSet errorformat=" . escape (g:gnat.Error_Format, ' ')
     57 
     58 let &cpo = s:keepcpo
     59 unlet s:keepcpo
     60 
     61 finish " 1}}}
     62 
     63 "------------------------------------------------------------------------------
     64 "   Copyright (C) 2006  Martin Krischik
     65 "
     66 "   Vim is Charityware - see ":help license" or uganda.txt for licence details.
     67 "------------------------------------------------------------------------------
     68 " vim: textwidth=0 wrap tabstop=8 shiftwidth=3 softtabstop=3 noexpandtab
     69 " vim: foldmethod=marker