X-Git-Url: https://git.madduck.net/etc/vim.git/blobdiff_plain/0ee596c5c5e11fc79598407eaf22f83d279f7e9e..5a4872f466ebd76ddd532bdf2798554421c53df4:/.vim/bundle/ale/ale_linters/haskell/stack_ghc.vim

diff --git a/.vim/bundle/ale/ale_linters/haskell/stack_ghc.vim b/.vim/bundle/ale/ale_linters/haskell/stack_ghc.vim
new file mode 100644
index 00000000..51ecc744
--- /dev/null
+++ b/.vim/bundle/ale/ale_linters/haskell/stack_ghc.vim
@@ -0,0 +1,21 @@
+" Author: w0rp <devw0rp@gmail.com>
+" Description: ghc for Haskell files, using Stack
+
+call ale#Set('haskell_stack_ghc_options', '-fno-code -v0')
+
+function! ale_linters#haskell#stack_ghc#GetCommand(buffer) abort
+    return ale#handlers#haskell#GetStackExecutable(a:buffer)
+    \ . ' ghc -- '
+    \ . ale#Var(a:buffer, 'haskell_stack_ghc_options')
+    \ . ' %t'
+endfunction
+
+call ale#linter#Define('haskell', {
+\   'name': 'stack_ghc',
+\   'aliases': ['stack-ghc'],
+\   'output_stream': 'stderr',
+\   'executable': function('ale#handlers#haskell#GetStackExecutable'),
+\   'cwd': '%s:h',
+\   'command': function('ale_linters#haskell#stack_ghc#GetCommand'),
+\   'callback': 'ale#handlers#haskell#HandleGHCFormat',
+\})