43 lines
3.2 KiB
Plaintext
43 lines
3.2 KiB
Plaintext
|
;ELC
|
|||
|
|
;;; Compiled
|
|||
|
|
;;; in Emacs version 26.3
|
|||
|
|
;;; with all optimizations.
|
|||
|
|
|
|||
|
|
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
|
|||
|
|
|
|||
|
|
;;; This file does not contain utf-8 non-ASCII characters,
|
|||
|
|
;;; and so can be loaded in Emacs versions earlier than 23.
|
|||
|
|
|
|||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|||
|
|
|
|||
|
|
|
|||
|
|
(byte-code "\300\301!\210\300\302!\207" [require company cl-lib] 2)
|
|||
|
|
(defalias 'company-yasnippet--key-prefixes #[nil "\212`\306\211 \203Y @=\204 \fb\210 @\211;\203) \307 !\210 A\202E \310 !\203= \f!\311=\204E A\202E A\312\313 \"\210\314`\f\"\211 \n@\232\204U
\nB)\202 \n-\207" [yas-key-syntaxes method prefixes methods original prefix nil skip-syntax-backward functionp again yas--warning "Invalid element `%s' in `yas-key-syntaxes'" buffer-substring-no-properties] 5])
|
|||
|
|
(defalias 'company-yasnippet--candidates #[(prefix) "\306 \307 \310\311\310 :\2034 @\211G
GY\203) \312
\n#\211?\211\202* \311\2034 A\211\202
\f-\207" [tables #1=#:--cl-var-- key-prefix #2=#:--cl-flag-- #3=#:--cl-var-- prefix yas--get-snippet-tables company-yasnippet--key-prefixes nil t company-yasnippet--completions-for-prefix] 5])
|
|||
|
|
(defalias 'company-yasnippet--completions-for-prefix #[(prefix key-prefix tables) "\301\302\"\207" [tables cl-mapcan #[(table) "\303!\304\211\203 \305\306\n\"\210 *\207" [table res keyhash yas--table-hash nil maphash #[(key value) ";\205 \303 \"\205 \304\305\n\"\207" [key key-prefix value string-prefix-p maphash #[(name template) "\306\307 \310\n\311 G\fGZ&
B\211\207" [key name template key-prefix prefix res propertize yas-annotation yas-template yas-prefix-offset] 9]] 3]] 4]] 3])
|
|||
|
|
#@767 `company-mode' backend for `yasnippet'.
|
|||
|
|
|
|||
|
|
This backend should be used with care, because as long as there are
|
|||
|
|
snippets defined for the current major mode, this backend will always
|
|||
|
|
shadow backends that come after it. Recommended usages:
|
|||
|
|
|
|||
|
|
* In a buffer-local value of `company-backends', grouped with a backend or
|
|||
|
|
several that provide actual text completions.
|
|||
|
|
|
|||
|
|
(add-hook 'js-mode-hook
|
|||
|
|
(lambda ()
|
|||
|
|
(set (make-local-variable 'company-backends)
|
|||
|
|
'((company-dabbrev-code company-yasnippet)))))
|
|||
|
|
|
|||
|
|
* After keyword `:with', grouped with other backends.
|
|||
|
|
|
|||
|
|
(push '(company-semantic :with company-yasnippet) company-backends)
|
|||
|
|
|
|||
|
|
* Not in `company-backends', just bound to a key.
|
|||
|
|
|
|||
|
|
(global-set-key (kbd "C-c y") 'company-yasnippet)
|
|||
|
|
|
|||
|
|
(defalias 'company-yasnippet #[(command &optional arg &rest ignore) "\306\307\"\203 \310\311!\207\306\312\"\203 \313\301!\205 \205j \314 \207\306\315\"\2033 \n?\205, \316\317\320\321 #P\207\306\322\"\203> \323 !\207\306\324\"\203G \325\207\306\326\"\205j \317\320\327 #\317\320\330 # \331\332
!\333` G\f#`\334
!$*\207" [command yas-minor-mode company-tooltip-align-annotations arg prefix-offset template eql interactive company-begin-backend company-yasnippet prefix boundp company-grab-symbol annotation " -> " get-text-property 0 yas-annotation candidates company-yasnippet--candidates no-cache t post-completion yas-template yas-prefix-offset yas-expand-snippet yas--template-content - yas--template-expand-env] 6 (#$ . 1742) (list 'interactive)])
|
|||
|
|
(provide 'company-yasnippet)
|