403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.216.141
Web Server : Apache
System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64
User : sws1073854427 ( 1073854427)
PHP Version : 8.4.23
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /usr/share/emacs/28.2/lisp/cedet/semantic/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/emacs/28.2/lisp/cedet/semantic/complete.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\300\306!\210\300\307!\210\300\310!\207" [require semantic eieio-opt semantic/analyze semantic/ctxt semantic/decorate semantic/format semantic/idle semantic/db-find] 2)
#@55 The overlay currently active while completing inline.
(defvar semantic-complete-inline-overlay nil (#$ . 330))
#@41 Non-nil if inline completion is active.
(defalias 'semantic-completion-inline-active-p #[0 "\203\301!\204\302!\210\303\207" [semantic-complete-inline-overlay overlay-buffer delete-overlay nil] 2 (#$ . 447)])
#@197 Return the text that is currently in the completion buffer.
For a minibuffer prompt, this is the minibuffer text.
For inline completion, this is the text wrapped in the inline completion
overlay.
(defalias 'semantic-completion-text #[0 "\203\301 \207\302 \207" [semantic-complete-inline-overlay semantic-complete-inline-text minibuffer-contents] 1 (#$ . 671)])
#@116 Delete the text that is actively being completed.
Presumably if you call this you will insert something new there.
(defalias 'semantic-completion-delete-text #[0 "\203\301 \207\302 \207" [semantic-complete-inline-overlay semantic-complete-inline-delete-text delete-minibuffer-contents] 1 (#$ . 1042)])
#@95 Display the string FMT formatted with ARGS at the end of the minibuffer.

(fn FMT &rest ARGS)
(defalias 'semantic-completion-message #[385 "\203\n\301\302#\207\301\302\303P\304 $\207" [semantic-complete-inline-overlay apply message "%s" buffer-string] 7 (#$ . 1353)])
#@139 The tag collector for the current completion operation.
Value should be an object of a subclass of
`semantic-completion-engine-abstract'.
(defvar semantic-completion-collector-engine nil (#$ . 1634))
#@90 The tag display engine for the current completion operation.
Value should be a ... what?
(defvar semantic-completion-display-engine nil (#$ . 1840))
#@53 Keymap used while completing across a list of tags.
(defvar semantic-complete-key-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\301\306\307#\210\301\310\311#\210\301\312\313#\210\301\314\315#\210\301\316\313#\210\301\317\315#\210\207" [make-sparse-keymap define-key " " semantic-complete-complete-space "	" semantic-complete-complete-tab "
" semantic-complete-done "" abort-recursive-edit "\356" next-history-element "\360" previous-history-element "" ""] 5) (#$ . 1995))
#@89 Default history variable for any unhistoried prompt.
Keeps STRINGS only in the history.
(defvar semantic-completion-default-history nil (#$ . 2494))
#@691 Read a semantic tag, and return a tag for the selection.
Argument COLLECTOR is an object which can be used to calculate
a list of possible hits.  See `semantic-completion-collector-engine'
for details on COLLECTOR.
Argument DISPLAYER is an object used to display a list of possible
completions for a given prefix.  See `semantic-completion-display-engine'
for details on DISPLAYER.
PROMPT is a string to prompt with.
DEFAULT-TAG is a semantic tag or string to use as the default value.
If INITIAL-INPUT is non-nil, insert it in the minibuffer initially.
HISTORY is a symbol representing a variable to story the history in.

(fn COLLECTOR DISPLAYER PROMPT DEFAULT-TAG INITIAL-INPUT HISTORY)
(defalias 'semantic-complete-read-tag-engine #[1542 "\305\211\306!\211\30719\211:\2053\211@;\2053\211A@9\2053\211A@\2053\3108<\2053\3118<0\262\202=\210\305\262\205E\211\211@\262\211\203m\312\313\"\203f\314\211\224O\315\316	\314\224\305O\260\262\202m\317\320R\262\321\216\322\f\305\206{\323\n&\210),\207" [semantic-completion-collector-engine semantic-completion-display-engine semantic-complete-active-default semantic-complete-current-matched-tag semantic-complete-key-map nil semantic-complete-default-to-tag (error) 2 3 string-match ":" 0 " (default " ")" " (" "): " #[0 "\302!\210\303	!\207" [semantic-completion-collector-engine semantic-completion-display-engine semantic-collector-cleanup semantic-displayer-cleanup] 2] read-from-minibuffer semantic-completion-default-history] 16 (#$ . 2650)])
#@53 The current default tag calculated for this prompt.
(defvar semantic-complete-active-default nil (#$ . 4191))
#@69 Convert a calculated or passed in DEFAULT into a tag.

(fn DEFAULT)
(defalias 'semantic-complete-default-to-tag #[257 "\211\3021.\211:\205(\211@;\205(\211A@9\205(\211A@\205(\3038<\205(\3048<0\262\2022\210\305\262\2039\211\211\207\211\204A\306 \262\211\205\212\211<\203U\211@;\203U\211@\202o\211;\203^\211\202o\2119\203i\307!\202o\310\311\312D\"\305\212\313	\305#\210)\314	!\211\203\205\315\316\"\262\210\211\262\207" [semantic-complete-active-default semantic-completion-collector-engine (error) 2 3 nil semantic-ctxt-current-thing symbol-name signal wrong-type-argument semantic-tag-p semantic-collector-calculate-completions semantic-collector-current-exact-match semanticdb-find-result-nth-in-buffer 0] 7 (#$ . 4307)])
#@61 Variable used to pass the tags being matched to the prompt.
(defvar semantic-complete-current-matched-tag nil (#$ . 5066))
#@278 Calculate a match from the current completion environment.
Save this in our completion variable.  Make sure that variable
is cleared if any other keypress is made.
Return value can be:
  tag - a single tag that has been matched.
  string - a message to show in the minibuffer.
(defalias 'semantic-complete-current-match #[0 "	\304 \305\211\306\230\203\n\262\202\224\212\307\305#\210)\310 \210\311!\211\262\204\224\312!\211\262\203\221\313!\314U\203@\315\316\"\262\202\224\317!\203L\320\262\202\224\321\322\316\"@\211@\262\314\313!\203}W\203}\322\"@\211@\262\230\204v\305\262T\262\202Z\203\213\315\316\"\266\205\202\224\266\320\202\224\323\262\211\3241\302\211:\205\274\211@;\205\274\211A@9\205\274\211A@\205\274\3258<\205\274\3268<0\262\202\306\210\305\262\203\320\211\327\330\331\"\210\207" [semantic-completion-collector-engine semantic-completion-display-engine semantic-complete-active-default semantic-complete-current-matched-tag semantic-completion-text nil "" semantic-collector-calculate-completions semantic-complete-try-completion semantic-displayer-current-focus semantic-collector-current-exact-match semanticdb-find-result-length 1 semanticdb-find-result-nth-in-buffer 0 semantic-displayer-focus-abstract-child-p "Not Unique" t semanticdb-find-result-nth "No Match" (error) 2 3 add-hook pre-command-hook #[0 "\301\211\207" [semantic-complete-current-matched-tag nil] 2]] 13 (#$ . 5196)])
#@27 Accept the current input.
(defalias 'semantic-complete-done #[0 "\300 \211;\203\301\302\303Q!\207\304 \207" [semantic-complete-current-match semantic-completion-message " [" "]" exit-minibuffer] 5 (#$ . 6667) nil])
#@47 Complete the partial input in the minibuffer.
(defalias 'semantic-complete-complete-space #[0 "\300\301!\207" [semantic-complete-do-completion t] 2 (#$ . 6891) nil])
#@66 Complete the partial input in the minibuffer as far as possible.
(defalias 'semantic-complete-complete-tab #[0 "\300 \207" [semantic-complete-do-completion] 1 (#$ . 7063) nil])
#@259 Return a string to use for completion.
ORIGINAL is the text in the minibuffer.
NEW is the new text to insert into the minibuffer.
Within the difference bounds of ORIGINAL and NEW, shorten NEW
to the nearest word boundary, and return that.

(fn ORIGINAL NEW)
(defalias 'semantic-complete-hack-word-boundaries #[514 "\300 \301\302\"\216G\303O\304\305\"\304\306\"\211\203)\211\307V\203)\307OP\266\203\202;\2038\307OP\266\203\202;\266\203)\207" [match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] nil string-match "\\>" "\\<" 0] 10 (#$ . 7247)])
#@124 Try a completion for the current minibuffer.
If PARTIAL, do partial completion stopping at spaces.

(fn &optional PARTIAL)
(defalias 'semantic-complete-try-completion #[256 "\301\302 \"\211\204\303\304!\210\305 \207\211;\203?\302 \230\203-\205\241\306!\211\205,\307 \210\211c\207\2039\302 \310\"\266\202\307 \210\211c\207\211<\203\240\211@\3111s\211:\205m\211@;\205m\211A@9\205m\211A@\205m\3128<\205m\3138<0\262\202w\210\314\262\203\240\302 @\211@\262\230\204\221\307 \210\211@\211@\262c\210\211G\315U\203\234\303\316!\207\303\317!\207\314\207" [semantic-completion-collector-engine semantic-collector-try-completion semantic-completion-text semantic-completion-message " [No Match]" ding semantic-collector-current-whitespace-completion semantic-completion-delete-text semantic-complete-hack-word-boundaries (error) 2 3 nil 1 " [Complete]" " [Complete, but not unique]"] 6 (#$ . 7845)])
#@190 Do a completion for the current minibuffer.
If PARTIAL, do partial completion stopping at spaces.
if INLINE, then completion is happening inline in a buffer.

(fn &optional PARTIAL INLINE)
(defalias 'semantic-complete-do-completion #[512 "	\302 \303\212\304#\210)\305!\211\306=\203\307\310!\266\306\207\211\311=\204+\211\312=\2033\313!\266\311\207\211\314=\204?\211\315=\203P\316\317\"#\210\320!\266\207\211\321\267\210\207\322!\266\207\323!\210\324!\266\207\307\325!\266\207\210\207" [semantic-completion-collector-engine semantic-completion-display-engine semantic-completion-text nil semantic-collector-calculate-completions semantic-complete-next-action done semantic-completion-message " [Complete]" complete complete-whitespace semantic-complete-try-completion display displayend semantic-displayer-set-completions semantic-collector-all-completions semantic-displayer-show-request #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (scroll 85 focus 91 empty 101)) semantic-displayer-scroll-request semantic-displayer-focus-next semantic-displayer-focus-request " [No Match]"] 12 (#$ . 8772)])
#@58 Keymap used while performing Semantic inline completion.
(defvar semantic-complete-inline-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\301\306\307#\210\301\310\311#\210\301\312\313#\210\301\314\315#\210\301\316\317#\210\207" [make-sparse-keymap define-key "	" semantic-complete-inline-TAB "\360" semantic-complete-inline-up "\356" semantic-complete-inline-down "
" semantic-complete-inline-done "\203" semantic-complete-inline-exit "" semantic-complete-inline-quit "?" #[0 "\300\301!\207" [describe-variable semantic-complete-inline-map] 2 nil nil]] 5) (#$ . 9943))
(custom-declare-face 'semantic-complete-inline-face '((((class color) (background dark)) (:underline "yellow")) (((class color) (background light)) (:underline "brown"))) "Face used to show the region being completed inline.\nThe face is used in `semantic-complete-inline-tag-engine'." :group 'semantic-faces)
#@117 Return the text that is being completed inline.
Similar to `minibuffer-contents' when completing in the minibuffer.
(defalias 'semantic-complete-inline-text #[0 "\301!\302!U\203\303\207\304\"\207" [semantic-complete-inline-overlay overlay-start overlay-end "" buffer-substring-no-properties] 5 (#$ . 10845)])
#@66 Delete the text currently being completed in the current buffer.
(defalias 'semantic-complete-inline-delete-text #[0 "\301!\302!|\207" [semantic-complete-inline-overlay overlay-start overlay-end] 3 (#$ . 11168)])
#@54 This completion thing is DONE, OR, insert a newline.
(defalias 'semantic-complete-inline-done #[0 "\301!\211\203\302 \211@\262G\303Oc\210\304 \207\3051&\306\307 \310 \"0\202-\210\306\311 \310 \"\211\2053\211 \207" [semantic-completion-display-engine semantic-displayer-current-focus semantic-completion-text nil semantic-complete-inline-exit (error) lookup-key current-active-maps this-command-keys current-global-map] 6 (#$ . 11389) nil])
#@22 Quit an inline edit.
(defalias 'semantic-complete-inline-quit #[0 "\300 \210\301 \207" [semantic-complete-inline-exit keyboard-quit] 1 (#$ . 11845) nil])
#@30 Exit inline completion mode.
(defalias 'semantic-complete-inline-exit #[0 "\303\304\305\"\210\3061@\203\307!\210	\203\310	!\210\n\2036\311\n\312\"\313\n!\314\n!\210\315\211p=\2034\316!\210\266\315\211\2110\210\202A\210\303\317\320\"\207" [semantic-completion-collector-engine semantic-completion-display-engine semantic-complete-inline-overlay remove-hook pre-command-hook semantic-complete-pre-command-hook (error) semantic-collector-cleanup semantic-displayer-cleanup overlay-get window-config-start overlay-buffer delete-overlay nil set-window-configuration post-command-hook semantic-complete-post-command-hook] 5 (#$ . 12005) nil])
#@380 Used to redefine what commands are being run while completing.
When installed as a `pre-command-hook' the special keymap
`semantic-complete-inline-map' is queried to replace commands normally run.
Commands which edit what is in the region of interest operate normally.
Commands which would take us out of the region of interest, or our
quit hook, will exit this completion mode.
(defalias 'semantic-complete-pre-command-hook #[0 "\302\303 \304#\305!\203\211\211\207\304\207" [semantic-complete-inline-map this-command lookup-key this-command-keys nil commandp] 4 (#$ . 12664)])
#@205 Used to determine if we need to exit inline completion mode.
If completion mode is active, check to see if we are within
the bounds of `semantic-complete-inline-overlay', or within
a reasonable distance.
(defalias 'semantic-complete-post-command-hook #[0 "\3021u\204
\303 \202s\304\305\"\306!\307!\310!\311p=\2033`W\2043`W\2043`V\203:\303 \266\205\202s\312 \211\262\203`\211\313\230\204``U\204`\212\314u\210\315\316!)\204`\303 \266\205\202s\317	\320 \311#\203o\266\311\202s\321 \266\2050\207\210\303 \207" [semantic-complete-inline-overlay semantic-complete-inline-map (error) semantic-complete-inline-exit overlay-get semantic-original-start overlay-start overlay-end overlay-buffer nil semantic-completion-text "" -1 looking-at "\\(\\w\\|\\s_\\)" lookup-key this-command-keys semantic-complete-inline-force-display] 9 (#$ . 13254)])
#@124 Force the display of whatever the current completions are.
DO NOT CALL THIS IF THE INLINE COMPLETION ENGINE IS NOT ACTIVE.
(defalias 'semantic-complete-inline-force-display #[0 "\3021$\212	\303 \205\304\305#\210\306\307\"#\210\310!\266\203)0\207\311\312\"\207" [semantic-completion-collector-engine semantic-completion-display-engine (error) semantic-completion-text semantic-collector-calculate-completions nil semantic-displayer-set-completions semantic-collector-all-completions semantic-displayer-show-request message "Bug Showing Completions: %S"] 8 (#$ . 14123)])
#@672 Perform completion based on semantic tags in a buffer.
Argument COLLECTOR is an object which can be used to calculate
a list of possible hits.  See `semantic-completion-collector-engine'
for details on COLLECTOR.
Argument DISPLAYER is an object used to display a list of possible
completions for a given prefix.  See `semantic-completion-display-engine'
for details on DISPLAYER.
BUFFER is the buffer in which completion will take place.
START is a location for the start of the full symbol.
If the symbol being completed is "foo.ba", then START
is on the "f" character.
END is at the end of the current symbol being completed.

(fn COLLECTOR DISPLAYER BUFFER START END)
(defalias 'semantic-complete-inline-tag-engine #[1285 "\303\304\305%\306\n\307\310#\210\306\n\311\312 #\210\306\n\313#\210\314\315\316\"\210\314\317\320\"\210\321 \207" [semantic-completion-collector-engine semantic-completion-display-engine semantic-complete-inline-overlay make-overlay nil t overlay-put face semantic-complete-inline-face window-config-start current-window-configuration semantic-original-start add-hook pre-command-hook semantic-complete-pre-command-hook post-command-hook semantic-complete-post-command-hook semantic-complete-inline-force-display] 11 (#$ . 14713)])
#@28 Perform inline completion.
(defalias 'semantic-complete-inline-TAB #[0 "\300\301\302\"\211\303\267\202\304 \207\305 \207\301\207" [semantic-complete-do-completion nil t #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (complete 10 done 13)) semantic-complete-inline-force-display semantic-complete-inline-done] 3 (#$ . 15986) nil])
#@39 Focus forwards through the displayer.
(defalias 'semantic-complete-inline-down #[0 "\301!\210\302!\207" [semantic-completion-display-engine semantic-displayer-focus-next semantic-displayer-focus-request] 3 (#$ . 16362) nil])
#@40 Focus backwards through the displayer.
(defalias 'semantic-complete-inline-up #[0 "\301!\210\302!\207" [semantic-completion-display-engine semantic-displayer-focus-previous semantic-displayer-focus-request] 3 (#$ . 16596) nil])
#@988 Determine what the next completion action should be.
PARTIAL is non-nil if we are doing partial completion.
First, the collector can determine if we should perform a completion or not.
If there is nothing to complete, then the displayer determines if we are
to show a completion list, scroll, or perhaps do a focus (if it is capable.)
Expected return values are:
  done -> We have a singular match
  empty -> There are no matches to the current text
  complete -> Perform a completion action
  complete-whitespace -> Complete next whitespace type character.
  display -> Show the list of completions
  scroll -> The completions have been shown, and the user keeps hitting
            the complete button.  If possible, scroll the completions
  focus -> The displayer knows how to shift focus among possible completions.
           Let it do that.
  displayend -> Whatever options the displayer had for repeating options, there
           are none left.  Try something new.

(fn PARTIAL)
(defalias 'semantic-complete-next-action #[257 "\302\"\303	!\204\f\207\304=\203\211\203\207\207" [semantic-completion-collector-engine semantic-completion-display-engine semantic-collector-next-action semantic-displayer-next-action done] 5 (#$ . 16834)])
#@43 List of collectors active in this buffer.
(defvar semantic-collector-per-buffer-list nil (#$ . 18092))
(make-variable-buffer-local 'semantic-collector-per-buffer-list)
#@48 List of global collectors active this session.
(defvar semantic-collector-list nil (#$ . 18266))
(byte-code "\300\301\302\303!\"\210\300\304\305\303!\"\210\300\306\304\"\210\307\306\310\311#\210\312\303\313\304#\314\303\315\316\317$\207" [defalias semantic-collector-abstract-p eieio-make-class-predicate semantic-collector-abstract semantic-collector-abstract--eieio-childp eieio-make-child-predicate semantic-collector-abstract-child-p make-obsolete "use (cl-typep ... \\='semantic-collector-abstract) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal nil ((buffer :initarg :buffer :type buffer :documentation "Originating buffer for this collector.\nSome collectors use a given buffer as a starting place while looking up\ntags.") (cache :initform nil :type (or null semanticdb-find-result-with-nil) :documentation "Cache of tags.\nThese tags are re-used during a completion session.\nSometimes these tags are cached between completion sessions.") (last-all-completions :initarg nil :type semanticdb-find-result-with-nil :documentation "Last result of `all-completions'.\nThis result can be used for refined completions as `last-prefix' gets\ncloser to a specific result.") (last-prefix :type string :protection :protected :documentation "The last queried prefix.\nThis prefix can be used to cache intermediate completion offers.\nmaking the action of homing in on a token faster.") (last-completion :type (or null string) :documentation "The last calculated completion.\nThis completion is calculated and saved for future use.") (last-whitespace-completion :type (or null string) :documentation "The last whitespace completion.\nFor partial completion, SPC will disambiguate over whitespace type\ncharacters.  This is the last calculated version.") (current-exact-match :type list :protection :protected :documentation "The list of matched tags.\nWhen tokens are matched, they are added to this list.")) (:documentation "Root class for completion engines.\nThe baseclass provides basic functionality for interacting with\na completion displayer object, and tracking the current progress\nof a completion." :abstract t)] 6)
#@85 You cannot create a new object of type `semantic-collector-abstract'.

(fn &rest _)
(defalias 'semantic-collector-abstract #[128 "\300\301!\207" [error "Class semantic-collector-abstract is abstract"] 3 (#$ . 20429)])
(byte-code "\300\301\302\303!\"\210\300\304\305\303!\"\210\300\306\304\"\210\307\306\310\311#\210\312\303\313\304#\314\303\315\316\317$\207" [defalias semantic-collector-analyze-completions-p eieio-make-class-predicate semantic-collector-analyze-completions semantic-collector-analyze-completions--eieio-childp eieio-make-child-predicate semantic-collector-analyze-completions-child-p make-obsolete "use (cl-typep ... \\='semantic-collector-analyze-completions) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-collector-abstract) ((context :initarg :context :type semantic-analyze-context :documentation "An analysis context.\nSpecifies some context location from whence completion lists will be drawn.") (first-pass-completions :type list :documentation "List of valid completion tags.\nThis list of tags is generated when completion starts.  All searches\nderive from this list.")) (:documentation "Completion engine that uses the context analyzer to provide options.\nThe only options available for completion are those which can be logically\ninserted into the current context.")] 6)
#@95 Create a new object of class type
`semantic-collector-analyze-completions'.

(fn &rest SLOTS)
(defalias 'semantic-collector-analyze-completions #[128 "\300\301\302#\207" [apply make-instance semantic-collector-analyze-completions] 5 (#$ . 21783)])
(byte-code "\300\301\302\303#\300\207" [function-put semantic-collector-analyze-completions compiler-macro semantic-collector-analyze-completions--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'semantic-collector-analyze-completions--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 22201)])
(byte-code "\300\301\302\303\302\304%\210\300\305\302\306\302\307%\210\300\310\302\311\302\312%\210\300\313\302\314\302\315%\210\300\316\302\317\302\320%\210\300\301\302\321\302\322%\210\300\323\302\324\302\325%\210\300\326\302\327\302\330%\210\300\331\302\332\302\333%\210\300\334\302\335\302\336%\210\300\337\302\340\302\341%\210\300\342\302\343\302\344%\210\300\345\302\346\302\347%\210\300\350\302\351\302\352%\210\300\353\302\354\302\355%\210\356\357\360\361!\"\210\356\362\363\361!\"\210\356\364\362\"\210\365\364\366\367#\210\370\361\371\362#\372\361\373\302\374$\207" [cl-generic-define-method semantic-collector-calculate-completions-raw nil ((obj semantic-collector-analyze-completions) prefix _completionlist) #[771 "\302\303\"\204\304\303\305\306\307\"!#\210r\306\211\307\"\310\"q\210)G\311\306\303\"!\312\203P\313\314\312@\211@\262\314	&\315=\203I@B\262A\262\202)\211\237\266\202\262BC\207" [semanticdb-current-table semantic-case-fold slot-boundp first-pass-completions eieio-oset semantic-analyze-possible-completions eieio-oref context buffer semantic-something-to-tag-table nil compare-strings 0 t] 15 "Calculate the completions for prefix from COMPLETIONLIST.\n\n(fn OBJ PREFIX COMPLETIONLIST)"] semantic-collector-cleanup ((_obj semantic-collector-abstract)) #[257 "\300\207" [nil] 2 "Clean up any mess this collector may have.\n\n(fn OBJ)"] semantic-collector-next-action ((obj semantic-collector-abstract) partial) #[514 "\302\303\"\203f\304 \305\303\"\230\203f\306!\307!\310\304 \"\307!\203=\311U\203=\203=\211\311V\203=	=\203=\266\312\207\203K\311U\203K\266\313\207\204W\204W\266\314\207\205e\315\304 \"\205e\316\207\317\207" [last-command this-command slot-boundp last-completion semantic-completion-text eieio-oref semantic-collector-current-exact-match semanticdb-find-result-length semantic-collector-all-completions 1 nil done empty semantic-collector-try-completion-whitespace complete-whitespace complete] 9 "What should we do next?  OBJ can be used to determine the next action.\nPARTIAL indicates if we are doing a partial completion.\n\n(fn OBJ PARTIAL)"] semantic-collector-last-prefix= ((obj semantic-collector-abstract) last-prefix) #[514 "\300\301\"\205
\302\301\"\230\207" [slot-boundp last-prefix eieio-oref] 5 "Return non-nil if OBJ's prefix matches PREFIX.\n\n(fn OBJ LAST-PREFIX)"] semantic-collector-get-cache ((obj semantic-collector-abstract)) #[257 "\300\301\"\206\n\302!\207" [eieio-oref cache semantic-collector-calculate-cache] 4 "Get the raw cache of tags for completion.\nCalculate the cache if there isn't one.\n\n(fn OBJ)"] ((obj semantic-collector-abstract) prefix completionlist) #[771 "\211\204\302\303\"\206\304!\262r\302\305\"q\210)G\306\307!!\310\203H\311\312\310@\211@\262\312	&\313=\203A@B\262A\262\202!\211\237\266\202\262\211\205VBC\207" [semanticdb-current-table semantic-case-fold eieio-oref cache semantic-collector-calculate-cache buffer semantic-something-to-tag-table semanticdb-strip-find-results nil compare-strings 0 t] 15 "Calculate the completions for prefix from completionlist.\nOutput must be in semanticdb Find result format.\n\n(fn OBJ PREFIX COMPLETIONLIST)"] semantic-collector-calculate-completions ((obj semantic-collector-abstract) prefix _partial) #[771 "\302\"\303\304\"\205\305\304\"\204*\211\2031\306\307\310\307G&\311=\2031\305\312\"\202f\211\205fG\313V\205f\306\307\310\307	G&\311=\205f\314`!\315\316#\210\303\317\"\203d\320\317\"\210\210\310\203n\211\202u\321#\310\211\204\212\315	\304\n#\210\315	\312#\210\322\323!\"\262\315	\324\310#\210\315	\325\310#\210\205\334\315	\326\311=\203\274\315\f\325#\210\n\202\333\327\"\211\262\203\325\315\f\325#\210\n\202\333\206\333\n#)\207" [semantic-case-fold case-fold-search semantic-collector-last-prefix= slot-boundp last-prefix eieio-oref compare-strings 0 nil t last-all-completions 1 semantic-analyze-current-context eieio-oset context first-pass-completions slot-makeunbound semantic-collector-calculate-completions-raw try-completion semanticdb-strip-find-results last-whitespace-completion current-exact-match last-completion semanticdb-find-tags-by-name] 16 "Calculate completions for prefix as setup for other queries.\n\n(fn OBJ PREFIX PARTIAL)"] semantic-collector-try-completion-whitespace ((obj semantic-collector-abstract) prefix) #[514 "\300\"\301\302Q\303\"\304!\205T\305GT\306\305\"W\203:\211@\211@\262GW\203:T\262\306\"\262\202\211\205R\211\242\205R\307	\310@\211@\262\305O#\266\203\207" [semantic-collector-all-completions "^" "\\>" semanticdb-find-tags-by-name-regexp semanticdb-find-result-length 0 semanticdb-find-result-nth eieio-oset last-whitespace-completion] 15 "For OBJ, do whitespace completion based on PREFIX.\nThis implies that if there are two completions, one matching\nthe test \"prefix\\>\", and one not, the one matching the full\nword version of PREFIX will be chosen, and that text returned.\nThis function requires that `semantic-collector-calculate-completions'\nhas been run first.\n\n(fn OBJ PREFIX)"] semantic-collector-current-exact-match ((obj semantic-collector-abstract)) #[257 "\300\301\"\205\302\301\"\207" [slot-boundp current-exact-match eieio-oref] 4 "Return the active valid MATCH from the semantic collector.\nFor now, just return the first element from our list of available\nmatches.  For semanticdb based results, make sure the file is loaded\ninto a buffer.\n\n(fn OBJ)"] semantic-collector-current-whitespace-completion ((obj semantic-collector-abstract)) #[257 "\300\301\"\205\302\301\"\207" [slot-boundp last-whitespace-completion eieio-oref] 4 "Return the active whitespace completion value.\n\n(fn OBJ)"] semantic-collector-get-match ((obj semantic-collector-abstract)) #[257 "\300\301\"\205\302\303\301\"\304\"\207" [slot-boundp current-exact-match semanticdb-find-result-nth-in-buffer eieio-oref 0] 5 "Return the active valid MATCH from the semantic collector.\nFor now, just return the first element from our list of available\nmatches.  For semanticdb based results, make sure the file is loaded\ninto a buffer.\n\n(fn OBJ)"] semantic-collector-all-completions ((obj semantic-collector-abstract) _prefix) #[514 "\300\301\"\205\302\301\"\207" [slot-boundp last-all-completions eieio-oref] 5 "For OBJ, retrieve all completions matching PREFIX.\nThe returned list consists of all the tags currently\nmatching PREFIX.\n\n(fn OBJ PREFIX)"] semantic-collector-try-completion ((obj semantic-collector-abstract) _prefix) #[514 "\300\301\"\205\302\301\"\207" [slot-boundp last-completion eieio-oref] 5 "For OBJ, attempt to match PREFIX.\nSee `try-completion' for details on how this works.\nReturn nil for no match.\nReturn a string for a partial match.\nFor a unique match of PREFIX, return the list of all tags\nwith that name.\n\n(fn OBJ PREFIX)"] semantic-collector-calculate-cache ((_obj semantic-collector-abstract)) #[257 "\300\207" [nil] 2 "Calculate the completion cache for OBJ.\n\n(fn OBJ)"] semantic-collector-flush ((this semantic-collector-abstract)) #[257 "\300\301\302#\210\303\304\"\210\303\305\"\210\303\306\"\210\303\307\"\207" [eieio-oset cache nil slot-makeunbound last-prefix last-completion last-all-completions current-exact-match] 5 "Flush THIS collector object, clearing any caches and prefix.\n\n(fn THIS)"] defalias semantic-collector-buffer-abstract-p eieio-make-class-predicate semantic-collector-buffer-abstract semantic-collector-buffer-abstract--eieio-childp eieio-make-child-predicate semantic-collector-buffer-abstract-child-p make-obsolete "use (cl-typep ... \\='semantic-collector-buffer-abstract) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-collector-abstract) (:documentation "Root class for per-buffer completion engines.\nThese collectors track themselves on a per-buffer basis." :abstract t)] 6)
#@92 You cannot create a new object of type `semantic-collector-buffer-abstract'.

(fn &rest _)
(defalias 'semantic-collector-buffer-abstract #[128 "\300\301!\207" [error "Class semantic-collector-buffer-abstract is abstract"] 3 (#$ . 30466)])
(cl-generic-define-method 'make-instance nil '((this (subclass semantic-collector-buffer-abstract)) &rest _args) t #[642 "\301\211\203\204\302@!=\203\211@\262\202\204, \211\235\204*\211B\262\303\304\"\210\303\305\"\210\303\306\"\210\207" [semantic-collector-per-buffer-list nil eieio-object-class slot-makeunbound last-completion last-prefix current-exact-match] 8 "Reuse previously created objects of this type in buffer.\n\n(fn THIS &rest ARGS)"])
#@101 Flush all buffer collector objects.
NEWCACHE is the new tag table, but we ignore it.

(fn NEWCACHE)
(defalias 'semantic-collector-buffer-flush #[257 "\3011\211\205\211@\203\302@!\210\211A\262\202\2620\207\210\303\207" [semantic-collector-per-buffer-list (error) semantic-collector-flush nil] 4 (#$ . 31187)])
(byte-code "\300\301\302\"\210\303\304\305\306!\"\210\303\307\310\306!\"\210\303\311\307\"\210\312\311\313\314#\210\315\306\316\307#\317\306\320\321\322$\207" [add-hook semantic-after-toplevel-cache-change-hook semantic-collector-buffer-flush defalias semantic-collector-buffer-deep-p eieio-make-class-predicate semantic-collector-buffer-deep semantic-collector-buffer-deep--eieio-childp eieio-make-child-predicate semantic-collector-buffer-deep-child-p make-obsolete "use (cl-typep ... \\='semantic-collector-buffer-deep) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-collector-buffer-abstract) nil (:documentation "Completion engine for tags in the current buffer.\nWhen searching for a tag, uses semantic deep search functions.\nBasics search only in the current buffer.")] 6)
#@87 Create a new object of class type `semantic-collector-buffer-deep'.

(fn &rest SLOTS)
(defalias 'semantic-collector-buffer-deep #[128 "\300\301\302#\207" [apply make-instance semantic-collector-buffer-deep] 5 (#$ . 32338)])
(byte-code "\300\301\302\303#\300\207" [function-put semantic-collector-buffer-deep compiler-macro semantic-collector-buffer-deep--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'semantic-collector-buffer-deep--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 32716)])
(byte-code "\300\301\302\303\302\304%\210\305\306\307\310!\"\210\305\311\312\310!\"\210\305\313\311\"\210\314\313\315\316#\210\317\310\320\311#\321\310\322\323\324$\207" [cl-generic-define-method semantic-collector-calculate-cache nil ((obj semantic-collector-buffer-deep)) #[257 "\301\302\303\304\305\"!BC#\207" [semanticdb-current-table eieio-oset cache semantic-flatten-tags-table eieio-oref buffer] 9 "Calculate the completion cache for OBJ.\nUses `semantic-flatten-tags-table'.\n\n(fn OBJ)"] defalias semantic-collector-project-abstract-p eieio-make-class-predicate semantic-collector-project-abstract semantic-collector-project-abstract--eieio-childp eieio-make-child-predicate semantic-collector-project-abstract-child-p make-obsolete "use (cl-typep ... \\='semantic-collector-project-abstract) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-collector-abstract) ((path :initarg :path :initform nil :documentation "List of database tables to search.\nAt creation time, it can be anything accepted by\n`semanticdb-find-translate-path' as a PATH argument.")) (:documentation "Root class for project wide completion engines.\nUses semanticdb for searching all tags in the current project." :abstract t)] 6)
#@93 You cannot create a new object of type `semantic-collector-project-abstract'.

(fn &rest _)
(defalias 'semantic-collector-project-abstract #[128 "\300\301!\207" [error "Class semantic-collector-project-abstract is abstract"] 3 (#$ . 34222)])
(byte-code "\300\301\302\303!\"\210\300\304\305\303!\"\210\300\306\304\"\210\307\306\310\311#\210\312\303\313\304#\314\303\315\316\317$\207" [defalias semantic-collector-project-p eieio-make-class-predicate semantic-collector-project semantic-collector-project--eieio-childp eieio-make-child-predicate semantic-collector-project-child-p make-obsolete "use (cl-typep ... \\='semantic-collector-project) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-collector-project-abstract) nil (:documentation "Completion engine for tags in a project.")] 6)
#@83 Create a new object of class type `semantic-collector-project'.

(fn &rest SLOTS)
(defalias 'semantic-collector-project #[128 "\300\301\302#\207" [apply make-instance semantic-collector-project] 5 (#$ . 35058)])
(byte-code "\300\301\302\303#\300\207" [function-put semantic-collector-project compiler-macro semantic-collector-project--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'semantic-collector-project--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 35416)])
(byte-code "\300\301\302\303\302\304%\210\305\306\307\310!\"\210\305\311\312\310!\"\210\305\313\311\"\210\314\313\315\316#\210\317\310\320\311#\321\310\322\302\323$\207" [cl-generic-define-method semantic-collector-calculate-completions-raw nil ((obj semantic-collector-project) prefix _completionlist) #[771 "\300\301\302\"\"\207" [semanticdb-find-tags-for-completion eieio-oref path] 8 "Calculate the completions for prefix from COMPLETIONLIST.\n\n(fn OBJ PREFIX COMPLETIONLIST)"] defalias semantic-collector-project-brutish-p eieio-make-class-predicate semantic-collector-project-brutish semantic-collector-project-brutish--eieio-childp eieio-make-child-predicate semantic-collector-project-brutish-child-p make-obsolete "use (cl-typep ... \\='semantic-collector-project-brutish) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-collector-project-abstract) (:documentation "Completion engine for tags in a project.")] 6)
#@91 Create a new object of class type
`semantic-collector-project-brutish'.

(fn &rest SLOTS)
(defalias 'semantic-collector-project-brutish #[128 "\300\301\302#\207" [apply make-instance semantic-collector-project-brutish] 5 (#$ . 36628)])
(byte-code "\300\301\302\303#\300\207" [function-put semantic-collector-project-brutish compiler-macro semantic-collector-project-brutish--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'semantic-collector-project-brutish--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 37026)])
(byte-code "\300\301\302\303\302\304%\210\305\306\307\310!\"\210\305\311\312\310!\"\210\305\313\311\"\210\314\313\315\316#\210\317\310\320\311#\321\310\322\323\324$\207" [cl-generic-define-method semantic-collector-calculate-completions-raw nil ((obj semantic-collector-project-brutish) prefix _completionlist) #[771 "\300\301!\210\302\303\304\"\"\207" [require semantic/db-find semanticdb-brute-deep-find-tags-for-completion eieio-oref path] 8 "Calculate the completions for prefix from COMPLETIONLIST.\n\n(fn OBJ PREFIX COMPLETIONLIST)"] defalias semantic-collector-local-members-p eieio-make-class-predicate semantic-collector-local-members semantic-collector-local-members--eieio-childp eieio-make-child-predicate semantic-collector-local-members-child-p make-obsolete "use (cl-typep ... \\='semantic-collector-local-members) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-collector-project-abstract) ((scope :initform nil :type (or null semantic-scope-cache) :documentation "The scope the local members are being completed from.")) (:documentation "Completion engine for tags in a project.")] 6)
#@89 Create a new object of class type `semantic-collector-local-members'.

(fn &rest SLOTS)
(defalias 'semantic-collector-local-members #[128 "\300\301\302#\207" [apply make-instance semantic-collector-local-members] 5 (#$ . 38425)])
(byte-code "\300\301\302\303#\300\207" [function-put semantic-collector-local-members compiler-macro semantic-collector-local-members--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'semantic-collector-local-members--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 38813)])
(byte-code "\300\301\302\303\302\304%\210\305\306\307\310!\"\210\305\311\312\310!\"\210\305\313\311\"\210\314\313\315\316#\210\317\310\320\311#\321\310\302\322\323$\207" [cl-generic-define-method semantic-collector-calculate-completions-raw nil ((obj semantic-collector-local-members) prefix _completionlist) #[771 "\301\302\"\206
\303\302\304 #\301\302\"\301\305\"G\306!\307\203B\310\311\307@\211@\262\311&\312=\203;@B\262A\262\202\211\237\266\202\262BC\207" [semantic-case-fold eieio-oref scope eieio-oset semantic-calculate-scope table semantic-something-to-tag-table nil compare-strings 0 t] 17 "Calculate the completions for prefix from COMPLETIONLIST.\n\n(fn OBJ PREFIX COMPLETIONLIST)"] defalias semantic-displayer-abstract-p eieio-make-class-predicate semantic-displayer-abstract semantic-displayer-abstract--eieio-childp eieio-make-child-predicate semantic-displayer-abstract-child-p make-obsolete "use (cl-typep ... \\='semantic-displayer-abstract) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal ((table :type (or null semanticdb-find-result-with-nil) :initform nil :protection :protected :documentation "List of tags this displayer is showing.") (last-prefix :type string :protection :protected :documentation "Prefix associated with slot `table'.")) (:documentation "Abstract displayer baseclass.\nManages the display of some number of tags.\nProvides the basics for a displayer, including interacting with\na collector, and tracking tables of completion to display." :abstract t)] 6)
#@85 You cannot create a new object of type `semantic-displayer-abstract'.

(fn &rest _)
(defalias 'semantic-displayer-abstract #[128 "\300\301!\207" [error "Class semantic-displayer-abstract is abstract"] 3 (#$ . 40620)])
(byte-code "\301\302\303\304#\210\305\302\303\306#\210\307\303\304\310\304\311%\210\301\312\313\304#\210\305\312\313\306#\210\307\313\304\314\304\315%\210\301\316\317\304#\210\305\316\317\306#\210\307\317\304\320\304\321%\210\301\322\323\304#\210\305\322\323\306#\210\307\323\304\324\304\325%\210\301\326\327\304#\210\305\326\327\306#\210\307\327\304\330\304\331%\210\301\332\333\304#\210\305\332\333\306#\210\307\333\304\334\304\335%\210\301\336\337\304#\210\305\336\337\306#\210\307\337\304\340\304\341%\210\301\342\343\304#\210\305\342\343\306#\210\307\343\304\344\304\345%\210\301\346\347\304#\210\305\346\347\306#\210\307\347\304\350\304\351%\210\352\353\354\355\356DD\357\360\361\362&\210\301\363\364\365!\"\210\301\366\367\365!\"\210\301\370\366\"\210\305\370\371\372#\210\373\365\374\366#\375\365\376\304\377$\207" [semantic-format-tag-custom-list defalias semantic-displayor-cleanup semantic-displayer-cleanup nil make-obsolete "27.1" cl-generic-define-method ((_obj semantic-displayer-abstract)) #[257 "\300\207" [nil] 2 "Clean up any mess this displayer may have.\n\n(fn OBJ)"] semantic-displayor-next-action semantic-displayer-next-action ((obj semantic-displayer-abstract)) #[257 "\302\303\"\203\304=\204\305\303\"\306 \230\203	=\203\307\207\310\207" [this-command last-command slot-boundp last-prefix semantic-complete-inline-TAB eieio-oref semantic-completion-text scroll display] 4 "The next action to take on the minibuffer related to display.\n\n(fn OBJ)"] semantic-displayor-set-completions semantic-displayer-set-completions ((obj semantic-displayer-abstract) table prefix) #[771 "\300\301#\210\300\302#\207" [eieio-oset table last-prefix] 7 "Set the list of tags to be completed over to TABLE.\n\n(fn OBJ TABLE PREFIX)"] semantic-displayor-show-request semantic-displayer-show-request ((_obj semantic-displayer-abstract)) #[257 "\300 \207" [ding] 2 "A request to show the current tags table.\n\n(fn OBJ)"] semantic-displayor-focus-request semantic-displayer-focus-request ((_obj semantic-displayer-abstract)) #[257 "\300 \207" [ding] 2 "A request to for the displayer to focus on some tag option.\n\n(fn OBJ)"] semantic-displayor-scroll-request semantic-displayer-scroll-request ((_obj semantic-displayer-abstract)) #[257 "\300 \207" [scroll-other-window] 2 "A request to for the displayer to scroll the completion list (if needed).\n\n(fn OBJ)"] semantic-displayor-focus-previous semantic-displayer-focus-previous ((_obj semantic-displayer-abstract)) #[257 "\300\207" [nil] 2 "Set the current focus to the previous item.\n\n(fn OBJ)"] semantic-displayor-focus-next semantic-displayer-focus-next ((_obj semantic-displayer-abstract)) #[257 "\300\207" [nil] 2 "Set the current focus to the next item.\n\n(fn OBJ)"] semantic-displayor-current-focus semantic-displayer-current-focus ((_obj semantic-displayer-abstract)) #[257 "\300\207" [nil] 2 "Return a single tag currently in focus.\nThis object type doesn't do focus, so will never have a focus object.\n\n(fn OBJ)"] custom-declare-variable semantic-completion-displayer-format-tag-function funcall function #[0 "\300\207" [semantic-format-tag-name] 1 ""] "A Tag format function to use when showing completions." :group semantic :type semantic-displayer-traditional-p eieio-make-class-predicate semantic-displayer-traditional semantic-displayer-traditional--eieio-childp eieio-make-child-predicate semantic-displayer-traditional-child-p "use (cl-typep ... \\='semantic-displayer-traditional) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-displayer-abstract) (:documentation "Display options in *Completions* buffer.\nTraditional display mechanism for a list of possible completions.\nCompletions are showin in a new buffer and listed with the ability\nto click on the items to aid in completion.")] 8)
#@87 Create a new object of class type `semantic-displayer-traditional'.

(fn &rest SLOTS)
(defalias 'semantic-displayer-traditional #[128 "\300\301\302#\207" [apply make-instance semantic-displayer-traditional] 5 (#$ . 44679)])
(byte-code "\300\301\302\303#\300\207" [function-put semantic-displayer-traditional compiler-macro semantic-displayer-traditional--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'semantic-displayer-traditional--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 45057)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\210\306\302\303\307\303\310%\210\300\311\312\313!\"\210\300\314\315\313!\"\210\300\316\314\"\210\304\316\317\320#\210\321\313\322\314#\323\313\324\325\326$\207" [defalias semantic-displayor-show-request semantic-displayer-show-request nil make-obsolete "27.1" cl-generic-define-method ((obj semantic-displayer-traditional)) #[257 "r\306\307!q\210p\310 \210\311\211\312\211\312\313 \210\314\315!\210+\211\316\317\320\321\322\"!\"!\323!\210)\207" [default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only get-buffer-create "*Completions*" kill-all-local-variables nil t erase-buffer run-hooks temp-buffer-setup-hook display-completion-list mapcar semanticdb-strip-find-results eieio-oref table internal-temp-output-buffer-show standard-output semantic-completion-displayer-format-tag-function] 11 "A request to show the current tags table.\n\n(fn OBJ)"] semantic-displayer-focus-abstract-p eieio-make-class-predicate semantic-displayer-focus-abstract semantic-displayer-focus-abstract--eieio-childp eieio-make-child-predicate semantic-displayer-focus-abstract-child-p "use (cl-typep ... \\='semantic-displayer-focus-abstract) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-displayer-abstract) ((focus :type number :protection :protected :documentation "A tag index from `table' which has focus.\nMultiple calls to the display function can choose to focus on a\ngiven tag, by highlighting its location.") (find-file-focus :allocation :class :initform nil :documentation "Non-nil if focusing requires a tag's buffer be in memory.")) (:documentation "Abstract displayer supporting `focus'.\nA displayer which has the ability to focus in on one tag.\nFocusing is a way of differentiating among multiple tags\nwhich have the same name." :abstract t)] 6)
#@91 You cannot create a new object of type `semantic-displayer-focus-abstract'.

(fn &rest _)
(defalias 'semantic-displayer-focus-abstract #[128 "\300\301!\207" [error "Class semantic-displayer-focus-abstract is abstract"] 3 (#$ . 47219)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\210\306\302\303\307\303\310%\210\300\311\312\303#\210\304\311\312\305#\210\306\312\303\313\314\315%\210\300\316\317\303#\210\304\316\317\305#\210\306\317\303\320\303\321%\210\300\322\323\303#\210\304\322\323\305#\210\306\323\303\324\303\325%\210\300\326\327\303#\210\304\326\327\305#\210\306\327\303\330\303\331%\210\300\332\333\303#\210\304\332\333\305#\210\306\333\303\334\314\335%\210\300\336\337\340!\"\210\300\341\342\340!\"\210\300\343\341\"\210\304\343\344\345#\210\346\340\347\341#\350\340\351\352\353$\207" [defalias semantic-displayor-next-action semantic-displayer-next-action nil make-obsolete "27.1" cl-generic-define-method ((obj semantic-displayer-focus-abstract)) #[257 "\302\303\"\2038\304\303\"\305 \230\2038	=\2038\302\306\"\2036\302\307\"\2036\310\304\307\"!\304\306\"TX\2036\311\207\306\207\312\207" [last-command this-command slot-boundp last-prefix eieio-oref semantic-completion-text focus table semanticdb-find-result-length displayend display] 5 "The next action to take on the minibuffer related to display.\n\n(fn OBJ)"] semantic-displayor-set-completions semantic-displayer-set-completions ((obj semantic-displayer-focus-abstract) _table _prefix) t #[1028 " \210\300\301\"\207" [slot-makeunbound focus] 7 "Set the list of tags to be completed over to TABLE.\n\n(fn CL--CNM OBJ TABLE PREFIX)"] semantic-displayor-focus-previous semantic-displayer-focus-previous ((obj semantic-displayer-focus-abstract)) #[257 "\300\301\"\2053\302\301\"\2053\300\303\"\203\302\303\"\304X\203*\305\303\306\307\301\"!S#\207\305\303\302\303\"S#\207" [slot-boundp table eieio-oref focus 0 eieio-oset semanticdb-find-result-length slot-value] 8 "Set the current focus to the previous item.\nNot meaningful return value.\n\n(fn OBJ)"] semantic-displayor-focus-next semantic-displayer-focus-next ((obj semantic-displayer-focus-abstract)) #[257 "\300\301\"\205;\302\301\"\205;\300\303\"\204\304\303\305#\210\202(\304\303\302\303\"T#\210\306\307\301\"!\302\303\"X\205;\304\303\305#\207" [slot-boundp table eieio-oref focus eieio-oset 0 semanticdb-find-result-length slot-value] 7 "Set the current focus to the next item.\nNot meaningful return value.\n\n(fn OBJ)"] semantic-displayor-focus-tag semantic-displayer-focus-tag ((obj semantic-displayer-focus-abstract)) #[257 "\300\301\"\205\302\301\"\205\303\304\301\"\302\305\"\"\207" [slot-boundp table eieio-oref semanticdb-find-result-nth slot-value focus] 6 "Return the next tag OBJ should focus on.\n\n(fn OBJ)"] semantic-displayor-current-focus semantic-displayer-current-focus ((obj semantic-displayer-focus-abstract)) #[514 "\300\301\"\203=\300\302\"\203=\300\303\"\203=\304 \305\303\"\230\203=\305\306\"\2031\307\305\302\"\305\301\"\"\207\310\305\302\"\305\301\"\"@\207 \207" [slot-boundp focus table last-prefix semantic-completion-text eieio-oref find-file-focus semanticdb-find-result-nth-in-buffer semanticdb-find-result-nth] 7 "Return the tag currently in focus, or call parent method.\n\n(fn CL--CNM OBJ)"] semantic-displayer-traditional-with-focus-highlight-p eieio-make-class-predicate semantic-displayer-traditional-with-focus-highlight semantic-displayer-traditional-with-focus-highlight--eieio-childp eieio-make-child-predicate semantic-displayer-traditional-with-focus-highlight-child-p "use (cl-typep ... \\='semantic-displayer-traditional-with-focus-highlight) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-displayer-focus-abstract semantic-displayer-traditional) ((find-file-focus :initform t)) (:documentation "Display completions in *Completions* buffer, with focus highlight.\nA traditional displayer which can focus on a tag by showing it.\nSame as `semantic-displayer-traditional', but with selection between\nmultiple tags with the same name done by focusing on the source\nlocation of the different tags to differentiate them.")] 6)
#@108 Create a new object of class type
`semantic-displayer-traditional-with-focus-highlight'.

(fn &rest SLOTS)
(defalias 'semantic-displayer-traditional-with-focus-highlight #[128 "\300\301\302#\207" [apply make-instance semantic-displayer-traditional-with-focus-highlight] 5 (#$ . 51436)])
(byte-code "\300\301\302\303#\300\207" [function-put semantic-displayer-traditional-with-focus-highlight compiler-macro semantic-displayer-traditional-with-focus-highlight--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'semantic-displayer-traditional-with-focus-highlight--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 51919)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\210\306\302\303\307\303\310%\210\311\312\313\314\315DD\316\317\320\321\322\323\324&	\210\311\325\313\314\326DD\327\317\320\321\322\323\330&	\210\311\331\313\314\332DD\333\317\320\321\322\323\330\334\335&\210\300\336\337\340!\"\210\300\341\342\340!\"\210\300\343\341\"\210\304\343\344\345#\210\346\340\347\341#\350\340\351\352\353$\207" [defalias semantic-displayor-focus-request semantic-displayer-focus-request nil make-obsolete "27.1" cl-generic-define-method ((obj semantic-displayer-traditional-with-focus-highlight)) #[257 "\300\301\302\"!\303!\211@A\304\"\211A@\305 \204!\262\262\306!\206.\205.\307!\211\204fr\310\311!q\210\312 \210\313c\210\314\315\316#\317\261\210\203U\320c\210\321!\317\261\210\211\203b\322c\210\323\324\"c\210p\262)\325!\203u\326\325!!\210\202\200\327\316\"\210\326\325!!\210\330!\203\247\211\3318\262\332!\203\233\333!\266\202\202\240\211\334H\266\202b\210\335\336 !\210\326!\210\337 \211@\262\211G\315O\340\323\341\301\342\"T$!\207" [semanticdb-find-result-length eieio-oref table semantic-displayer-focus-tag semanticdb-normalize-one-tag selected-window semantic-tag-buffer semanticdb-get-buffer get-buffer-create "*Completion Focus*" erase-buffer "Focus on tag: \n" semantic-format-tag-summarize nil t "\n\n" "From table: \n" eieio-object-name "In buffer: \n\n" format "%S" get-buffer-window select-window switch-to-buffer-other-window semantic-tag-with-position-p 4 overlayp overlay-start 0 semantic-momentary-highlight-tag semantic-current-tag semantic-completion-text semantic-completion-message "%s [%d of %d matches]" focus] 20 "Focus in on possible tag completions.\nFocus is performed by cycling through the tags and highlighting\none in the source buffer.\n\n(fn OBJ)"] custom-declare-variable semantic-displayer-tooltip-mode funcall function #[0 "\300\207" [standard] 1 #1=""] "Mode for the tooltip inline completion.\n\nStandard: Show only `semantic-displayer-tooltip-initial-max-tags'\nnumber of completions initially.  Pressing TAB will show the\nextended set.\n\nQuiet: Only show completions when we have narrowed all\npossibilities down to a maximum of\n`semantic-displayer-tooltip-initial-max-tags' tags.  Pressing TAB\nmultiple times will also show completions.\n\nVerbose: Always show all completions available.\n\nThe absolute maximum number of completions for all mode is\ndetermined through `semantic-displayer-tooltip-max-tags'." :group semantic :version "24.3" :type (choice (const :tag "Standard" standard) (const :tag "Quiet" quiet) (const :tag "Verbose" verbose)) semantic-displayer-tooltip-initial-max-tags #[0 "\300\207" [5] 1 #1#] "Maximum number of tags to be displayed initially.\nSee doc-string of `semantic-displayer-tooltip-mode' for details." integer semantic-displayer-tooltip-max-tags #[0 "\300\207" [25] 1 #1#] "The maximum number of tags to be displayed.\nMaximum number of completions where we have activated the\nextended completion list through typing TAB or SPACE multiple\ntimes.  This limit needs to fit on your screen!\n\nNote: If available, customizing this variable increases\n`x-max-tooltip-size' to force over-sized tooltips when necessary.\nThis will not happen if you directly set this variable via `setq'." :set #[514 "\301\"\210\302\300!\205TA]\241\207" [x-max-tooltip-size set-default boundp] 5 "\n\n(fn SYM VAR)"] semantic-displayer-tooltip-p eieio-make-class-predicate semantic-displayer-tooltip semantic-displayer-tooltip--eieio-childp eieio-make-child-predicate semantic-displayer-tooltip-child-p "use (cl-typep ... \\='semantic-displayer-tooltip) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-displayer-traditional) ((mode :initarg :mode :initform (symbol-value 'semantic-displayer-tooltip-mode) :documentation "See `semantic-displayer-tooltip-mode'.") (max-tags-initial :initarg max-tags-initial :initform (symbol-value 'semantic-displayer-tooltip-initial-max-tags) :documentation "See `semantic-displayer-tooltip-initial-max-tags'.") (typing-count :type integer :initform 0 :documentation "Counter holding how many times the user types space or tab continuously before showing tags.") (shown :type boolean :initform nil :documentation "Flag representing whether tooltip has been shown yet.")) (:documentation "Display completions options in a tooltip.\nDisplay mechanism using tooltip for a list of possible completions.")] 12)
#@83 Create a new object of class type `semantic-displayer-tooltip'.

(fn &rest SLOTS)
(defalias 'semantic-displayer-tooltip #[128 "\300\301\302#\207" [apply make-instance semantic-displayer-tooltip] 5 (#$ . 56663)])
(byte-code "\300\301\302\303#\300\207" [function-put semantic-displayer-tooltip compiler-macro semantic-displayer-tooltip--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'semantic-displayer-tooltip--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 57021)])
(byte-code "\300\301\302\303\304\305%\210\306\307\310\304#\210\311\307\310\312#\210\300\310\304\313\314\315%\207" [cl-generic-define-method initialize-instance (:after) ((_obj semantic-displayer-tooltip) &rest _args) nil #[385 "\300\301!\207" [require tooltip] 4 "Make sure we have tooltips required.\n\n(fn OBJ &rest ARGS)"] defalias semantic-displayor-show-request semantic-displayer-show-request make-obsolete "27.1" ((obj semantic-displayer-tooltip)) t #[514 "\305\306!\203\n\204
 \207\307\310\311\"!\312!\313	\"\211G\310\314\"\310\315\"\316 \317\211\320\n\321\322 \323\232\203=\310
\321\"T\202>\324#\210\325\267\202~\310\n\321\"\326Y\203^\320\n\314\327#\210\327\262\330\331!\210V\203~\310\n\321\"\332W\203~\333\262\202~\320\n\315\n#\210\n\262\204\320\n\334\335#\210V\203\312S\233\317\241\210U\203\254\336\337Z!\340Q\262\202\366\341\337Z!\340Q\262\310\n\321\"\332Y\203\366\330\342\343\"\210\202\366\344U\203\342@\211@\262\230\203\366\345\262\202\366\324U\203\366\320\n\334\317#\210\f\203\366\346\262\347\350	\351#P\262P\262\352=?\205\353!\207" [tooltip-mode semantic-completion-displayer-format-tag-function semantic-displayer-tooltip-max-tags semantic-displayer-tooltip-initial-max-tags semantic-idle-scheduler-verbose-flag featurep tooltip semanticdb-strip-find-results eieio-oref table semantic-unique-tag-table-by-name mapcar mode max-tags-initial semantic-completion-text nil eieio-oset typing-count this-command-keys "	" 0 #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (quiet 70 verbose 116)) 5 standard message "Resetting inline-mode to `standard'." 2 "..." shown t "\n[<TAB> " number-to-string " more]" "\n[<n/a> " "Refine search to display results beyond the `%s' limit" "semantic-complete-inline-max-tags-extended" 1 "[COMPLETE]\n" "[NO MATCH]" mapconcat identity "\n" "" semantic-displayer-tooltip-show] 17 "A request to show the current tags table.\n\n(fn CL--CNM OBJ)"]] 6)
#@95 Return the location of POINT as positioned on the selected frame.
Return a cons cell (X . Y).
(defalias 'semantic-displayer-point-position #[0 "\301 \302\236A\303=\203\304 \202\305\306\303\"\243\242\206\306\303\"\\\306\307\"\243\242\206-\306\307\"\310 \3118\262\312\313 !@@\\\\AA@\\\\B\207" [default-frame-alist selected-frame tool-bar-position left tool-bar-pixel-width 0 frame-parameter top posn-at-point 2 window-inside-pixel-edges selected-window] 9 (#$ . 59276)])
#@53 Display a tooltip with TEXT near cursor.

(fn TEXT)
(defalias 'semantic-displayer-tooltip-show #[257 "\301 \302\303\"\304@\305 \\BB\306A\307 \\BB\310!)\207" [tooltip-frame-parameters semantic-displayer-point-position append nil left frame-char-width top frame-char-height tooltip-show] 5 (#$ . 59772)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\210\306\302\303\307\303\310%\210\300\311\312\313!\"\210\300\314\315\313!\"\210\300\316\314\"\210\304\316\317\320#\210\321\313\322\314#\323\313\324\325\326$\207" [defalias semantic-displayor-scroll-request semantic-displayer-scroll-request nil make-obsolete "27.1" cl-generic-define-method ((obj semantic-displayer-tooltip)) #[257 "\300\301\302#\210\303!\207" [eieio-oset max-tags-initial 30 semantic-displayer-show-request] 5 "A request to for the displayer to scroll the completion list (if needed).\n\n(fn OBJ)"] semantic-displayer-ghost-p eieio-make-class-predicate semantic-displayer-ghost semantic-displayer-ghost--eieio-childp eieio-make-child-predicate semantic-displayer-ghost-child-p "use (cl-typep ... \\='semantic-displayer-ghost) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-displayer-focus-abstract) ((ghostoverlay :type overlay :documentation "The overlay the ghost text is displayed in.") (first-show :initform t :documentation "Non-nil if we have not seen our first show request.")) (:documentation "Cycle completions inline with ghost text.\nCompletion displayer using ghost chars after point for focus options.\nWhichever completion is currently in focus will be displayed as ghost\ntext using overlay options.")] 6)
#@81 Create a new object of class type `semantic-displayer-ghost'.

(fn &rest SLOTS)
(defalias 'semantic-displayer-ghost #[128 "\300\301\302#\207" [apply make-instance semantic-displayer-ghost] 5 (#$ . 61423)])
(byte-code "\300\301\302\303#\300\207" [function-put semantic-displayer-ghost compiler-macro semantic-displayer-ghost--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'semantic-displayer-ghost--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 61771)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\210\306\302\303\307\310\311%\210\300\312\313\303#\210\304\312\313\305#\210\306\313\303\314\303\315%\210\300\316\317\303#\210\304\316\317\305#\210\306\317\303\320\310\321%\210\300\322\323\303#\210\304\322\323\305#\210\306\323\303\324\303\325%\210\300\326\327\303#\210\304\326\327\305#\210\306\327\303\330\303\331%\207" [defalias semantic-displayor-next-action semantic-displayer-next-action nil make-obsolete "27.1" cl-generic-define-method ((obj semantic-displayer-ghost)) t #[514 " \300\301\"\205
\302\301\"\303=\205\211\205\304!\305U?\205!\207" [slot-boundp table eieio-oref displayend semanticdb-find-result-length 1] 6 "The next action to take on the inline completion related to display.\n\n(fn CL--CNM OBJ)"] semantic-displayor-cleanup semantic-displayer-cleanup ((obj semantic-displayer-ghost)) #[257 "\300\301\"\205
\302\303\301\"!\207" [slot-boundp ghostoverlay delete-overlay eieio-oref] 5 "Clean up any mess this displayer may have.\n\n(fn OBJ)"] semantic-displayor-set-completions semantic-displayer-set-completions ((obj semantic-displayer-ghost) _table _prefix) #[1028 " \210\300!\207" [semantic-displayer-cleanup] 6 "Set the list of tags to be completed over to TABLE.\n\n(fn CL--CNM OBJ TABLE PREFIX)"] semantic-displayor-show-request semantic-displayer-show-request ((obj semantic-displayer-ghost)) #[257 "\300!\210\301!\207" [semantic-displayer-focus-next semantic-displayer-focus-request] 3 "A request to show the current tags table.\n\n(fn OBJ)"] semantic-displayor-focus-request semantic-displayer-focus-request ((obj semantic-displayer-ghost)) #[257 "\300\301\302\"!\303!\211@\211\204\304\305!\207\306\307\"\203#\310\301\307\"!\204/\311\307\312``Tp\313$#\210\314 \211@\262G\315O\301\307\"\316\317G\320\321%\210\322\323``T{P#\266\314 \211@\262\260\316GG\320\324%\210\304\325\326\301\n\327\"T	$!\207" [semanticdb-find-result-length eieio-oref table semantic-displayer-focus-tag semantic-completion-message "No tags to focus on." slot-boundp ghostoverlay overlay-buffer eieio-oset make-overlay t semantic-completion-text nil put-text-property 0 face region overlay-put display bold format "%s [%d of %d matches]" focus] 13 "Focus in on possible tag completions.\nFocus is performed by cycling through the tags and showing a possible\ncompletion text in ghost text.\n\n(fn OBJ)"]] 6)
#@87 Possible options for inline completion displayers.
Use this to enable custom editing.
(defvar semantic-complete-inline-custom-type (byte-code "\300\301\302\303\304\305\306\"\"\"\207" [append (radio) mapcar #[257 "\300@!\301\302\"\303\304\"@\305\306F\207" [intern documentation-property variable-documentation split-string "\n" const :tag] 8 "\n\n(fn CLASS)"] eieio-build-class-alist semantic-displayer-abstract t] 7) (#$ . 64415))
(byte-code "\301\302\303\304\305DD\306\307\310\311&\207" [semantic-complete-inline-custom-type custom-declare-variable semantic-complete-inline-analyzer-displayer-class funcall function #[0 "\300\207" [semantic-displayer-traditional] 1 ""] "Class for displayer to use with inline completion." :group semantic :type] 8)
#@510 Ask for a tag by name from the current buffer.
Available tags are from the current buffer, at any level.
Completion options are presented in a traditional way, with highlighting
to resolve same-name collisions.
PROMPT is a string to prompt with.
DEFAULT-TAG is a semantic tag or string to use as the default value.
If INITIAL-INPUT is non-nil, insert it in the minibuffer initially.
HISTORY is a symbol representing a variable to store the history in.

(fn PROMPT &optional DEFAULT-TAG INITIAL-INPUT HISTORY)
(defalias 'semantic-complete-read-tag-buffer-deep #[1025 "\300\301\302p#\303 &\207" [semantic-complete-read-tag-engine semantic-collector-buffer-deep :buffer semantic-displayer-traditional-with-focus-highlight] 11 (#$ . 65179)])
#@499 Ask for a tag by name from the local type members.
Available tags are from the current scope.
Completion options are presented in a traditional way, with highlighting
to resolve same-name collisions.
PROMPT is a string to prompt with.
DEFAULT-TAG is a semantic tag or string to use as the default value.
If INITIAL-INPUT is non-nil, insert it in the minibuffer initially.
HISTORY is a symbol representing a variable to store the history in.

(fn PROMPT &optional DEFAULT-TAG INITIAL-INPUT HISTORY)
(defalias 'semantic-complete-read-tag-local-members #[1025 "\300\301\302p#\303 &\207" [semantic-complete-read-tag-engine semantic-collector-local-members :buffer semantic-displayer-traditional-with-focus-highlight] 11 (#$ . 65934)])
#@516 Ask for a tag by name from the current project.
Available tags are from the current project, at the top level.
Completion options are presented in a traditional way, with highlighting
to resolve same-name collisions.
PROMPT is a string to prompt with.
DEFAULT-TAG is a semantic tag or string to use as the default value.
If INITIAL-INPUT is non-nil, insert it in the minibuffer initially.
HISTORY is a symbol representing a variable to store the history in.

(fn PROMPT &optional DEFAULT-TAG INITIAL-INPUT HISTORY)
(defalias 'semantic-complete-read-tag-project #[1025 "\300\301\302p\303p%\304 &\207" [semantic-complete-read-tag-engine semantic-collector-project-brutish :buffer :path semantic-displayer-traditional-with-focus-highlight] 11 (#$ . 66682)])
#@407 Complete a symbol name by name from within the current project.
This is similar to `semantic-complete-read-tag-project', except
that the completion interaction is in the buffer where the context
was calculated from.
Customize `semantic-complete-inline-analyzer-displayer-class'
to control how completion options are displayed.
See `semantic-complete-inline-tag-engine' for details on how
completion works.
(defalias 'semantic-complete-inline-tag-project #[0 "\301\302p\303p$\304 \211@\3058@\3058A\306!A@A\242\307\205g\310\230\203*\205g\311	\307#\210\312\313\n\"!\262\314!\262\211G\315U\203U\211@\211@\262\211\230?\262\204\\\211G\315V\205g\316	 p		%\207" [semantic-complete-inline-analyzer-displayer-class semantic-collector-project-brutish :buffer :path semantic-ctxt-current-symbol-and-bounds 2 reverse nil "" semantic-collector-calculate-completions semanticdb-strip-find-results semantic-collector-all-completions semantic-unique-tag-table-by-name 1 semantic-complete-inline-tag-engine] 15 (#$ . 67454)])
#@634 Ask for a tag by name based on the current context.
The function `semantic-analyze-current-context' is used to
calculate the context.  `semantic-analyze-possible-completions' is used
to generate the list of possible completions.
PROMPT is the first part of the prompt.  Additional prompt
is added based on the contexts full prefix.
CONTEXT is the semantic analyzer context to start with.
HISTORY is a symbol representing a variable to store the history in.
usually a default-tag and initial-input are available for completion
prompts.  these are calculated from the CONTEXT variable passed in.

(fn PROMPT &optional CONTEXT HISTORY)
(defalias 'semantic-complete-read-tag-analyzer #[769 "\204	\300`!\262\301`!\302!@\237A\237\262\303\304\305\306\307\"\310	%\311 r\306\307\"q\210\306\312\"Ab\210\313\314\315#\203G\315\202H\316Q)\317&\207" [semantic-analyze-current-context semantic-ctxt-current-symbol reverse semantic-complete-read-tag-engine semantic-collector-analyze-completions :buffer eieio-oref buffer :context semantic-displayer-traditional-with-focus-highlight bounds mapconcat identity "." "" nil] 13 (#$ . 68497)])
#@475 Complete a symbol name by name based on the current context.
This is similar to `semantic-complete-read-tag-analyze', except
that the completion interaction is in the buffer where the context
was calculated from.
CONTEXT is the semantic analyzer context to start with.
Customize `semantic-complete-inline-analyzer-displayer-class'
to control how completion options are displayed.

See `semantic-complete-inline-tag-engine' for details on how
completion works.

(fn CONTEXT)
(defalias 'semantic-complete-inline-analyzer #[257 "\211\204	\301`!\262\211\204\302\303!\210\304\305\306\307\"\310$\311`!\312!\211@A\242\313\205}\314\230\2034\205}\315\313#\210\316\317\"!\262\320!\262\211G\321U\203_\211@\211@\262\211\230?\262\204f\211G\321V\205}\322 \306\n\307\"\306\323\"@\306\f\323\"A%\207" [semantic-complete-inline-analyzer-displayer-class semantic-analyze-current-context error "Nothing to complete on here" semantic-collector-analyze-completions :buffer eieio-oref buffer :context semantic-ctxt-current-symbol reverse nil "" semantic-collector-calculate-completions semanticdb-strip-find-results semantic-collector-all-completions semantic-unique-tag-table-by-name 1 semantic-complete-inline-tag-engine bounds] 15 (#$ . 69654)])
(byte-code "\301\302\303\304\305DD\306\307\310\311&\207" [semantic-complete-inline-custom-type custom-declare-variable semantic-complete-inline-analyzer-idle-displayer-class funcall function #[0 "\300\207" [semantic-displayer-ghost] 1 ""] "Class for displayer to use with inline completion at idle time." :group semantic :type] 8)
#@464 Complete a symbol name by name based on the current context for idle time.
CONTEXT is the semantic analyzer context to start with.
This function is used from `semantic-idle-completions-mode'.

This is the same as `semantic-complete-inline-analyzer', except that
it uses `semantic-complete-inline-analyzer-idle-displayer-class'
to control how completions are displayed.

See `semantic-complete-inline-tag-engine' for details on how
completion works.

(fn CONTEXT)
(defalias 'semantic-complete-inline-analyzer-idle #[257 "\302!)\207" [semantic-complete-inline-analyzer-idle-displayer-class semantic-complete-inline-analyzer-displayer-class semantic-complete-inline-analyzer] 3 (#$ . 71256)])
#@34 Jump to a local semantic symbol.
(defalias 'semantic-complete-jump-local #[0 "\204\301\302!\210\303\304!\211\30519\211:\2053\211@;\2053\211A@9\2053\211A@\2053\3068<\2053\3078<0\262\202=\210\310\262\205z\311 \210\312\313!\203L\313 \210\211\211\3148\262\315!\203a\316!\266\202\202f\211\317H\266\202b\210\320!\210\321\322\211A@\262\211@\262#\207" [semantic-new-buffer-fcn-was-run error "Buffer was not parsed by Semantic" semantic-complete-read-tag-buffer-deep "Jump to symbol: " (error) 2 3 nil push-mark fboundp xref-push-marker-stack 4 overlayp overlay-start 0 semantic-momentary-highlight-tag message "%S: %s "] 6 (#$ . 71955) nil])
#@28 Jump to a semantic symbol.
(defalias 'semantic-complete-jump #[0 "\204\301\302!\210\303\304!\211\30519\211:\2053\211@;\2053\211A@9\2053\211A@\2053\3068<\2053\3078<0\262\202=\210\310\262\205f\311 \210\312\313!\203L\313 \210\314!\210\315p!\210\316!\210\317\320\211A@\262\211@\262#\207" [semantic-new-buffer-fcn-was-run error "Buffer was not parsed by Semantic" semantic-complete-read-tag-project "Jump to symbol: " (error) 2 3 nil push-mark fboundp xref-push-marker-stack semantic-go-to-tag pop-to-buffer-same-window semantic-momentary-highlight-tag message "%S: %s "] 6 (#$ . 72622) nil])
#@28 Jump to a semantic symbol.
(defalias 'semantic-complete-jump-local-members #[0 "\204\301\302!\210\303\304!\211\30519\211:\2053\211@;\2053\211A@9\2053\211A@\2053\3068<\2053\3078<0\262\202=\210\310\262\205\222\3111b\211\211\3128\262\313!\203Y\314!\266\202\202^\211\315H\266\2020\202d\210\310\211\204o\301\316\317!\"\210\320 \210\321\322!\203{\322 \210\211b\210\323!\210\324\325\211A@\262\211@\262#\262\207" [semantic-new-buffer-fcn-was-run error "Buffer was not parsed by Semantic" semantic-complete-read-tag-local-members "Jump to symbol: " (error) 2 3 nil (error) 4 overlayp overlay-start 0 "Tag %s has no location" semantic-format-tag-prototype push-mark fboundp xref-push-marker-stack semantic-momentary-highlight-tag message "%S: %s "] 7 (#$ . 73238) nil])
#@255 Perform prompt completion to do in buffer completion.
`semantic-analyze-possible-completions' is used to determine the
possible values.
The minibuffer is used to perform the completion.
The result is inserted as a replacement of the text that was there.
(defalias 'semantic-complete-analyze-and-replace #[0 "\300`!\212\301\302\")\303\304\"@b\210`\303\304\"A|\210\211\211@\262c\210\305\306\307!\"\207" [semantic-analyze-current-context semantic-complete-read-tag-analyzer "" eieio-oref bounds message "%S" semantic-format-tag-summarize] 6 (#$ . 74037) nil])
#@344 Perform prompt completion to do in buffer completion.
`semantic-analyze-possible-completions' is used to determine the
possible values.
The function returns immediately, leaving the buffer in a mode that
will perform the completion.
Configure `semantic-complete-inline-analyzer-displayer-class' to change
how completion options are displayed.
(defalias 'semantic-complete-analyze-inline #[0 "\300 \204\301\302`!!\210\303\304!\203\300 \204\305\306!\207\307 \207" [semantic-completion-inline-active-p semantic-complete-inline-analyzer semantic-analyze-current-context called-interactively-p any message "Inline completion not needed." semantic-complete-inline-TAB] 3 (#$ . 74606) nil])
#@349 Perform prompt completion to do in buffer completion.
`semantic-analyze-possible-completions' is used to determine the
possible values.
The function returns immediately, leaving the buffer in a mode that
will perform the completion.
Configure `semantic-complete-inline-analyzer-idle-displayer-class'
to change how completion options are displayed.
(defalias 'semantic-complete-analyze-inline-idle #[0 "\300 \204\301\302`!!\210\303\304!\205\300 ?\205\305\306!\207" [semantic-completion-inline-active-p semantic-complete-inline-analyzer-idle semantic-analyze-current-context called-interactively-p interactive message "Inline completion not needed."] 3 (#$ . 75303) nil])
#@179 Like `self-insert-command', but does completion afterwards.
ARG is passed to `self-insert-command'.  If ARG is nil,
use `semantic-complete-analyze-inline' to complete.

(fn ARG)
(defalias 'semantic-complete-self-insert #[257 "\302 \210\303!\210\304 \305\306\"\216\212\307\310 \3072;\311 \210	\2039\312 \2044r\313!q\210\212b\210\314 *\2039\315	\307\"\210\3160*?\205t\317U\205t\307\310 \3072r\320 \210	\203p\312 \204kr\313!q\210\212b\210\314 *\203p\315	\307\"\210\3160*?*\262\205\204\3211\202\322 0\207\210\316\207" [semantic--on-input-start-marker semantic-current-input-throw-symbol semantic-complete-inline-exit self-insert-command current-window-configuration make-closure #[0 "\301\300!\207" [V0 set-window-configuration] 2] csi point-marker semantic-fetch-tags input-pending-p marker-buffer accept-process-output throw nil 1 semantic-analyze-current-context (error) semantic-complete-analyze-inline] 5 (#$ . 75986) "p"])
#@245 Perform inline completion for any symbol in the current project.
`semantic-analyze-possible-completions' is used to determine the
possible values.
The function returns immediately, leaving the buffer in a mode that
will perform the completion.
(defalias 'semantic-complete-inline-project #[0 "\300 \204\301 \210\302\303!\205\300 ?\205\304\305!\207" [semantic-completion-inline-active-p semantic-complete-inline-tag-project called-interactively-p interactive message "Inline completion not needed."] 2 (#$ . 76942) nil])
(provide 'semantic/complete)

Youez - 2016 - github.com/yon3zu
LinuXploit