mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-21 7074318d7ab58aca124f590c42fd820e8eb258a5
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
;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!\210\300\303!\210\304\305\306\307\310\301%\210\311\312\313\314\315\316%\210\311\317\320\321\315\322%\210\311\323\320\324\315\322\325\326&\207" [require company company-template cl-lib custom-declare-group company-semantic nil "Completion backend using Semantic." :group custom-declare-variable company-semantic-metadata-function 'company-semantic-summary-and-doc "The function turning a semantic tag into doc information." :type function company-semantic-begin-after-member-access t "When non-nil, automatic completion will start whenever the current\nsymbol is preceded by \".\", \"->\" or \"::\", ignoring\n`company-minimum-prefix-length'.\n\nIf `company-begin-commands' is a list, it should include `c-electric-lt-gt'\nand `c-electric-colon', for automatic completion right after \">\" and\n\":\"." boolean company-semantic-insert-arguments "When non-nil, insert function arguments as a template after completion." :package-version (company . "0.9.0")] 8)
(defvar company-semantic-modes '(c-mode c++-mode jde-mode java-mode))
#@31 Tags for the current context.
(defvar company-semantic--current-tags nil (#$ . 1472))
(make-variable-buffer-local 'company-semantic--current-tags)
(defalias 'company-semantic-documentation-for-tag #[(tag) "\301!\205    \302!\207" [tag semantic-tag-buffer semantic-documentation-for-tag] 2])
(defalias 'company-semantic-doc-or-summary #[(tag) "\302!\206\303\304\305\306#\205\303\307\305\306#\205    \305\306#\207" [tag semantic-idle-summary-function company-semantic-documentation-for-tag require semantic-idle nil t semantic/idle] 4])
(defalias 'company-semantic-summary-and-doc #[(tag) "\304!    \305\306#\211;\203\307\310 \"\203\311\312 \"\n \2052\313 G\nG\314#\315 W\2031\316\2022\317 Q*\207" [tag semantic-idle-summary-function summary doc company-semantic-documentation-for-tag nil t string-match "\n*\\(.*\\)$" match-string 1 + 4 window-width " -- " "\n"] 6])
(defalias 'company-semantic-doc-buffer #[(tag) "\303!\211\205\304\n\305\306#\307    Q!)\207" [tag doc semantic-idle-summary-function company-semantic-documentation-for-tag company-doc-buffer nil t "\n"] 6])
(defalias 'company-semantic-completions #[(prefix) "\3041\305\306 \307\310\"\311 \n\"*0\207\210\305\207" [context completion-ignore-case company-semantic--current-tags prefix (error) nil semantic-analyze-current-context semantic-analyze-possible-completions no-unique all-completions] 3])
(put 'company-semantic-completions 'byte-optimizer 'byte-compile-inline-expand)
(defalias 'company-semantic-completions-raw #[(prefix) "\304\305    !\304\211\203\" @\306\n!\307=\204\nB A\211\204\f*\310\311\312\313\"\"\207" [company-semantic--current-tags prefix tag --dolist-tail-- nil semantic-analyze-find-tags-by-prefix semantic-tag-class include delete "" mapcar semantic-tag-name] 6])
(defalias 'company-semantic-annotation #[(argument tags) "    \236\211\205 \n\306\234\307 \310\"\205'\311\n\312\211#\313\314\f\"\211\205&\f \312O**\207" [argument tags tag kind prototype par-pos 1 eql function semantic-format-tag-prototype nil string-match "("] 5])
(defalias 'company-semantic--prefix #[nil "\203    \301\302\303\"\207\304 \207" [company-semantic-begin-after-member-access company-grab-symbol-cons "\\.\\|->\\|::" 2 company-grab-symbol] 3])
#@57 `company-mode' completion backend using CEDET Semantic.
(defalias 'company-semantic #[(command &optional arg &rest ignored) "\306\267\202\260\307\310!\207\311\312!\205\261\313 \205\261    \n>\205\261\314 ?\205\261\315 \206'\316\207 \317\232\203;\320\321`\322Z\"\204;\323 !\207 \3241W\325\326 \"\327 \330\"#\331\f#\"*0\202Y\210\325)\207$\332 #\"!\207\333 #\"\207\334\332 #\"!\207 \317\232\207\335\207\332 #\"%\336\337%!!\205\221\337%!\340%!B)\207\333 #\"&'\205\256&\205\256&c\210\341 &P!)\207\325\207" [command major-mode company-semantic-modes arg prefix context #s(hash-table size 10 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 candidates 40 meta 91 annotation 100 doc-buffer 106 no-cache 114 duplicates 118 location 120 post-completion 147)) company-begin-backend company-semantic featurep semantic semantic-active-p company-in-string-or-comment company-semantic--prefix stop "" looking-back "->\\|\\.\\|::" 2 company-semantic-completions-raw (error) nil semantic-analyze-current-context semantic-analyze-possible-completions no-unique all-completions assoc company-semantic-annotation company-semantic-doc-buffer t buffer-live-p semantic-tag-buffer semantic-tag-start company-template-c-like-templatify completion-ignore-case company-semantic--current-tags company-semantic-metadata-function tag anno company-semantic-insert-arguments] 4 (#$ . 3723) (list 'interactive)])
(provide 'company-semantic)