1#@!#!123s

��JFIF�� 1#@!#!123s
: / usr / share / emacs / 24.3 / lisp / cedet / semantic / analyze /
Filename : complete.elc
back
;ELC���
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:11:27 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/analyze/complete.el
;;; in Emacs version 24.3.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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'semantic/analyze)
#@89 For the tag TYPE, return any constant symbols of TYPE.
Used as options when completing.
(defalias 'semantic-analyze-type-constants #[(type) "\306\211\307\310\211\n\311!\307\n\204+�\211\204+�\205*�\312
\"\n\203U�\f\204U�\n\313N\203D�\312
\n\313N\"\211\204+�\n\211\314N\206O�\n\315N)\211\204/�\f,\211\205h�	\203f�	N\205h�J+\206\341�\211\316N)\205\341�\211\316N)\307\310\211\n\311!\307\n\204\243�\211\204\243�\205\242�\312
\"\n\203\315�\f\204\315�\n\313N\203\274�\312
\n\313N\"\211\204\243�\n\211\314N\206\307�\n\315N)\211\204\247�\f,\211\205\340�	\203\336�	N\205\340�J+)\211\203\360�!\202\364�\317!)\207" [overload property mode symbol bind name semantic-analyze-type-constants nil override-flag symbol-name intern-soft mode-local-symbol-table mode-local-parent derived-mode-parent overload-obsolete semantic-analyze-type-constants-default mode-local-active-mode major-mode #1=#:override type] 5 (#$ . 602)])
(put 'semantic-analyze-type-constants 'mode-local-overload t)
#@23 Do nothing with TYPE.
(defalias 'semantic-analyze-type-constants-default #[(type) "\300\207" [nil] 1 (#$ . 1640)])
#@59 Return the tags in TAGS that are of classes in CLASSLIST.
(defalias 'semantic-analyze-tags-of-class-list #[(tags classlist) "\303\304\305\306\n\"\"\211)\207" [tags origc classlist apply nconc mapcar #[(class) "\305!\306\211\203\"�\n@\211A@)=\203�\n@	B\nA\211\204\n�	\237*\207" [origc result tags class tag semantic-something-to-tag-table nil] 3]] 6 (#$ . 1761)])
#@921 Return a list of semantic tags which are possible completions.
CONTEXT is either a position (such as point), or a precalculated
context.  Passing in a context is useful if the caller also needs
to access parts of the analysis.
The remaining FLAGS arguments are passed to the mode specific completion engine.
Bad flags should be ignored by modes that don't use them.
See `semantic-analyze-possible-completions-default' for details on the default FLAGS.

Completions run through the following filters:
  * Elements currently in scope
  * Constants currently in scope
  * Elements match the :prefix in the CONTEXT.
  * Type of the completion matches the type of the context.
Context type matching can identify the following:
  * No specific type
  * Assignment into a variable of some type.
  * Argument to a function with type constraints.
When called interactively, displays the list of possible completions
in a buffer.
(defalias 'semantic-analyze-possible-completions #[(context &rest flags) "\203\247\306 p\307\216\310!\210\311\f!\203�\f\202�\312\f!\211\204'�\313\314!\202Z\315\211\316\317&'\211(''(\320(!\316)*'\204`�+\211'\204`�,'\205^�\321*\")'\203\224�)\204\224�'\322N\203�\321*'\322N\"\211)\204`�'\211'\323N\206\215�'\324N)\211'\204e�),\211(\205\255�&\203\252�(&N\205\255�(J+\206D
\211\325N)\205D
\211\325N)\316\317&'\211(''(\320(!\316)*'\204\366�+\211'\204\366�,'\205\364�\321*\")'\203*)\204*'\322N\203\321*'\322N\"\211)\204\366�'\211'\323N\206#'\324N)\211'\204\373�),\211(\205C&\203@(&N\205C(J+)\211-\203T-\f.\"\202Y\326\f.\")/\327\330!\203\24301r\331\332!q\210p\333 \21010\316\21123\334\2114\33456\335 \210\336\337!\210+\21178\340/\341p#\210\3427!\210+\343\344\332!!\210/-\207\327\330!\205\260\313\345!\207" [semantic-new-buffer-fcn-was-run #1=#:buffer #2=#:table semantic-lex-syntax-table context overload syntax-table ((byte-code "rq\210\302	!\210)\302\207" [#1# #2# set-syntax-table] 2)) set-syntax-table semantic-analyze-context-child-p semantic-analyze-current-context error "Nothing to complete" semantic-analyze-possible-completions nil override-flag symbol-name intern-soft mode-local-symbol-table mode-local-parent derived-mode-parent overload-obsolete semantic-analyze-possible-completions-default called-interactively-p any get-buffer-create "*Possible Completions*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook semantic-analyze-princ-sequence "" internal-temp-output-buffer-show shrink-window-if-larger-than-buffer get-buffer-window "Buffer was not parsed by Semantic." property mode symbol bind name mode-local-active-mode major-mode #3=#:override flags ans default-directory #4=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #5=#:buf standard-output] 5 (#$ . 2142) "d"])
(put 'semantic-analyze-possible-completions 'mode-local-overload t)
#@322 Default method for producing smart completions.
Argument CONTEXT is an object specifying the locally derived context.
The optional argument FLAGS changes which return options are returned.
FLAGS can be any number of:
  'no-tc     - do not apply data-type constraint.
  'no-unique - do not apply unique by name filtering.
(defalias 'semantic-analyze-possible-completions-default #[(context &optional flags) "\306	!\307	\310\"\307	\304\"\307	\305\"\311\211-.\307	\312\"\211\n\205*�\307\n\313\"\311\211/0\3111\3142>?3\3152>?4\316\f!@\211-5\311\317\320\217)\203]�-\2115@)--\204j�\n\204j�\321\322!\210-\204r�\323-\316
!@\211.\203\225�.5\311\317\320\217)\203\225�.\2115A@)\324=\204\303�\311.\fG\325V\203\303�\316\f!A@6\321\32665\311\317\320\217)\203\273�\3276!\202\300�\330\3316\"\"\210).\203-G7\332\333.\n\"!\3118\2119\203\334-\335\3119@\2115@)\3357:&\336=\203\377�9@8B89A\2119\204\336�8\237+0\202\241-G7\332!\3118\2119\203M\334-\335\3119@\2115@)\3357:&\336=\203D9@8B89A\2119\204#8\237+-G7\332\n\205a\307\n\337\"!\3118\2119\203\225\334-\335\3119@\2115@)\3357:&\336=\203\2149@8B89A\2119\204k8\237+\244\340-!\24400\n\2115@);<0/\3110<\203\2373\203\237<@\341=5\34255\34358)=\"*\204\226.\203<@\344=5\34255\34358)=\"*\204\226<@\345=5\34255\34358)=\"*\204\226\n\203\216;\346<@\2115\347=5\34255\34358)=\"+!\230\203><@0B0\202\226<@\2115\347=5\34255\34358)=\"+\203\226\350<@\n\"\211>\203\212>\2115\351=5\34255\34358)=\"+\203\212<@0B0)\202\226<@0B0<A\211<\204\271\n\203\366\352\n!\211?\203\365-G7\332?!\3118\2119\203\350\334-\335\3119@\2115@)\3357:&\336=\203\3379@8B89A\2119\204\2768\237+?0?\2440)*\203\3530\"04\2030\203\3540!0\202'\354/!0\202'0\204'/00.\207" [context a desired-type desired-class prefix prefixtypes semantic-analyze-type-constraint eieio-oref prefixclass nil scope localvar no-tc no-unique reverse (byte-code ":\205#�@;\205#�A@9\205#�A@\205#�\3018<\205#�\3028<\207" [tag 2 3] 2) ((error)) error "Nothing to complete" "" type 1 "Cannot find types for `%s'" semantic-format-tag-prototype format "%S" semantic-something-to-tag-table semantic-analyze-scoped-type-parts compare-strings 0 t fullscope semantic-analyze-find-tags-by-prefix :operator-flag plist-get 2 :constructor-flag :destructor-flag semantic-analyze-type-to-name :type semantic-analyze-tag-type :members semantic-analyze-type-constants semantic-analyze-tags-of-class-list semantic-unique-tag-table-by-name completetext completetexttype origc c any flags do-typeconstraint do-unique tag errprefix l result tags semantic-case-fold dtname loopc attribute att constants] 10 (#$ . 5118)])
(provide 'semantic/analyze/complete)