2017-05-16 14:35:43 +03:00
|
|
|
decl -docstring "shell command run to build the project" \
|
|
|
|
str makecmd make
|
|
|
|
decl -docstring "pattern that describes lines containing information about errors in the output of the `makecmd` command" \
|
|
|
|
str make_error_pattern " (?:fatal )?error:"
|
2016-12-06 17:47:03 +03:00
|
|
|
|
2017-05-16 14:35:43 +03:00
|
|
|
decl -docstring "name of the client in which utilities display information" \
|
|
|
|
str toolsclient
|
2016-12-09 16:33:01 +03:00
|
|
|
decl -hidden int make_current_error_line
|
2013-01-06 22:21:42 +04:00
|
|
|
|
2016-10-11 10:03:41 +03:00
|
|
|
def -params .. \
|
|
|
|
-docstring %{make [<arguments>]: make utility wrapper
|
|
|
|
All the optional arguments are forwarded to the make utility} \
|
|
|
|
make %{ %sh{
|
2017-06-09 14:05:31 +03:00
|
|
|
output=$(mktemp -d "${TMPDIR:-/tmp}"/kak-make.XXXXXXXX)/fifo
|
2012-09-12 21:54:46 +04:00
|
|
|
mkfifo ${output}
|
2014-03-06 07:35:38 +04:00
|
|
|
( eval ${kak_opt_makecmd} "$@" > ${output} 2>&1 ) > /dev/null 2>&1 < /dev/null &
|
2013-02-21 16:38:12 +04:00
|
|
|
|
2016-04-23 08:47:01 +03:00
|
|
|
printf %s\\n "eval -try-client '$kak_opt_toolsclient' %{
|
2014-05-02 21:58:04 +04:00
|
|
|
edit! -fifo ${output} -scroll *make*
|
2013-12-07 17:56:56 +04:00
|
|
|
set buffer filetype make
|
2016-12-09 16:33:01 +03:00
|
|
|
set buffer make_current_error_line 0
|
2015-02-20 21:43:09 +03:00
|
|
|
hook -group fifo buffer BufCloseFifo .* %{
|
|
|
|
nop %sh{ rm -r $(dirname ${output}) }
|
2017-01-04 03:07:45 +03:00
|
|
|
remove-hooks buffer fifo
|
2015-02-20 21:43:09 +03:00
|
|
|
}
|
2013-12-07 17:56:56 +04:00
|
|
|
}"
|
2012-08-07 15:52:49 +04:00
|
|
|
}}
|
|
|
|
|
2017-01-04 03:07:45 +03:00
|
|
|
add-highlighter -group / group make
|
|
|
|
add-highlighter -group /make regex "^((?:\w:)?[^:\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
|
2017-01-10 16:44:11 +03:00
|
|
|
add-highlighter -group /make regex "^\h*(~*(?:(\^)~*)?)$" 1:green 2:cyan+b
|
2017-01-04 03:07:45 +03:00
|
|
|
add-highlighter -group /make line '%opt{make_current_error_line}' default+b
|
2013-12-04 02:15:59 +04:00
|
|
|
|
2017-01-04 03:07:45 +03:00
|
|
|
hook -group make-highlight global WinSetOption filetype=make %{ add-highlighter ref make }
|
2016-09-25 16:15:07 +03:00
|
|
|
|
2012-08-07 15:52:49 +04:00
|
|
|
hook global WinSetOption filetype=make %{
|
2016-07-11 21:47:56 +03:00
|
|
|
hook buffer -group make-hooks NormalKey <ret> make-jump
|
2012-08-07 15:52:49 +04:00
|
|
|
}
|
|
|
|
|
2017-01-04 03:07:45 +03:00
|
|
|
hook -group make-highlight global WinSetOption filetype=(?!make).* %{ remove-highlighter make }
|
2016-09-28 09:45:01 +03:00
|
|
|
|
|
|
|
hook global WinSetOption filetype=(?!make).* %{
|
2017-01-04 03:07:45 +03:00
|
|
|
remove-hooks buffer make-hooks
|
2016-09-28 09:45:01 +03:00
|
|
|
}
|
2012-08-07 15:52:49 +04:00
|
|
|
|
2017-05-16 14:35:43 +03:00
|
|
|
decl -docstring "name of the client in which all source code jumps will be executed" \
|
|
|
|
str jumpclient
|
2014-04-04 19:34:43 +04:00
|
|
|
|
2016-10-11 10:03:41 +03:00
|
|
|
def -hidden make-jump %{
|
2016-03-20 19:37:58 +03:00
|
|
|
eval -collapse-jumps %{
|
|
|
|
try %{
|
2017-02-13 16:52:51 +03:00
|
|
|
exec gl<a-?> "Entering directory" <ret><a-:>
|
|
|
|
# Try to parse the error into capture groups, failing on absolute paths
|
|
|
|
exec s "Entering directory '([^']+)'.*\n([^:/][^:]*):(\d+):(?:(\d+):)?([^\n]+)\'" <ret>l
|
2016-12-09 16:33:01 +03:00
|
|
|
set buffer make_current_error_line %val{cursor_line}
|
|
|
|
eval -try-client %opt{jumpclient} "edit -existing %reg{1}/%reg{2} %reg{3} %reg{4}; echo -color Information %{%reg{5}}; try %{ focus }"
|
2016-03-20 19:37:58 +03:00
|
|
|
} catch %{
|
|
|
|
exec <a-h><a-l> s "((?:\w:)?[^:]+):(\d+):(?:(\d+):)?([^\n]+)\'" <ret>l
|
2016-12-09 16:33:01 +03:00
|
|
|
set buffer make_current_error_line %val{cursor_line}
|
|
|
|
eval -try-client %opt{jumpclient} "edit -existing %reg{1} %reg{2} %reg{3}; echo -color Information %{%reg{4}}; try %{ focus }"
|
2016-03-20 19:37:58 +03:00
|
|
|
}
|
2013-12-13 17:58:12 +04:00
|
|
|
}
|
|
|
|
}
|
2014-06-18 22:30:40 +04:00
|
|
|
|
2016-10-11 10:03:41 +03:00
|
|
|
def make-next -docstring 'Jump to the next make error' %{
|
2016-03-20 19:37:58 +03:00
|
|
|
eval -collapse-jumps -try-client %opt{jumpclient} %{
|
2014-06-18 22:30:40 +04:00
|
|
|
buffer '*make*'
|
2016-12-09 16:33:01 +03:00
|
|
|
exec "%opt{make_current_error_line}ggl" "/^(?:\w:)?[^:\n]+:\d+:(?:\d+:)?%opt{make_error_pattern}<ret>"
|
2015-08-05 01:10:08 +03:00
|
|
|
make-jump
|
2014-06-18 22:30:40 +04:00
|
|
|
}
|
2016-12-09 16:33:01 +03:00
|
|
|
try %{ eval -client %opt{toolsclient} %{ exec %opt{make_current_error_line}g } }
|
2014-06-18 22:30:40 +04:00
|
|
|
}
|
|
|
|
|
2016-10-11 10:03:41 +03:00
|
|
|
def make-prev -docstring 'Jump to the previous make error' %{
|
2016-03-20 19:37:58 +03:00
|
|
|
eval -collapse-jumps -try-client %opt{jumpclient} %{
|
2014-06-18 22:30:40 +04:00
|
|
|
buffer '*make*'
|
2016-12-09 16:33:01 +03:00
|
|
|
exec "%opt{make_current_error_line}g" "<a-/>^(?:\w:)?[^:\n]+:\d+:(?:\d+:)?%opt{make_error_pattern}<ret>"
|
2015-08-05 01:10:08 +03:00
|
|
|
make-jump
|
2014-06-18 22:30:40 +04:00
|
|
|
}
|
2016-12-09 16:33:01 +03:00
|
|
|
try %{ eval -client %opt{toolsclient} %{ exec %opt{make_current_error_line}g } }
|
2014-06-18 22:30:40 +04:00
|
|
|
}
|