Use deoplete and LSP for haskell
This commit is contained in:
@@ -1,11 +1,8 @@
|
||||
setlocal ts=2 sw=2 expandtab omnifunc=necoghc#omnifunc
|
||||
setlocal ts=2 sw=2 expandtab
|
||||
|
||||
"set background=light
|
||||
"set guifont=Neep\ Medium\ Semi-Condensed\ 18
|
||||
|
||||
let g:haskell_classic_highlighting = 1
|
||||
|
||||
|
||||
syntax on
|
||||
filetype plugin indent on
|
||||
|
||||
@@ -13,27 +10,14 @@ filetype plugin indent on
|
||||
call CmdAlias('hasktags', '!/home/jule/.cabal/bin/hasktags -c .<CR>')
|
||||
|
||||
|
||||
|
||||
function! HaskellDocCurrentWord()
|
||||
let word = expand("<cword>")
|
||||
exe "IDoc " . word
|
||||
endfunction
|
||||
|
||||
|
||||
|
||||
nmap <F8> :call HaskellDocCurrentWord()<CR><CR>
|
||||
|
||||
nmap <silent> <F3> :silent update <bar> HsimportModule<CR>
|
||||
nmap <silent> <F4> :silent update <bar> HsimportSymbol<CR>
|
||||
|
||||
" haskell-vim
|
||||
|
||||
let g:haskell_classic_highlighting = 1
|
||||
let g:haskell_indent_disable = 1
|
||||
" let g:haskell_enable_quantification = 1
|
||||
" let g:haskell_enable_recursivedo = 1
|
||||
" let g:haskell_enable_arrowsyntax = 1
|
||||
" let g:haskell_enable_pattern_synonyms = 1
|
||||
" let g:haskell_enable_typeroles = 1
|
||||
|
||||
" let g:haskell_indent_if = 3
|
||||
" let g:haskell_indent_case = 5
|
||||
" let g:haskell_indent_let = 4
|
||||
@@ -42,6 +26,19 @@ nmap <silent> <F4> :silent update <bar> HsimportSymbol<CR>
|
||||
" let g:haskell_indent_in = 1
|
||||
|
||||
|
||||
" haskellmode-vim
|
||||
function! HaskellDocCurrentWord()
|
||||
let word = expand("<cword>")
|
||||
exe "IDoc " . word
|
||||
endfunction
|
||||
|
||||
" done by LSP now
|
||||
" nmap <F7> :call HaskellDocCurrentWord()<CR><CR>
|
||||
|
||||
nmap <silent> <F3> :silent update <bar> HsimportModule<CR>
|
||||
nmap <silent> <F4> :silent update <bar> HsimportSymbol<CR>
|
||||
|
||||
|
||||
" liquid-types
|
||||
let g:vim_annotations_offset = '/.liquid/'
|
||||
|
||||
@@ -59,68 +56,79 @@ let g:vim_annotations_offset = '/.liquid/'
|
||||
" endfunction
|
||||
|
||||
|
||||
" let g:deoplete#enable_at_startup = 1
|
||||
|
||||
" set hidden
|
||||
" LSP
|
||||
let g:LanguageClient_autoStart = 1
|
||||
let g:LanguageClient_serverCommands = {
|
||||
\ 'haskell': ['hie', '--lsp', '-d', '-l', $HOME.'/lang-server.log'],
|
||||
\ }
|
||||
|
||||
" let g:LanguageClient_serverCommands = {
|
||||
" \ 'haskell': ['hie', '--lsp', '-d', '-l', '/home/hasufell/lang-server.log'],
|
||||
" \ }
|
||||
nnoremap <silent> <F7> :call LanguageClient#textDocument_hover()<CR>
|
||||
nnoremap <silent> gd :call LanguageClient#textDocument_definition()<CR>
|
||||
nnoremap <silent> <F8> :call LanguageClient#textDocument_rename()<CR>
|
||||
|
||||
" nnoremap <silent> K :call LanguageClient#textDocument_hover()<CR>
|
||||
" nnoremap <silent> gd :call LanguageClient#textDocument_definition()<CR>
|
||||
" nnoremap <silent> <F2> :call LanguageClient#textDocument_rename()<CR>
|
||||
" deoplete
|
||||
call deoplete#custom#option('sources',{
|
||||
\ '_': ['buffer'],
|
||||
\ 'haskell': ['ultisnips', 'buffer', 'file', 'LanguageClient']
|
||||
\ })
|
||||
call deoplete#enable()
|
||||
|
||||
" autocmd VimEnter * LanguageClientStart
|
||||
let g:ghcmod_hlint_options = ['--ignore=Eta reduce $']
|
||||
|
||||
if has("nvim")
|
||||
let g:ale_enabled = 0
|
||||
" ALE
|
||||
let g:ale_enabled = 0 " LSP does it
|
||||
let g:ale_linters = {'haskell':['ghc-mod', 'hdevtools'], 'c':['clang']}
|
||||
" let g:ale_fixers = {
|
||||
" \ 'go': ['gofmt', 'goimports'],
|
||||
" \}
|
||||
let g:ale_haskell_hdevtools_options = "-g '-Wall' -g '-Wno-orphans'"
|
||||
|
||||
" let g:intero_backend = {
|
||||
" \ 'command': 'cabal new-repl',
|
||||
" \ 'options': '',
|
||||
" \ 'cwd': expand('%:p:h'),
|
||||
" \}
|
||||
" completion
|
||||
"
|
||||
" neco-ghc
|
||||
" let g:necoghc_enable_detailed_browse = 1
|
||||
" let g:haskellmode_completion_ghc = 0
|
||||
" let g:necoghc_enable_detailed_browse = 1
|
||||
" autocmd FileType haskell setlocal omnifunc=necoghc#omnifunc
|
||||
" let g:ycm_semantic_triggers = {'haskell' : ['.']}
|
||||
|
||||
" Intero starts automatically. Set this if you'd like to prevent that.
|
||||
let g:intero_start_immediately = 1
|
||||
|
||||
" Enable type information on hover (when holding cursor at point for ~1 second).
|
||||
let g:intero_type_on_hover = 1
|
||||
|
||||
" Change the intero window size; default is 10.
|
||||
let g:intero_window_size = 15
|
||||
|
||||
" Sets the intero window to split vertically; default is horizontal
|
||||
let g:intero_vertical_split = 1
|
||||
" clear search
|
||||
nmap <F2> :noh<CR>:GhcModTypeClear<CR>
|
||||
imap <F2> <C-O>:noh<CR>:GhcModTypeClear<CR>
|
||||
|
||||
" OPTIONAL: Make the update time shorter, so the type info will trigger faster.
|
||||
set updatetime=1000
|
||||
" unmap <F3>
|
||||
" unmap <F4>
|
||||
|
||||
map <silent> <leader>t <Plug>InteroGenericType
|
||||
else
|
||||
let g:ghcmod_hlint_options = ['--ignore=Eta reduce $']
|
||||
nmap <F6> :GhcModType<CR>
|
||||
|
||||
" ALE
|
||||
let g:ale_linters = {'haskell':['ghc-mod', 'hdevtools'], 'c':['clang']}
|
||||
" let g:ale_fixers = {
|
||||
" \ 'go': ['gofmt', 'goimports'],
|
||||
" \}
|
||||
let g:ale_haskell_hdevtools_options = "-g '-Wall' -g '-Wno-orphans'"
|
||||
" for intero
|
||||
" if has("nvim")
|
||||
" let g:ale_enabled = 0
|
||||
|
||||
" neco-ghc
|
||||
let g:necoghc_enable_detailed_browse = 1
|
||||
let g:haskellmode_completion_ghc = 0
|
||||
let g:necoghc_enable_detailed_browse = 1
|
||||
autocmd FileType haskell setlocal omnifunc=necoghc#omnifunc
|
||||
let g:ycm_semantic_triggers = {'haskell' : ['.']}
|
||||
" " let g:intero_backend = {
|
||||
" " \ 'command': 'cabal new-repl',
|
||||
" " \ 'options': '',
|
||||
" " \ 'cwd': expand('%:p:h'),
|
||||
" " \}
|
||||
|
||||
" clear search
|
||||
nmap <F2> :noh<CR>:GhcModTypeClear<CR>
|
||||
imap <F2> <C-O>:noh<CR>:GhcModTypeClear<CR>
|
||||
" " Intero starts automatically. Set this if you'd like to prevent that.
|
||||
" let g:intero_start_immediately = 1
|
||||
|
||||
" unmap <F3>
|
||||
" unmap <F4>
|
||||
" " Enable type information on hover (when holding cursor at point for ~1 second).
|
||||
" let g:intero_type_on_hover = 1
|
||||
|
||||
nmap <F6> :GhcModType<CR>
|
||||
endif
|
||||
" " Change the intero window size; default is 10.
|
||||
" let g:intero_window_size = 15
|
||||
|
||||
" " Sets the intero window to split vertically; default is horizontal
|
||||
" let g:intero_vertical_split = 1
|
||||
|
||||
" " OPTIONAL: Make the update time shorter, so the type info will trigger faster.
|
||||
" set updatetime=1000
|
||||
|
||||
" map <silent> <leader>t <Plug>InteroGenericType
|
||||
" endif
|
||||
|
||||
Reference in New Issue
Block a user