Fix some escaping issues in clojure.kak

This commit is contained in:
Maxime Coste 2019-01-19 10:29:23 +11:00
parent 4a358e0707
commit 41ce602574

View File

@ -31,7 +31,7 @@ evaluate-commands %sh{
exec awk ' exec awk '
BEGIN{ BEGIN{
symbol_char="[^\\s()\\[\\]{}\"\\;@^`~\\\\%/]"; symbol_char="[^\\s()\\[\\]{}\"\\;@^`~\\\\%/]";
in_core="(clojure\.core/|(?<!/))"; in_core="(clojure\\.core/|(?<!/))";
split( \ split( \
"case cond condp cond-> cond->> def definline definterface defmacro defmethod "\ "case cond condp cond-> cond->> def definline definterface defmacro defmethod "\
"defmulti defn defn- defonce defprotocol defrecord defstruct deftype fn if "\ "defmulti defn defn- defonce defprotocol defrecord defstruct deftype fn if "\
@ -147,9 +147,9 @@ evaluate-commands %sh{
printf("add-highlighter shared/clojure/code/ regex ::?(%s+/)?%s+ 0:value\n", symbol_char, symbol_char); printf("add-highlighter shared/clojure/code/ regex ::?(%s+/)?%s+ 0:value\n", symbol_char, symbol_char);
# Numbers # Numbers
printf("add-highlighter shared/clojure/code/ regex (?<!%s)[-+]?(?:0(?:[xX][0-9a-fA-F]+|[0-7]*)|[1-9]\d*)N? 0:value\n", symbol_char); printf("add-highlighter shared/clojure/code/ regex (?<!%s)[-+]?(?:0(?:[xX][0-9a-fA-F]+|[0-7]*)|[1-9]\\d*)N? 0:value\n", symbol_char);
printf("add-highlighter shared/clojure/code/ regex (?<!%s)[-+]?(?:0|[1-9]\d*)(?:\.\d*)(?:M|[eE][-+]?\d+)? 0:value\n", symbol_char); printf("add-highlighter shared/clojure/code/ regex (?<!%s)[-+]?(?:0|[1-9]\\d*)(?:\\.\\d*)(?:M|[eE][-+]?\\d+)? 0:value\n", symbol_char);
printf("add-highlighter shared/clojure/code/ regex (?<!%s)[-+]?(?:0|[1-9]\d*)/(?:0|[1-9]\d*) 0:value\n", symbol_char); printf("add-highlighter shared/clojure/code/ regex (?<!%s)[-+]?(?:0|[1-9]\\d*)/(?:0|[1-9]\\d*) 0:value\n", symbol_char);
print_word_highlighter(keywords, "keyword"); print_word_highlighter(keywords, "keyword");
print_word_highlighter(core_fns, "function"); print_word_highlighter(core_fns, "function");