Lines Matching refs:self

29    let &l:makeprg	 = self.Get_Command('Make')
30    let &l:errorformat = self.Error_Format
39    execute "!" . self.Get_Command('Pretty')
43    execute "!" . self.Get_Command('Find')
47    execute "!" . self.Get_Command('Tags')
56       let self.Project_File = a:1
58       if ! filereadable (self.Project_File)
59 	 let self.Project_File = findfile (
60 	    \ fnamemodify (self.Project_File, ':r'),
64    elseif strlen (self.Project_File) > 0
65       let self.Project_File = browse (0, 'GNAT Project File?', '', self.Project_File)
67       let self.Project_File = browse (0, 'GNAT Project File?', '', expand ("%:e"))
69       let self.Project_File = browse (0, 'GNAT Project File?', '', 'default.gpr')
76    "if strlen (self.Project_File) > 0
80 	    "\ fnamemodify (self.Project_File, ":t:r") . ".vim")
84 	    "\ fnamemodify (self.Project_File, ":t:r") . ".vim")
94    let l:Command = eval ('self.' . a:Command . '_Command')
100       call self.Set_Project_File (argv(0))
102       call self.Set_Project_File (v:servername . '.gpr')
116       \ 'Make_Command'     : '"gnat make -P " . self.Project_File . "  -F -gnatef  "',
117       \ 'Pretty_Command'   : '"gnat pretty -P " . self.Project_File . " "',
118       \ 'Find_Program'     : '"gnat find -P " . self.Project_File . " -F "',
119       \ 'Tags_Command'     : '"gnat xref -P " . self.Project_File . " -v  *.AD*"',