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

Chizi123
2018-11-18 21067e7cbe6d7a0f65ff5c317a96b5c337b0b3d8
commit | author | age
5cb5f7 1 ;ELC
C 2 ;;; Compiled
3 ;;; in Emacs version 26.1
4 ;;; with all optimizations.
5
6 ;;; This file uses dynamic docstrings, first added in Emacs 19.29.
7
8 ;;; This file does not contain utf-8 non-ASCII characters,
9 ;;; and so can be loaded in Emacs versions earlier than 23.
10
11 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
13
14
15 (byte-code "\302\303!\210\302\304!\210\302\305!\210\306\307\310\311\312\303%\210\313\314\315\310#\210\316\310\211\203@    @\314N\2039\315N\2049\317\315\314N#\210    A\211\204\"*\320\314\315\321#\210\322\315\323\324\325\326%\210\322\327\330\331\325\332\333\334&\207" [prop --dolist-tail-- require company company-template cl-lib custom-declare-group company-gtags nil "Completion backend for GNU Global." :group defvaralias company-gtags-gnu-global-program-name company-gtags-executable (saved-value saved-variable-comment) put make-obsolete-variable "earlier" custom-declare-variable (executable-find "global") "Location of GNU global executable." :type string company-gtags-insert-arguments t "When non-nil, insert function arguments as a template after completion." boolean :package-version (company . "0.8.1")] 9)
16 (defvar company-gtags--tags-available-p 'unknown nil)
17 (byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\207" [make-variable-buffer-local company-gtags--tags-available-p custom-declare-variable company-gtags-modes '(prog-mode jde-mode) "Modes that use `company-gtags'.\nIn all these modes (and their derivatives) `company-gtags' will perform\ncompletion." :type (repeat (symbol :tag "Major mode")) :package-version (company . "0.8.4")] 8)
18 (defalias 'company-gtags--tags-available-p #[nil "\302=\203 \303    \304\"\211\207\207" [company-gtags--tags-available-p buffer-file-name unknown locate-dominating-file "GTAGS"] 3])
19 (defalias 'company-gtags--fetch-tags #[(prefix) "\305\306!rq\210\307\216\310\311\n\310p\310D\310\312\313 P&\314U\205Ieb\210\310\315\316\310\317#\203F\320\321\322!\323\321\324!\325\326\321\327!!\330\321\331!!B%\fB\202#\f\237),\207" [#1=#:temp-buffer tags company-gtags-executable prefix #2=#:--cl-var-- generate-new-buffer " *temp*" #[nil "\301!\205    \302!\207" [#1# buffer-name kill-buffer] 2] nil process-file "-xGqT" "^" 0 re-search-forward "^\\([^ ]*\\)[     ]+\\([[:digit:]]+\\)[     ]+\\([^     ]+\\)[     ]+\\(.*\\)$" t propertize match-string 1 meta 4 location expand-file-name 3 string-to-number 2] 9])
20 (defalias 'company-gtags--annotation #[(arg) "\302\303\301#\304\305P    \"\205\306\307    \")\207" [arg meta get-text-property 0 string-match "\\((.*)\\).*" match-string 1] 4])
21 #@51 `company-mode' completion backend for GNU Global.
22 (defalias 'company-gtags #[(command &optional arg &rest ignored) "\306\267\202X\307\310!\207    \205Y\n\205Y\311\312 \"\205Y\313 ?\205Y\314 \205Y\315 \206*\316\207\317\f!\207\320\207\320\207\321\f!\207\322\323\324\f#\207\322\323\325\f#\207\321\f!\205V \205V c\210\326 !)\207\327\207" [command company-gtags-executable buffer-file-name company-gtags-modes arg anno #s(hash-table size 9 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 candidates 43 sorted 47 duplicates 49 annotation 51 meta 55 location 61 post-completion 67)) company-begin-backend company-gtags apply derived-mode-p company-in-string-or-comment company-gtags--tags-available-p company-grab-symbol stop company-gtags--fetch-tags t company-gtags--annotation get-text-property 0 meta location company-template-c-like-templatify nil company-gtags-insert-arguments] 4 (#$ . 2649) (list 'interactive)])
23 (provide 'company-gtags)