;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\302\303!\210\302\304!\210\302\305!\210\302\306!\210\302\307!\210\310\311\"\203$\312\313\314\315\311\"\316#\210\317\313\320\321\322\304%\210\323\301!\2036 \204:\324\325!\210\320\207" [tsc-dyn--version tree-sitter-langs--testing require cl-lib tree-sitter tree-sitter-load tree-sitter-hl tree-sitter-langs-build version< "0.15.0" display-warning tree-sitter-langs format "Please upgrade `tree-sitter'. This bundle requires version %s or later." :emergency custom-declare-group nil "Grammar bundle for `tree-sitter'." :group boundp tree-sitter-langs-install-grammars :skip-if-installed] 6) #@261 Return the language object identified by LANG-SYMBOL. If it cannot be loaded, this function tries to compile the grammar. This function also tries to copy highlight query from the language repo, if it exists. See `tree-sitter-langs-repos'. (fn LANG-SYMBOL) (defalias 'tree-sitter-langs-ensure #[257 "\300\301\"\216\3021\303!0\202 \210\304\305\306\307\"\"\210\310!\210\303!)\207" [make-closure #[0 "\301\300!\207" [V0 tree-sitter-langs--copy-query] 2] (error) tree-sitter-require display-warning tree-sitter-langs format "Could not load grammar for `%s', trying to compile it" tree-sitter-langs-compile] 6 (#$ . 692)]) (byte-code "\303 \304\"\203 \210\202\211B\210\305\306!\211\203F\211@\211\242\243\211\30714\310\n\311$0\266\202<\210\312\n#\210)\266A\266\202\202\207" [tree-sitter-load-path major-mode tree-sitter-major-mode-language-alist tree-sitter-langs--bin-dir memql reverse ((agda-mode . agda) (sh-mode . bash) (c-mode . c) (csharp-mode . c-sharp) (c++-mode . cpp) (css-mode . css) (elm-mode . elm) (go-mode . go) (html-mode . html) (java-mode . java) (javascript-mode . javascript) (js-mode . javascript) (js2-mode . javascript) (js3-mode . javascript) (json-mode . json) (jsonc-mode . json) (julia-mode . julia) (ocaml-mode . ocaml) (php-mode . php) (python-mode . python) (rjsx-mode . javascript) (ruby-mode . ruby) (rust-mode . rust) (rustic-mode . rust) (scala-mode . scala) (swift-mode . swift) (tuareg-mode . ocaml) (typescript-mode . typescript)) (map-not-inplace) map-put! nil map-insert] 13) #@20 (fn LANG-SYMBOL) (defalias 'tree-sitter-langs--hl-query-path #[257 "\301\302!P!\303P\207" [tree-sitter-langs--queries-dir file-name-as-directory symbol-name "highlights.scm"] 5 (#$ . 2243)]) #@137 Return the bundled default syntax highlighting patterns for LANG-SYMBOL. Return nil if there are no bundled patterns. (fn LANG-SYMBOL) (defalias 'tree-sitter-langs--hl-default-patterns #[257 "\3001G\301\302\303\"r\211q\210\304\305\"\216\211\306\267\202$\307\202%\310\202%\311\202%\312B\211\203?\211@\313\314!!\210db\210\315c\210A\266\202\202&\210\316 *\2620\207\210\312\207" [(file-missing) generate-new-buffer " *temp*" t make-closure #[0 "\301\300!\205 \302\300!\207" [V0 buffer-name kill-buffer] 2] #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (cpp 24 typescript 28 tsx 32)) (c) (javascript) (typescript javascript) nil insert-file-contents tree-sitter-langs--hl-query-path "\n" buffer-string] 7 (#$ . 2445)]) #@84 Use syntax highlighting patterns provided by `tree-sitter-langs'. (fn &rest ARGS) (defalias 'tree-sitter-langs--set-hl-default-patterns #[128 "?\205\302 !\303!\211\262\207" [tree-sitter-hl-default-patterns tree-sitter-language tsc--lang-symbol tree-sitter-langs--hl-default-patterns] 4 (#$ . 3218)]) (byte-code "\300\301\302\303#\210\304\305!\207" [advice-add tree-sitter-hl--setup :before tree-sitter-langs--set-hl-default-patterns provide tree-sitter-langs] 4)