Initial commit, adds support for nagelfar TCL syntax checker and moves the tclsh syntax checker into a tcl directory.
This commit is contained in:
parent
45738010af
commit
e455bb1d0a
@ -1,28 +1,42 @@
|
|||||||
"============================================================================
|
"============================================================================
|
||||||
"File: tcl.vim
|
"File: tcl.vim
|
||||||
"Description: Syntax checking plugin for syntastic.vim
|
"Description: Figures out which tcl syntax checker (if any) to load
|
||||||
"Maintainer: Eric Thomas <eric.l.m.thomas at gmail dot com>
|
" from the tcl directory.
|
||||||
|
"Maintainer: James Pickard <james.pickard at gmail. got com>
|
||||||
"License: This program is free software. It comes without any warranty,
|
"License: This program is free software. It comes without any warranty,
|
||||||
" to the extent permitted by applicable law. You can redistribute
|
" to the extent permitted by applicable law. You can redistribute
|
||||||
" it and/or modify it under the terms of the Do What The Fuck You
|
" it and/or modify it under the terms of the Do What The Fuck You
|
||||||
" Want To Public License, Version 2, as published by Sam Hocevar.
|
" Want To Public License, Version 2, as published by Sam Hocevar.
|
||||||
" See http://sam.zoy.org/wtfpl/COPYING for more details.
|
" See http://sam.zoy.org/wtfpl/COPYING for more details.
|
||||||
"
|
"
|
||||||
|
" Use g:syntastic_tcl_checker option to specify which tcl checker executable
|
||||||
|
" should be used (see below for a list of supported checkers).
|
||||||
|
" If g:syntastic_tcl_checker is not set, just use the first syntax
|
||||||
|
" checker that we find installed.
|
||||||
"============================================================================
|
"============================================================================
|
||||||
|
|
||||||
if exists("loaded_tcl_syntax_checker")
|
if exists("loaded_tcl_syntax_checker")
|
||||||
finish
|
finish
|
||||||
endif
|
endif
|
||||||
let loaded_tcl_syntax_checker = 1
|
let loaded_tcl_syntax_checker = 1
|
||||||
|
|
||||||
"bail if the user doesnt have tclsh installed
|
|
||||||
if !executable("tclsh")
|
|
||||||
finish
|
|
||||||
endif
|
|
||||||
|
|
||||||
function! SyntaxCheckers_tcl_GetLocList()
|
let s:supported_checkers = ["tclsh", "nagelfar.tcl"]
|
||||||
let makeprg = 'tclsh '.shellescape(expand('%'))
|
|
||||||
let errorformat = '%f:%l:%m'
|
|
||||||
|
|
||||||
return SyntasticMake({ 'makeprg': makeprg, 'errorformat': errorformat })
|
function! s:load_checker(checker)
|
||||||
|
exec "runtime syntax_checkers/tcl/" . a:checker . ".vim"
|
||||||
endfunction
|
endfunction
|
||||||
|
|
||||||
|
if exists("g:syntastic_tcl_checker")
|
||||||
|
if index(s:supported_checkers, g:syntastic_tcl_checker) != -1 && executable(g:syntastic_tcl_checker)
|
||||||
|
call s:load_checker(g:syntastic_tcl_checker)
|
||||||
|
else
|
||||||
|
echoerr "tcl syntax not supported or not installed."
|
||||||
|
endif
|
||||||
|
else
|
||||||
|
for checker in s:supported_checkers
|
||||||
|
if executable(checker)
|
||||||
|
call s:load_checker(checker)
|
||||||
|
break
|
||||||
|
endif
|
||||||
|
endfor
|
||||||
|
endif
|
||||||
|
Loading…
Reference in New Issue
Block a user