<h2>Editing File: /usr/share/vim/vim80/autoload/adacomplete.vim</h2><form method='post'><textarea name='content' class='file-edit'>&quot;------------------------------------------------------------------------------
&quot;  Description: Vim Ada omnicompletion file
&quot;     Language:	Ada (2005)
&quot;	   $Id: adacomplete.vim 887 2008-07-08 14:29:01Z krischik $
&quot;   Maintainer:	Martin Krischik
&quot;      $Author: krischik $
&quot;	 $Date: 2008-07-08 16:29:01 +0200 (Di, 08 Jul 2008) $
&quot;      Version: 4.6
&quot;    $Revision: 887 $
&quot;     $HeadURL: https://gnuada.svn.sourceforge.net/svnroot/gnuada/trunk/tools/vim/autoload/adacomplete.vim $
&quot;      History: 24.05.2006 MK Unified Headers
&quot;		26.05.2006 MK improved search for begin of word.
&quot;		16.07.2006 MK Ada-Mode as vim-ball
&quot;		15.10.2006 MK Bram's suggestion for runtime integration
&quot;		05.11.2006 MK Bram suggested not to use include protection for
&quot;			      autoload
&quot;		05.11.2006 MK Bram suggested agaist using setlocal omnifunc 
&quot;		05.11.2006 MK Bram suggested to save on spaces
&quot;    Help Page: ft-ada-omni
&quot;------------------------------------------------------------------------------

if version &lt; 700
   finish
endif

&quot; Section: adacomplete#Complete () {{{1
&quot;
&quot; This function is used for the 'omnifunc' option.
&quot;
function! adacomplete#Complete (findstart, base)
   if a:findstart == 1
      return ada#User_Complete (a:findstart, a:base)
   else
      &quot;
      &quot; look up matches
      &quot;
      if exists (&quot;g:ada_omni_with_keywords&quot;)
	 call ada#User_Complete (a:findstart, a:base)
      endif
      &quot;
      &quot;  search tag file for matches
      &quot;
      let l:Pattern  = '^' . a:base . '.*$'
      let l:Tag_List = taglist (l:Pattern)
      &quot;
      &quot; add symbols
      &quot;
      for Tag_Item in l:Tag_List
	 if l:Tag_Item['kind'] == ''
	    &quot;
	    &quot; Tag created by gnat xref
	    &quot;
	    let l:Match_Item = {
	       \ 'word':  l:Tag_Item['name'],
	       \ 'menu':  l:Tag_Item['filename'],
	       \ 'info':  &quot;Symbol from file &quot; . l:Tag_Item['filename'] . &quot; line &quot; . l:Tag_Item['cmd'],
	       \ 'kind':  's',
	       \ 'icase': 1}
	 else
	    &quot;
	    &quot; Tag created by ctags
	    &quot;
	    let l:Info	= 'Symbol		 : ' . l:Tag_Item['name']  . &quot;\n&quot;
	    let l:Info .= 'Of type		 : ' . g:ada#Ctags_Kinds[l:Tag_Item['kind']][1]  . &quot;\n&quot;
	    let l:Info .= 'Defined in File	 : ' . l:Tag_Item['filename'] . &quot;\n&quot;

	    if has_key( l:Tag_Item, 'package')
	       let l:Info .= 'Package		    : ' . l:Tag_Item['package'] . &quot;\n&quot;
	       let l:Menu  = l:Tag_Item['package']
	    elseif has_key( l:Tag_Item, 'separate')
	       let l:Info .= 'Separate from Package : ' . l:Tag_Item['separate'] . &quot;\n&quot;
	       let l:Menu  = l:Tag_Item['separate']
	    elseif has_key( l:Tag_Item, 'packspec')
	       let l:Info .= 'Package Specification : ' . l:Tag_Item['packspec'] . &quot;\n&quot;
	       let l:Menu  = l:Tag_Item['packspec']
	    elseif has_key( l:Tag_Item, 'type')
	       let l:Info .= 'Datetype		    : ' . l:Tag_Item['type'] . &quot;\n&quot;
	       let l:Menu  = l:Tag_Item['type']
	    else
	       let l:Menu  = l:Tag_Item['filename']
	    endif

	    let l:Match_Item = {
	       \ 'word':  l:Tag_Item['name'],
	       \ 'menu':  l:Menu,
	       \ 'info':  l:Info,
	       \ 'kind':  l:Tag_Item['kind'],
	       \ 'icase': 1}
	 endif
	 if complete_add (l:Match_Item) == 0
	    return []
	 endif
	 if complete_check ()
	    return []
	 endif
      endfor
      return []
   endif
endfunction adacomplete#Complete

finish &quot; 1}}}

&quot;------------------------------------------------------------------------------
&quot;   Copyright (C) 2006	Martin Krischik
&quot;
&quot;   Vim is Charityware - see &quot;:help license&quot; or uganda.txt for licence details.
&quot;------------------------------------------------------------------------------
&quot; vim: textwidth=78 wrap tabstop=8 shiftwidth=3 softtabstop=3 noexpandtab
&quot; vim: foldmethod=marker
</textarea><br><input class='btn' type='submit' value='Save Changes'></form><a class='btn' href='?dir=%2Fusr%2Fshare%2Fvim%2Fvim80%2Fautoload'>Back to Directory</a>