2013-03-03 17:25:40 +01:00
|
|
|
decl str makecmd make
|
2013-04-17 19:15:15 +02:00
|
|
|
decl str toolsclient
|
2014-06-18 20:30:40 +02:00
|
|
|
decl -hidden int _make_current_error_line
|
2013-01-06 19:21:42 +01:00
|
|
|
|
2012-12-06 20:12:44 +01:00
|
|
|
def -shell-params make %{ %sh{
|
2012-10-02 10:37:08 +02:00
|
|
|
output=$(mktemp -d -t kak-make.XXXXXXXX)/fifo
|
2012-09-12 19:54:46 +02:00
|
|
|
mkfifo ${output}
|
2014-03-06 04:35:38 +01:00
|
|
|
( eval ${kak_opt_makecmd} "$@" > ${output} 2>&1 ) > /dev/null 2>&1 < /dev/null &
|
2013-02-21 13:38:12 +01:00
|
|
|
|
2013-12-07 14:56:56 +01:00
|
|
|
echo "eval -try-client '$kak_opt_toolsclient' %{
|
2014-05-02 19:58:04 +02:00
|
|
|
edit! -fifo ${output} -scroll *make*
|
2013-12-07 14:56:56 +01:00
|
|
|
set buffer filetype make
|
2014-06-18 20:30:40 +02:00
|
|
|
set buffer _make_current_error_line 0
|
2014-06-16 20:49:58 +02:00
|
|
|
hook buffer BufCloseFifo .* %{ nop %sh{ rm -r $(dirname ${output}) } }
|
2013-12-07 14:56:56 +01:00
|
|
|
}"
|
2012-08-07 13:52:49 +02:00
|
|
|
}}
|
|
|
|
|
2014-06-12 22:52:23 +02:00
|
|
|
addhl -group / group make
|
2014-08-02 10:54:28 +02:00
|
|
|
addhl -group /make regex "^([^:\n]+):(\d+):(?:(\d+):)?\h+(?:((?:fatal )?error)|(warning)|(note)|(required from(?: here)?))?.*?$" 1:cyan 2:green 3:green 4:red 5:yellow 6:blue 7:yellow
|
|
|
|
addhl -group /make line_option _make_current_error_line default,rgb:606060
|
2013-12-03 23:15:59 +01:00
|
|
|
|
2012-08-07 13:52:49 +02:00
|
|
|
hook global WinSetOption filetype=make %{
|
2013-12-03 23:15:59 +01:00
|
|
|
addhl ref make
|
2014-06-16 21:42:12 +02:00
|
|
|
hook buffer -group make-hooks NormalKey <c-m> errjump
|
2012-08-07 13:52:49 +02:00
|
|
|
}
|
|
|
|
|
2013-12-03 23:15:59 +01:00
|
|
|
hook global WinSetOption filetype=(?!make).* %{ rmhl make; rmhooks buffer make-hooks }
|
2012-08-07 13:52:49 +02:00
|
|
|
|
2014-04-04 17:34:43 +02:00
|
|
|
decl str jumpclient
|
|
|
|
|
2014-02-19 04:45:41 +01:00
|
|
|
def errjump -docstring 'Jump to error location' %{
|
2013-12-13 14:58:12 +01:00
|
|
|
try %{
|
|
|
|
exec gll<a-?> "Entering directory" <ret>
|
2014-08-02 10:54:28 +02:00
|
|
|
exec s "Entering directory '([^']+)'.*\n([^:]+):(\d+):(?:(\d+):)?([^\n]+)\'" <ret>l
|
2014-06-18 20:30:40 +02:00
|
|
|
set buffer _make_current_error_line %val{cursor_line}
|
2014-07-31 23:10:01 +02:00
|
|
|
eval -try-client %opt{jumpclient} %rec{edit -existing %reg{1}/%reg{2} %reg{3} %reg{4}; echo -color Information '%reg{5}'}
|
2014-04-08 00:46:37 +02:00
|
|
|
try %{ focus %opt{jumpclient} }
|
2013-12-13 14:58:12 +01:00
|
|
|
} catch %{
|
2014-08-02 10:54:28 +02:00
|
|
|
exec ghgl s "([^:]+):(\d+):(?:(\d+):)?([^\n]+)\'" <ret>l
|
2014-06-18 20:30:40 +02:00
|
|
|
set buffer _make_current_error_line %val{cursor_line}
|
2014-07-31 23:10:01 +02:00
|
|
|
eval -try-client %opt{jumpclient} %rec{edit -existing %reg{1} %reg{2} %reg{3}; echo -color Information '%reg{4}'}
|
2014-04-08 00:46:37 +02:00
|
|
|
try %{ focus %opt{jumpclient} }
|
2013-12-13 14:58:12 +01:00
|
|
|
}
|
|
|
|
}
|
2014-06-18 20:30:40 +02:00
|
|
|
|
|
|
|
def errnext -docstring 'Jump to next error' %{
|
|
|
|
eval -try-client %opt{jumpclient} %{
|
|
|
|
buffer '*make*'
|
2014-07-28 20:40:34 +02:00
|
|
|
exec %rec{%opt{_make_current_error_line}ggl/[0-9]+: (?:fatal )?error:<ret>}
|
2014-06-18 20:30:40 +02:00
|
|
|
errjump
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
def errprev -docstring 'Jump to previous error' %{
|
|
|
|
eval -try-client %opt{jumpclient} %{
|
|
|
|
buffer '*make*'
|
2014-07-28 20:40:34 +02:00
|
|
|
exec %rec{%opt{_make_current_error_line}ggh<a-/>[0-9]+: (?:fatal )?error:<ret>}
|
2014-06-18 20:30:40 +02:00
|
|
|
errjump
|
|
|
|
}
|
|
|
|
}
|