2021-10-24 08:09:41 +02:00
|
|
|
# Erlang/OTP
|
|
|
|
# https://erlang.org
|
|
|
|
# ----------------------
|
|
|
|
|
|
|
|
# Detection and Initialization sections were adapted from rc/filetype/elixir.kak
|
|
|
|
|
|
|
|
# Detection
|
|
|
|
# ‾‾‾‾‾‾‾‾‾
|
|
|
|
hook global BufCreate .*[.](erl|hrl) %{
|
|
|
|
set-option buffer filetype erlang
|
|
|
|
}
|
|
|
|
|
|
|
|
# Initialization
|
|
|
|
# ‾‾‾‾‾‾‾‾‾‾‾‾‾‾
|
|
|
|
hook global WinSetOption filetype=erlang %{
|
|
|
|
require-module erlang
|
|
|
|
|
|
|
|
hook -once -always window WinSetOption filetype=.* %{ remove-hooks window erlang-.+ }
|
|
|
|
}
|
|
|
|
|
|
|
|
hook -group erlang-highlight global WinSetOption filetype=erlang %{
|
|
|
|
add-highlighter window/erlang ref erlang
|
|
|
|
hook -once -always window WinSetOption filetype=.* %{ remove-highlighter window/erlang }
|
|
|
|
}
|
|
|
|
|
|
|
|
provide-module erlang %[
|
|
|
|
|
|
|
|
# Highlighters
|
|
|
|
# ‾‾‾‾‾‾‾‾‾‾‾‾
|
|
|
|
|
|
|
|
add-highlighter shared/erlang regions
|
|
|
|
add-highlighter shared/erlang/default default-region group
|
|
|
|
|
|
|
|
add-highlighter shared/erlang/comment region '(?<!\$)%' '$' fill comment
|
|
|
|
add-highlighter shared/erlang/attribute_atom_single_quoted region %{-'} %{(?<!\\)(?:\\\\)*'(?=[\( \.])} fill builtin
|
|
|
|
add-highlighter shared/erlang/attribute region '\b-[a-z][\w@]*(?=[\( \.])' '\K' fill builtin
|
|
|
|
add-highlighter shared/erlang/atom_single_quoted region %{'} %{(?<!\\)(?:\\\\)*'} fill type
|
|
|
|
add-highlighter shared/erlang/char_list region %{"} %{(?<!\\)(?:\\\\)*"} fill string
|
|
|
|
add-highlighter shared/erlang/dollar_double_quote region %{\$\\?"} '\K' fill value
|
|
|
|
add-highlighter shared/erlang/dollar_single_quote region %{\$\\?'} '\K' fill value
|
|
|
|
|
|
|
|
# default-region regex highlighters
|
|
|
|
add-highlighter shared/erlang/default/atom regex '\b[a-z][\w@]*\b' 0:type
|
|
|
|
add-highlighter shared/erlang/default/funtion_call regex '\b[a-z][\w@]*(?=\()' 0:function
|
|
|
|
add-highlighter shared/erlang/default/keywords regex '\b(after|begin|case|try|catch|end|fun|if|of|receive|when|andalso|orelse|bnot|not|div|rem|band|and|bor|bxor|bsl|bsr|or|xor)\b' 0:keyword
|
|
|
|
add-highlighter shared/erlang/default/variable_name regex '\b(?<!\?)[A-Z_][\w@]*\b' 0:variable
|
|
|
|
add-highlighter shared/erlang/default/module_prefix regex '\b([a-z][\w_@]+)(?=:)' 1:value
|
2021-10-28 06:11:23 +02:00
|
|
|
# e.g. #Ref<0.1380825548.292038421.197518>
|
|
|
|
add-highlighter shared/erlang/default/ref regex '#Ref<\d+\.\d+\.\d+\.\d+>' 0:value
|
|
|
|
# e.g. #Port<0.1>
|
|
|
|
add-highlighter shared/erlang/default/port regex '#Port<\d+\.\d+>' 0:value
|
|
|
|
# e.g. <0.401.0>
|
|
|
|
add-highlighter shared/erlang/default/pid regex '<\d+\.\d+\.\d+>' 0:value
|
|
|
|
add-highlighter shared/erlang/default/base_number regex '\b(\d[_\d]*(?<!_)#[a-zA-Z0-9][a-z_A-Z0-9]*(?<!_)(?!\{))\b' 1:value
|
|
|
|
add-highlighter shared/erlang/default/float regex '\b(?<![\.])(\d[\d_]*(?<!_)\.\d[\d_]*(?<!_)(?:e[+-]?\d[\d_]*(?<!_))?)\b' 1:value
|
|
|
|
add-highlighter shared/erlang/default/integer regex '\b(?<!/)(\d[\d_]*)(?<!_)\b' 1:value
|
2021-10-24 08:09:41 +02:00
|
|
|
# e.g $\xff
|
|
|
|
add-highlighter shared/erlang/default/dollar_hex regex '\$\\x[0-9a-f][0-9a-f]' 0:value
|
|
|
|
# e.g. $\^a $\^C
|
|
|
|
add-highlighter shared/erlang/default/dollar_ctrl_char regex '\$\\\^[a-zA-Z]' 0:value
|
|
|
|
# e.g. $\101, $\70
|
|
|
|
add-highlighter shared/erlang/default/dollar_octal regex '\$\\[0-7][0-7][0-7]?' 0:value
|
|
|
|
# e.g. $\↕ $\7
|
|
|
|
add-highlighter shared/erlang/default/dollar_esc_char regex '\$\\[^x]' 0:value
|
|
|
|
# e.g. $↕ $a
|
|
|
|
add-highlighter shared/erlang/default/dollar_char regex '\$.' 0:value
|
|
|
|
|
|
|
|
]
|