mirror of
https://github.com/mawww/kakoune.git
synced 2024-08-17 00:30:26 +03:00
add prolog highlighter
This commit is contained in:
parent
9b166e8007
commit
e9a71d22f3
49
rc/filetype/prolog.kak
Normal file
49
rc/filetype/prolog.kak
Normal file
@ -0,0 +1,49 @@
|
||||
# Prolog
|
||||
# ----------------------
|
||||
|
||||
# Adapted from rc/filetype/erlang.kak
|
||||
|
||||
# Detection
|
||||
# ‾‾‾‾‾‾‾‾‾
|
||||
hook global BufCreate .*[.](pl|P) %{
|
||||
set-option buffer filetype prolog
|
||||
}
|
||||
|
||||
# Initialization
|
||||
# ‾‾‾‾‾‾‾‾‾‾‾‾‾‾
|
||||
hook global WinSetOption filetype=prolog %{
|
||||
require-module prolog
|
||||
|
||||
hook -once -always window WinSetOption filetype=.* %{ remove-hooks window prolog-.+ }
|
||||
}
|
||||
|
||||
hook -group prolog-highlight global WinSetOption filetype=prolog %{
|
||||
add-highlighter window/prolog ref prolog
|
||||
hook -once -always window WinSetOption filetype=.* %{ remove-highlighter window/prolog }
|
||||
}
|
||||
|
||||
provide-module prolog %[
|
||||
|
||||
# Highlighters
|
||||
# ‾‾‾‾‾‾‾‾‾‾‾‾
|
||||
|
||||
add-highlighter shared/prolog regions
|
||||
add-highlighter shared/prolog/default default-region group
|
||||
|
||||
add-highlighter shared/prolog/comment region '(?<!)%' '$' fill comment
|
||||
add-highlighter shared/prolog/attribute_atom_single_quoted region %{-'} %{(?<!\\)(?:\\\\)*'(?=[\( \.])} fill builtin
|
||||
add-highlighter shared/prolog/attribute region '\b-[a-z][\w@]*(?=[\( \.])' '\K' fill builtin
|
||||
add-highlighter shared/prolog/atom_single_quoted region %{'} %{(?<!\\)(?:\\\\)*'} fill type
|
||||
add-highlighter shared/prolog/char_list region %{"} %{(?<!\\)(?:\\\\)*"} fill string
|
||||
|
||||
# default-region regex highlighters
|
||||
add-highlighter shared/prolog/default/atom regex '\b[a-z]\w*\b' 0:type
|
||||
add-highlighter shared/prolog/default/pred_call regex '\b[a-z]\w*(?=\()' 0:function
|
||||
add-highlighter shared/prolog/default/keywords regex '\b(div|rem|is)\b' 0:keyword
|
||||
add-highlighter shared/prolog/default/variable_name regex '\b(?<!\?)[A-Z_][\w]*\b' 0:variable
|
||||
|
||||
add-highlighter shared/prolog/default/base_number regex '\b(\d[_\d]*(?<!_)#[a-zA-Z0-9][a-z_A-Z0-9]*(?<!_)(?!\{))\b' 1:value
|
||||
add-highlighter shared/prolog/default/float regex '\b(?<![\.])(\d[\d_]*(?<!_)\.\d[\d_]*(?<!_)(?:e[+-]?\d[\d_]*(?<!_))?)\b' 1:value
|
||||
add-highlighter shared/prolog/default/integer regex '\b(?<!/)(\d[\d_]*)(?<!_)\b' 1:value
|
||||
|
||||
]
|
Loading…
Reference in New Issue
Block a user