You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
120 lines
3.7 KiB
VimL
120 lines
3.7 KiB
VimL
scriptencoding utf8
|
|
" Author: w0rp <devw0rp@gmail.com>
|
|
" Description: This module implements error/warning highlighting.
|
|
|
|
if !hlexists('ALEError')
|
|
highlight link ALEError SpellBad
|
|
endif
|
|
|
|
if !hlexists('ALEStyleError')
|
|
highlight link ALEStyleError ALEError
|
|
endif
|
|
|
|
if !hlexists('ALEWarning')
|
|
highlight link ALEWarning SpellCap
|
|
endif
|
|
|
|
if !hlexists('ALEStyleWarning')
|
|
highlight link ALEStyleWarning ALEWarning
|
|
endif
|
|
|
|
if !hlexists('ALEInfo')
|
|
highlight link ALEInfo ALEWarning
|
|
endif
|
|
|
|
" The maximum number of items for the second argument of matchaddpos()
|
|
let s:MAX_POS_VALUES = 8
|
|
let s:MAX_COL_SIZE = 1073741824 " pow(2, 30)
|
|
|
|
function! ale#highlight#CreatePositions(line, col, end_line, end_col) abort
|
|
if a:line >= a:end_line
|
|
" For single lines, just return the one position.
|
|
return [[[a:line, a:col, a:end_col - a:col + 1]]]
|
|
endif
|
|
|
|
" Get positions from the first line at the first column, up to a large
|
|
" integer for highlighting up to the end of the line, followed by
|
|
" the lines in-between, for highlighting entire lines, and
|
|
" a highlight for the last line, up to the end column.
|
|
let l:all_positions =
|
|
\ [[a:line, a:col, s:MAX_COL_SIZE]]
|
|
\ + range(a:line + 1, a:end_line - 1)
|
|
\ + [[a:end_line, 1, a:end_col]]
|
|
|
|
return map(
|
|
\ range(0, len(l:all_positions) - 1, s:MAX_POS_VALUES),
|
|
\ 'l:all_positions[v:val : v:val + s:MAX_POS_VALUES - 1]',
|
|
\)
|
|
endfunction
|
|
|
|
" Given a loclist for current items to highlight, remove all highlights
|
|
" except these which have matching loclist item entries.
|
|
function! ale#highlight#RemoveHighlights() abort
|
|
for l:match in getmatches()
|
|
if l:match.group =~# '^ALE'
|
|
call matchdelete(l:match.id)
|
|
endif
|
|
endfor
|
|
endfunction
|
|
|
|
function! ale#highlight#UpdateHighlights() abort
|
|
let l:item_list = g:ale_enabled
|
|
\ ? get(b:, 'ale_highlight_items', [])
|
|
\ : []
|
|
|
|
call ale#highlight#RemoveHighlights()
|
|
|
|
for l:item in l:item_list
|
|
if l:item.type is# 'W'
|
|
if get(l:item, 'sub_type', '') is# 'style'
|
|
let l:group = 'ALEStyleWarning'
|
|
else
|
|
let l:group = 'ALEWarning'
|
|
endif
|
|
elseif l:item.type is# 'I'
|
|
let l:group = 'ALEInfo'
|
|
elseif get(l:item, 'sub_type', '') is# 'style'
|
|
let l:group = 'ALEStyleError'
|
|
else
|
|
let l:group = 'ALEError'
|
|
endif
|
|
|
|
let l:line = l:item.lnum
|
|
let l:col = l:item.col
|
|
let l:end_line = get(l:item, 'end_lnum', l:line)
|
|
let l:end_col = get(l:item, 'end_col', l:col)
|
|
|
|
" Set all of the positions, which are chunked into Lists which
|
|
" are as large as will be accepted by matchaddpos.
|
|
call map(
|
|
\ ale#highlight#CreatePositions(l:line, l:col, l:end_line, l:end_col),
|
|
\ 'matchaddpos(l:group, v:val)'
|
|
\)
|
|
endfor
|
|
endfunction
|
|
|
|
function! ale#highlight#BufferHidden(buffer) abort
|
|
" Remove highlights right away when buffers are hidden.
|
|
" They will be restored later when buffers are entered.
|
|
call ale#highlight#RemoveHighlights()
|
|
endfunction
|
|
|
|
augroup ALEHighlightBufferGroup
|
|
autocmd!
|
|
autocmd BufEnter * call ale#highlight#UpdateHighlights()
|
|
autocmd BufHidden * call ale#highlight#BufferHidden(expand('<abuf>'))
|
|
augroup END
|
|
|
|
function! ale#highlight#SetHighlights(buffer, loclist) abort
|
|
let l:new_list = g:ale_enabled
|
|
\ ? filter(copy(a:loclist), 'v:val.bufnr == a:buffer && v:val.col > 0')
|
|
\ : []
|
|
|
|
" Set the list in the buffer variable.
|
|
call setbufvar(str2nr(a:buffer), 'ale_highlight_items', l:new_list)
|
|
|
|
" Update highlights for the current buffer, which may or may not
|
|
" be the buffer we just set highlights for.
|
|
call ale#highlight#UpdateHighlights()
|
|
endfunction
|