move haskell syntax checkers into separate subdir
This commit is contained in:
parent
6942425b44
commit
fd173f1c91
@ -9,50 +9,23 @@
|
|||||||
" See http://sam.zoy.org/wtfpl/COPYING for more details.
|
" See http://sam.zoy.org/wtfpl/COPYING for more details.
|
||||||
"
|
"
|
||||||
"============================================================================
|
"============================================================================
|
||||||
if exists("loaded_haskell_syntax_checker")
|
if exists('g:loaded_haskell_syntax_checker')
|
||||||
finish
|
finish
|
||||||
endif
|
endif
|
||||||
let loaded_haskell_syntax_checker = 1
|
let g:loaded_haskell_syntax_checker = 1
|
||||||
|
|
||||||
if executable("hdevtools")
|
|
||||||
let s:checker = 'hdevtools'
|
|
||||||
elseif executable("ghc-mod")
|
|
||||||
let s:checker = 'ghc-mod'
|
|
||||||
else
|
|
||||||
finish
|
|
||||||
endif
|
|
||||||
|
|
||||||
if !exists('g:syntastic_haskell_checker_args')
|
|
||||||
let g:syntastic_haskell_checker_args = '--hlintOpt="--language=XmlSyntax"'
|
|
||||||
endif
|
|
||||||
|
|
||||||
function! SyntaxCheckers_haskell_GetLocList()
|
|
||||||
if s:checker == 'ghc-mod'
|
|
||||||
let ghcmod = 'ghc-mod ' . g:syntastic_haskell_checker_args
|
|
||||||
let makeprg =
|
|
||||||
\ "{ ".
|
|
||||||
\ ghcmod . " check ". shellescape(expand('%')) . "; " .
|
|
||||||
\ ghcmod . " lint " . shellescape(expand('%')) . ";" .
|
|
||||||
\ " }"
|
|
||||||
let errorformat = '%-G\\s%#,%f:%l:%c:%trror: %m,%f:%l:%c:%tarning: %m,'.
|
|
||||||
\ '%f:%l:%c: %trror: %m,%f:%l:%c: %tarning: %m,%f:%l:%c:%m,'.
|
|
||||||
\ '%E%f:%l:%c:,%Z%m,'
|
|
||||||
elseif s:checker == 'hdevtools'
|
|
||||||
let makeprg = 'hdevtools check ' . get(g:, 'hdevtools_options', '') . ' ' . shellescape(expand('%'))
|
|
||||||
|
|
||||||
let errorformat= '\%-Z\ %#,'.
|
|
||||||
\ '%W%f:%l:%c:\ Warning:\ %m,'.
|
|
||||||
\ '%E%f:%l:%c:\ %m,'.
|
|
||||||
\ '%E%>%f:%l:%c:,'.
|
|
||||||
\ '%+C\ \ %#%m,'.
|
|
||||||
\ '%W%>%f:%l:%c:,'.
|
|
||||||
\ '%+C\ \ %#%tarning:\ %m,'
|
|
||||||
|
|
||||||
|
if !exists('g:syntastic_haskell_checker')
|
||||||
|
if executable('hdevtools')
|
||||||
|
runtime! syntax_checkers/haskell/hdevtools.vim
|
||||||
|
elseif executable('ghc-mod')
|
||||||
|
runtime! syntax_checkers/haskell/ghc-mod.vim
|
||||||
endif
|
endif
|
||||||
|
elseif g:syntastic_haskell_checker == 'hdevtools'
|
||||||
return SyntasticMake({ 'makeprg': makeprg, 'errorformat': errorformat })
|
if executable('hdevtools')
|
||||||
endfunction
|
runtime! syntax_checkers/haskell/hdevtools.vim
|
||||||
|
endif
|
||||||
function! SyntaxCheckers_lhaskell_GetLocList()
|
elseif g:syntastic_haskell_checker == 'ghc-mod'
|
||||||
return SyntaxCheckers_haskell_GetLocList()
|
if executable('ghc-mod')
|
||||||
endfunction
|
runtime! syntax_checkers/haskell/ghc-mod.vim
|
||||||
|
endif
|
||||||
|
endif
|
||||||
|
33
syntax_checkers/haskell/ghc-mod.vim
Normal file
33
syntax_checkers/haskell/ghc-mod.vim
Normal file
@ -0,0 +1,33 @@
|
|||||||
|
"============================================================================
|
||||||
|
"File: ghc-mod.vim
|
||||||
|
"Description: Syntax checking plugin for syntastic.vim
|
||||||
|
"Maintainer: Anthony Carapetis <anthony.carapetis at gmail dot com>
|
||||||
|
"License: This program is free software. It comes without any warranty,
|
||||||
|
" 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
|
||||||
|
" Want To Public License, Version 2, as published by Sam Hocevar.
|
||||||
|
" See http://sam.zoy.org/wtfpl/COPYING for more details.
|
||||||
|
"
|
||||||
|
"============================================================================
|
||||||
|
|
||||||
|
if !exists('g:syntastic_haskell_checker_args')
|
||||||
|
let g:syntastic_haskell_checker_args = '--hlintOpt="--language=XmlSyntax"'
|
||||||
|
endif
|
||||||
|
|
||||||
|
function! SyntaxCheckers_haskell_GetLocList()
|
||||||
|
let ghcmod = 'ghc-mod ' . g:syntastic_haskell_checker_args
|
||||||
|
let makeprg =
|
||||||
|
\ "{ ".
|
||||||
|
\ ghcmod . " check ". shellescape(expand('%')) . "; " .
|
||||||
|
\ ghcmod . " lint " . shellescape(expand('%')) . ";" .
|
||||||
|
\ " }"
|
||||||
|
let errorformat = '%-G\\s%#,%f:%l:%c:%trror: %m,%f:%l:%c:%tarning: %m,'.
|
||||||
|
\ '%f:%l:%c: %trror: %m,%f:%l:%c: %tarning: %m,%f:%l:%c:%m,'.
|
||||||
|
\ '%E%f:%l:%c:,%Z%m,'
|
||||||
|
|
||||||
|
return SyntasticMake({ 'makeprg': makeprg, 'errorformat': errorformat })
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! SyntaxCheckers_lhaskell_GetLocList()
|
||||||
|
return SyntaxCheckers_haskell_GetLocList()
|
||||||
|
endfunction
|
30
syntax_checkers/haskell/hdevtools.vim
Normal file
30
syntax_checkers/haskell/hdevtools.vim
Normal file
@ -0,0 +1,30 @@
|
|||||||
|
"============================================================================
|
||||||
|
"File: hdevtools.vim
|
||||||
|
"Description: Syntax checking plugin for syntastic.vim
|
||||||
|
"Maintainer: Anthony Carapetis <anthony.carapetis at gmail dot com>
|
||||||
|
"License: This program is free software. It comes without any warranty,
|
||||||
|
" 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
|
||||||
|
" Want To Public License, Version 2, as published by Sam Hocevar.
|
||||||
|
" See http://sam.zoy.org/wtfpl/COPYING for more details.
|
||||||
|
"
|
||||||
|
"============================================================================
|
||||||
|
|
||||||
|
function! SyntaxCheckers_haskell_GetLocList()
|
||||||
|
let makeprg = 'hdevtools check ' . get(g:, 'hdevtools_options', '') .
|
||||||
|
\ ' ' . shellescape(expand('%'))
|
||||||
|
|
||||||
|
let errorformat= '\%-Z\ %#,'.
|
||||||
|
\ '%W%f:%l:%c:\ Warning:\ %m,'.
|
||||||
|
\ '%E%f:%l:%c:\ %m,'.
|
||||||
|
\ '%E%>%f:%l:%c:,'.
|
||||||
|
\ '%+C\ \ %#%m,'.
|
||||||
|
\ '%W%>%f:%l:%c:,'.
|
||||||
|
\ '%+C\ \ %#%tarning:\ %m,'
|
||||||
|
|
||||||
|
return SyntasticMake({ 'makeprg': makeprg, 'errorformat': errorformat })
|
||||||
|
endfunction
|
||||||
|
|
||||||
|
function! SyntaxCheckers_lhaskell_GetLocList()
|
||||||
|
return SyntaxCheckers_haskell_GetLocList()
|
||||||
|
endfunction
|
Loading…
Reference in New Issue
Block a user