;ELC
|
;;; Compiled
|
;;; in Emacs version 26.1
|
;;; 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) "\304! >\204 \305\306\307D\"\210\310H\311\211\203 \312\313 \"\210\n*\207" [table cl-struct-yas--table-tags res keyhash type-of signal wrong-type-argument yas--table 2 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]] 5]] 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\267\202g \307\310!\207\311\301!\205 \205h \312 \207\n?\205 \313\314\315\316 #P\207\317 !\207\320\207\314\315\321 #\314\315\322 # \323\324 ! >\204G \325\326\327 D\"\210 \330H\331` G\f#`\324 ! >\204a \325\326\327 D\"\210 \332H$*\207\333\207" [command yas-minor-mode company-tooltip-align-annotations arg prefix-offset template #s(hash-table size 6 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 annotation 23 candidates 36 no-cache 40 post-completion 42)) company-begin-backend company-yasnippet boundp company-grab-symbol " -> " get-text-property 0 yas-annotation company-yasnippet--candidates t yas-template yas-prefix-offset yas-expand-snippet type-of signal wrong-type-argument yas--template 2 - 5 nil cl-struct-yas--template-tags] 8 (#$ . 1834) (list 'interactive)])
|
(provide 'company-yasnippet)
|
