]>
Commit | Line | Data |
---|---|---|
1 | ;ELC\1c\0\0\0 | |
2 | ;;; Compiled | |
3 | ;;; in Emacs version 28.2 | |
4 | ;;; with all optimizations. | |
5 | ||
6 | ||
7 | ||
8 | (byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\301%\210\311\312\306\313\314\315%\207" [require company cl-lib tempo custom-declare-group company-tempo nil "Tempo completion backend." :group custom-declare-variable company-tempo-expand "Whether to expand a tempo tag after completion." :type (choice (const :tag "Off" nil) (const :tag "On" t))] 6) | |
9 | (defalias 'company-tempo-lookup #[(match) "\301\b\302 \"A\207" [match assoc tempo-build-collection] 3]) | |
10 | (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put company-tempo-lookup speed -1 put byte-optimizer byte-compile-inline-expand] 5) | |
11 | #@49 Replace MATCH with the expanded tempo template.\1f | |
12 | (defalias 'company-tempo-insert #[(match) "\301\b!\210\302\224b\210\303\304!\210\305\b\18\306\b\307 \"A)!\207" [match search-backward 0 replace-match "" call-interactively assoc tempo-build-collection] 4 (#$ . 705)]) | |
13 | (defalias 'company-tempo-meta #[(match) "\b\18\303\b\304 \"A)\305\19\211\1a\205\1f\0\306\n\307\"\211\11\205\1f\0\310 \311\307#@*\207" [match doc templ assoc tempo-build-collection nil documentation t split-string "\n"] 5]) | |
14 | (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put company-tempo-meta speed -1 put byte-optimizer byte-compile-inline-expand] 5) | |
15 | #@46 `company-mode' completion backend for tempo.\1f | |
16 | (defalias 'company-tempo #[(command &optional arg &rest ignored) "\b\306\267\202I\0\307\310!\207\311 !@\206J\0\312\207\313\n\314 \"\207\315\207\n\211\e\e\316\v\314 \"A)\317\1c\211\1d\205<\0\320\r\321\"\211\14\205<\0\322\f\323\321#@+\207\ e\15\205J\0\324\n!\207\321\207\317\207" [command tempo-match-finder arg match doc templ #s(hash-table size 7 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 candidates 19 kind 25 meta 27 post-completion 62 sorted 71)) company-begin-backend company-tempo tempo-find-match-string "" all-completions tempo-build-collection snippet assoc nil documentation t split-string "\n" company-tempo-insert company-tempo-expand] 5 (#$ . 1322) (list 'interactive)]) | |
17 | (provide 'company-tempo) |