mirror of
https://github.com/mawww/kakoune.git
synced 2024-12-29 14:44:56 +03:00
0a9c90fecf
This should cover all filetypes that already auto-insert comments,
except for rust.kak, which is left for a follow-up.
Most of these are straightforward, some explanation for special cases:
rc/filetype/zig.kak rc/filetype/cue.kak
These indent hooks used their own logic to indent after "{" only if
no comment was inserted. Replace this logic by checking if a comment
was inserted. This works because these "*-insert" hooks are run
before their respective "*-indent" hooks.
rc/filetype/php.kak
This also has some logic to insert "*" after "/*" lines. Basic
usage seems to work still. In future this should borrow from the
c-family one, which works a bit better.
85 lines
3.4 KiB
Plaintext
85 lines
3.4 KiB
Plaintext
# http://complang.org/ragel
|
|
# ‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾
|
|
|
|
# ragel.kak does not try to detect host language.
|
|
|
|
# Detection
|
|
# ‾‾‾‾‾‾‾‾‾
|
|
|
|
hook global BufCreate .*[.](ragel|rl) %{
|
|
set-option buffer filetype ragel
|
|
}
|
|
|
|
# Initialization
|
|
# ‾‾‾‾‾‾‾‾‾‾‾‾‾‾
|
|
|
|
hook global WinSetOption filetype=ragel %{
|
|
require-module ragel
|
|
|
|
hook window ModeChange pop:insert:.* -group ragel-trim-indent ragel-trim-indent
|
|
hook window InsertChar .* -group ragel-indent ragel-indent-on-char
|
|
hook window InsertChar \n -group ragel-insert ragel-insert-on-new-line
|
|
hook window InsertChar \n -group ragel-indent ragel-indent-on-new-line
|
|
|
|
hook -once -always window WinSetOption filetype=.* %{ remove-hooks window ragel-.+ }
|
|
}
|
|
|
|
hook -group ragel-highlight global WinSetOption filetype=ragel %{
|
|
add-highlighter window/ragel ref ragel
|
|
hook -once -always window WinSetOption filetype=.* %{ remove-highlighter window/ragel }
|
|
}
|
|
|
|
provide-module ragel %§
|
|
|
|
# Highlighters
|
|
# ‾‾‾‾‾‾‾‾‾‾‾‾
|
|
|
|
add-highlighter shared/ragel regions
|
|
add-highlighter shared/ragel/code default-region group
|
|
add-highlighter shared/ragel/double_string region '"' (?<!\\)(\\\\)*" fill string
|
|
add-highlighter shared/ragel/single_string region "'" "'" fill string
|
|
add-highlighter shared/ragel/comment region '#' '$' fill comment
|
|
|
|
add-highlighter shared/ragel/code/ regex \b(true|false)\b 0:value
|
|
add-highlighter shared/ragel/code/ regex '%%\{|\}%%|<\w+>' 0:variable
|
|
add-highlighter shared/ragel/code/ regex :=|=>|->|:>|:>>|<: 0:operator
|
|
add-highlighter shared/ragel/code/ regex \b(action|alnum|alpha|any|ascii|case|cntrl|contained|context|data|digit|empty|eof|err|error|exec|export|exports|extend|fblen|fbreak|fbuf|fc|fcall|fcurs|fentry|fexec|fgoto|fhold|first_final|fnext|fpc|fret|from|fstack|ftargs|graph|import|include|init|inwhen|lerr|lower|machine|nocs|noend|noerror|nofinal|noprefix|outwhen|postpop|prepush|print|punct|range|space|start|to|upper|when|write|xdigit|zlen)\b 0:keyword
|
|
|
|
# Commands
|
|
# ‾‾‾‾‾‾‾‾
|
|
|
|
define-command -hidden ragel-trim-indent %{
|
|
# remove trailing white spaces
|
|
try %{ execute-keys -draft -itersel <a-x> s \h+$ <ret> d }
|
|
}
|
|
|
|
define-command -hidden ragel-indent-on-char %<
|
|
evaluate-commands -draft -itersel %<
|
|
# align closer token to its opener when alone on a line
|
|
try %< execute-keys -draft <a-h> <a-k> ^\h+[\]})]$ <ret> m s \A|.\z <ret> 1<a-&> >
|
|
try %< execute-keys -draft <a-h> <a-k> ^\h+ [*]$ <ret> <a-?> [*]$ <ret> s \A|.\z <ret> 1<a-&> >
|
|
>
|
|
>
|
|
|
|
define-command -hidden ragel-insert-on-new-line %<
|
|
evaluate-commands -draft -itersel %<
|
|
# copy _#_ comment prefix and following white spaces
|
|
try %{ execute-keys -draft k <a-x> s ^\h*\K#\h* <ret> y gh j P }
|
|
>
|
|
>
|
|
|
|
define-command -hidden ragel-indent-on-new-line %<
|
|
evaluate-commands -draft -itersel %<
|
|
# preserve previous line indent
|
|
try %{ execute-keys -draft <semicolon> K <a-&> }
|
|
# filter previous line
|
|
try %{ execute-keys -draft k : ragel-trim-indent <ret> }
|
|
# indent after lines ending with opener token
|
|
try %< execute-keys -draft k <a-x> <a-k> [[{(*]$ <ret> j <a-gt> >
|
|
# align closer token to its opener when after cursor
|
|
try %< execute-keys -draft <a-x> <a-k> ^\h*[})\]] <ret> gh / [})\]] <ret> m <a-S> 1<a-&> >
|
|
>
|
|
>
|
|
|
|
§
|