;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!\207" [require semantic semantic/format semantic/ctxt semantic/scope semantic/sort semantic/analyze/fcn] 2)
#@50 Collection of any errors thrown during analysis.
(defvar semantic-analyze-error-stack nil (#$ . 278))
#@60 Push the error data in ERR onto the error stack.

(fn ERR)
(defalias 'semantic-analyze-push-error #[257 "\211B\211\207" [semantic-analyze-error-stack] 3 (#$ . 386)])
(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-analyze-context-p eieio-make-class-predicate semantic-analyze-context semantic-analyze-context--eieio-childp eieio-make-child-predicate semantic-analyze-context-child-p make-obsolete "use (cl-typep ... \\='semantic-analyze-context) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal nil ((bounds :initarg :bounds :type list :documentation "The bounds of this context.\nUsually bound to the dimension of a single symbol or command.") (prefix :initarg :prefix :type list :documentation "List of tags defining local text.\nThis can be nil, or a list where the last element can be a string\nrepresenting text that may be incomplete.  Preceding elements\nmust be semantic tags representing variables or functions\ncalled in a dereference sequence.") (prefixclass :initarg :prefixclass :type list :documentation "Tag classes expected at this context.\nThese are classes for tags, such as 'function, or 'variable.") (prefixtypes :initarg :prefixtypes :type list :documentation "List of tags defining types for :prefix.\nThis list is one shorter than :prefix.  Each element is a semantic\ntag representing a type matching the semantic tag in the same\nposition in PREFIX.") (scope :initarg :scope :type (or null semantic-scope-cache) :documentation "List of tags available in scopetype.\nSee `semantic-analyze-scoped-tags' for details.") (buffer :initarg :buffer :type buffer :documentation "The buffer this context is derived from.") (errors :initarg :errors :documentation "Any errors thrown and caught during analysis.")) (:documentation "Base analysis data for any context.")] 6)
#@81 Create a new object of class type `semantic-analyze-context'.

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

(fn WHOLE &rest SLOTS)
(defalias 'semantic-analyze-context--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 (#$ . 2672)])
(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-analyze-context-assignment-p eieio-make-class-predicate semantic-analyze-context-assignment semantic-analyze-context-assignment--eieio-childp eieio-make-child-predicate semantic-analyze-context-assignment-child-p make-obsolete "use (cl-typep ... \\='semantic-analyze-context-assignment) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-analyze-context) ((assignee :initarg :assignee :type list :documentation "A sequence of tags for an assignee.\nThis is a variable into which some value is being placed.  The last\nitem in the list is the variable accepting the value.  Earlier\ntags represent the variables being dereferenced to get to the\nassignee.")) (:documentation "Analysis class for a value in an assignment.")] 6)
#@92 Create a new object of class type
`semantic-analyze-context-assignment'.

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

(fn WHOLE &rest SLOTS)
(defalias 'semantic-analyze-context-assignment--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 (#$ . 4241)])
(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-analyze-context-functionarg-p eieio-make-class-predicate semantic-analyze-context-functionarg semantic-analyze-context-functionarg--eieio-childp eieio-make-child-predicate semantic-analyze-context-functionarg-child-p make-obsolete "use (cl-typep ... \\='semantic-analyze-context-functionarg) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-analyze-context) ((function :initarg :function :type list :documentation "A sequence of tags for a function.\nThis is a function being called.  The cursor will be in the position\nof an argument.\nThe last tag in :function is the function being called.  Earlier\ntags represent the variables being dereferenced to get to the\nfunction.") (index :initarg :index :type integer :documentation "The index of the argument for this context.\nIf a function takes 4 arguments, this value should be bound to\nthe values 1 through 4.") (argument :initarg :argument :type list :documentation "A sequence of tags for the :index argument.\nThe argument can accept a value of some type, and this contains the\ntag for that definition.  It should be a tag, but might\nbe just a string in some circumstances.")) (:documentation "Analysis class for a value as a function argument.")] 6)
#@93 Create a new object of class type
`semantic-analyze-context-functionarg'.

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

(fn WHOLE &rest SLOTS)
(defalias 'semantic-analyze-context-functionarg--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 (#$ . 6313)])
(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-analyze-context-return-p eieio-make-class-predicate semantic-analyze-context-return semantic-analyze-context-return--eieio-childp eieio-make-child-predicate semantic-analyze-context-return-child-p make-obsolete "use (cl-typep ... \\='semantic-analyze-context-return) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semantic-analyze-context) nil (:documentation "Analysis class for return data.\nReturn data methods identify the required type by the return value\nof the parent function.")] 6)
#@88 Create a new object of class type `semantic-analyze-context-return'.

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

(fn WHOLE &rest SLOTS)
(defalias 'semantic-analyze-context-return--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 (#$ . 7635)])
(byte-code "\300\301\302\303\302\304%\210\300\301\302\305\306\307%\210\300\301\302\310\306\311%\210\300\312\302\313\302\314%\210\300\312\302\315\306\316%\210\300\312\302\317\306\320%\207" [cl-generic-define-method semantic-analyze-type-constraint nil ((_context semantic-analyze-context) &optional desired-type) #[513 "\211\3001.\211:\205(\211@;\205(\211A@9\205(\211A@\205(\301
8<\205(\302
8<0\262
\2022\210\303\262
\205\332\211\211A@\262
\304=\204P\211\211\305\306\301
8\262
\"\266\203\262
\211;\203]\211\304D\262
\202\331\211@;\203\241\211\3001\221\211:\205\213\211@;\205\213\211A@9\205\213\211A@\205\213\301
8<\205\213\302
8<0\262
\202\225\210\303\262
\204\241\211@\304D\262
\202\331\211\3001\317\211:\205\311\211@;\205\311\211A@9\205\311\211A@\205\311\301
8<\205\311\302
8<0\262
\202\323\210\303\262
\204\331\303\262
\211\207" [#1=(error) 2 3 nil type :type plist-get] 9 "Return a type constraint for completing :prefix in CONTEXT.\nOptional argument DESIRED-TYPE may be a non-type tag to analyze.\n\n(fn CONTEXT &optional DESIRED-TYPE)"] ((context semantic-analyze-context-functionarg)) t #[514 "

\300\301\"@\"\207" [eieio-oref argument] 7 "Return a type constraint for completing :prefix in CONTEXT.\n\n(fn CL--CNM CONTEXT)"] ((context semantic-analyze-context-assignment)) #[514 "

\300\301\302\"!@\"\207" [reverse eieio-oref assignee] 8 "Return a type constraint for completing :prefix in CONTEXT.\n\n(fn CL--CNM CONTEXT)"] semantic-analyze-interesting-tag ((context semantic-analyze-context)) #[257 "\300\301\302\"!\211\203G\211@\30319\211:\2053\211@;\2053\211A@9\2053\211A@\2053\304
8<\2053\305
8<0\262
\202=\210\306\262
\204G\211A\262
\202\211@\207" [reverse eieio-oref prefix #1# 2 3 nil] 5 "Return a tag from CONTEXT that would be most interesting to a user.\n\n(fn CONTEXT)"] ((context semantic-analyze-context-functionarg)) #[514 "
 \206\n\300
\301\"\242\207" [eieio-oref function] 5 "Try the base, and if that fails, return what we are assigning into.\n\n(fn CL--CNM CONTEXT)"] ((context semantic-analyze-context-assignment)) #[514 "
 \206\n\300
\301\"\242\207" [eieio-oref assignee] 5 "Try the base, and if that fails, return what we are assigning into.\n\n(fn CL--CNM CONTEXT)"]] 6)
#@751 Attempt to find all tags in SEQUENCE.
Optional argument LOCALVAR is the list of local variables to use when
finding the details on the first element of SEQUENCE in case
it is not found in the global set of tables.
Optional argument SCOPE are additional terminals to search which are currently
scoped.  These are not local variables, but symbols available in a structure
which doesn't need to be dereferenced.
Optional argument TYPERETURN is a symbol in which the types of all found
will be stored.  If nil, that data is thrown away.
Optional argument THROWSYM specifies a symbol the throw on non-recoverable
error.
Remaining arguments FLAGS are additional flags to apply when searching.

(fn SEQUENCE &optional SCOPE TYPERETURN THROWSYM &rest FLAGS)
(defalias 'semantic-analyze-find-tag-sequence #[1153 "\303\211\304\305\306!\304\204\"\211\262\204\"	\262\n\205 \307\n\"\262
\203M\211\204M\302N\203<\307\302N\"\211\262\204\"\211\310N\206F\211\311N\262
\262\202\"\266\203\211\262\205a\211\203_
N\205aJ\266\203\206\326\211\211\312N\262
\205\326\211\211\312N\262
\304\305\306!\304\204\225\211\262\204\225	\262\n\205\223\307\n\"\262
\203\300\211\204\300\302N\203\257\307\302N\"\211\262\204\225\211\310N\206\271\211\311N\262
\262\202\225\266\203\211\262\205\324\211\203\322
N\205\324J\266\203\262
\211\203\351\211%\207\313%\207" [mode-local-active-mode major-mode mode-local-symbol-table semantic-analyze-find-tag-sequence nil override-flag symbol-name intern-soft mode-local-parent derived-mode-parent mode-local--overload-obsolete semantic-analyze-find-tag-sequence-default] 17 (#$ . 10134)])
(put 'semantic-analyze-find-tag-sequence 'mode-local-overload t)
#@436 Attempt to find all tags in SEQUENCE.
SCOPE are extra tags which are in scope.
TYPERETURN is a symbol in which to place a list of tag classes that
are found in SEQUENCE.
Optional argument THROWSYM specifies a symbol the throw on non-recoverable
error.
Remaining arguments FLAGS are additional flags to apply when searching.
This function knows of flags:
  `mustbeclassvariable'

(fn SEQUENCE &optional SCOPE TYPERETURN THROWSYM FLAGS)
(defalias 'semantic-analyze-find-tag-sequence-default #[1281 "\302\211\211\211\205\303	!\304>\205\305\306\f!\262\203@\211\2033

\211A@\262

=\266\202\203=\302\262C\262\202@\302\262\204
G\307U\205M\211\203]\310@#\206c\311@\"\262<\203\251@\3121\233\211:\205\225\211@;\205\225\211A@9\205\225\211A@\205\225\313
8<\205\225\314
8<0\262
\202\237\210\302\262
\203\251\315\"\262\3121\330\211:\205\322\211@;\205\322\211A@9\205\322\211A@\205\322\313
8<\205\322\314
8<0\262
\202\334\210\302\262
\204\364	\203\355\316\n\317\"\210\202\364\320\321	@\"\210A\262B\262\322!\262\210\203o\323
\211A@\262

=\266\202\203'
\324\"\206,
\202,
\325\"\211\2053
\322
!\302\326\"\262
\327
!\302
\203_
@@\211@\262
\230\203X

@
B\262

A\262\202A
\211\237\266\202)\262	<\203\251
@\3121\234
\211:\205\226
\211@;\205\226
\211A@9\205\226
\211A@\205\226
\313
8<\205\226
\314
8<0\262
\202\240
\210\302\262
\203\251
\315	!\262	\3121\330
\211:\205\322
\211@;\205\322
\211A@9\205\322
\211A@\205\322
\313
8<\205\322
\314
8<0\262
\202\334
\210\302\262
\204\364
	A\203\357
\320\321@\"\210\202\364
	@\262	
\206\371
\262\203D\3121.\211:\205(\211@;\205(\211A@9\205(\211A@\205(\313
8<\205(\314
8<0\262
\2022\210\302\262
\203D\330	!\204D\331	\332#\210B\262B\262\203e\333\334\335\336\n\"\"\337\340#\266\266A\262\202
	\203z	\237L\210\237\207" [semantic-case-fold case-fold-search nil clone mustbeclassvariable variable semanticdb-typecache-find 1 semantic-scope-find semantic-analyze-find-tag (error) 2 3 semantic-analyze-select-best-tag throw "Cannot find definition" error "Cannot find definition for \"%s\"" semantic-tag-file-name type semantic-analyze-type semantic-analyze-tag-type semantic-analyze-scoped-type-parts semantic-something-to-tag-table semantic-tag-in-buffer-p semantic--tag-put-property :filename apply append mapcar semantic-tag-type-members eieio-oset fullscope] 20 (#$ . 11878)])
#@478 Return the first tag found with NAME or nil if not found.
Optional argument TAGCLASS specifies the class of tag to return,
such as `function' or `variable'.
Optional argument SCOPE specifies a scope object which has
additional tags which are in SCOPE and do not need prefixing to
find.

This is a wrapper on top of semanticdb, semanticdb typecache,
semantic-scope, and semantic search functions.  Almost all
searches use the same arguments.

(fn NAME &optional TAGCLASS SCOPE)
(defalias 'semantic-analyze-find-tag #[769 ":\203	\202\f\300!\211<\203!\301
!\206r\302
\303#\304
\"\207\211;\205r
\205/\305#\211\203:\304
\"\202p\306=\203F\301!\202p\301!\262
\211\203f\203b\211\307
\211A@\262

=\266\202\203f\211\202p\304\310\311!\312\"\"\262
\207" [semantic-analyze-split-name semanticdb-typecache-find semantic-analyze-find-tag-sequence nil semantic-analyze-select-best-tag semantic-scope-find type tagclass semanticdb-strip-find-results semanticdb-find-tags-by-name name] 9 (#$ . 14331)])
#@642 Call ANALYZEHOOKFCN after analyzing the symbol under POSITION.
The ANALYZEHOOKFCN is called with the current symbol bounds, and the
analyzed prefix.  It should take the arguments (START END PREFIX).
The ANALYZEHOOKFCN is only called if some sort of prefix with bounds was
found under POSITION.

The results of ANALYZEHOOKFCN is returned, or nil if there was nothing to
call it with.

For regular analysis, you should call `semantic-analyze-current-context'
to calculate the context information.  The purpose for this function is
to provide a large number of non-cached analysis for filtering symbols.

(fn ANALYZEHOOKFCN &optional POSITION)
(defalias 'semantic-analyze-current-symbol #[513 "\204\304\305!\210\306 \210\307 \310\311\"\216\212\312\211\313\314\315!\313\2045	\211\262\2045\n\262\2053\316\"\262
\203`\211\204`\303N\203O\316\303N\"\211\262\2045\211\317N\206Y\211\320N\262
\262\2025\266\203\211\262\205t\211\203r
N\205tJ\266\203\206\351\211\211\321N\262
\205\351\211\211\321N\262
\313\314\315!\313\204\250	\211\262\204\250\n\262\205\246\316\"\262
\203\323\211\204\323\303N\203\302\316\303N\"\211\262\204\250\211\317N\206\314\211\320N\262
\262\202\250\266\203\211\262\205\347\211\203\345
N\205\347J\266\203\262
\211\203\366\211\"\202\372\322\"\262
*\207" [semantic-new-buffer-fcn-was-run mode-local-active-mode major-mode mode-local-symbol-table error "Cannot analyze buffers not supported by Semantic" semantic-refresh-tags-safe match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] semantic-analyze-current-symbol nil override-flag symbol-name intern-soft mode-local-parent derived-mode-parent mode-local--overload-obsolete semantic-analyze-current-symbol-default] 15 (#$ . 15353)])
(put 'semantic-analyze-current-symbol 'mode-local-overload t)
#@87 Call ANALYZEHOOKFCN on the analyzed symbol at POSITION.

(fn ANALYZEHOOKFCN POSITION)
(defalias 'semantic-analyze-current-symbol-default #[514 "\302\303
\206`!\211@\3048\305!
\203A	\203+\3062'\307\310\306$\211\2620\210\202A\3111<\307\310#\211\2620\210\202A\312
!\266\205L@A#)\207" [semantic-analyze-error-stack debug-on-error nil semantic-ctxt-current-symbol-and-bounds 2 semantic-calculate-scope unfindable semantic-analyze-find-tag-sequence semantic--prefixtypes (error) semantic-analyze-push-error] 11 (#$ . 17216)])
#@484 Analyze the current context at optional POSITION.
If called interactively, display interesting information about POSITION
in a separate buffer.
Returns an object based on symbol `semantic-analyze-context'.

This function can be overridden with the symbol `analyze-context'.
When overriding this function, your override will be called while
cursor is at POSITION.  In addition, your function will not be called
if a cached copy of the return object is found.

(fn &optional POSITION)
(defalias 'semantic-analyze-current-context #[256 "\204\305\306!\210\307 \210\211\204`\262
\212\211b\210\310\311!\312 p\313\314#\216\315	!\210\204G
\316\211\317\320\321!\317\204L\n\211\262\204L\262\f\205J\322\f\"\262
\203w\211\204w\304N\203f\322\304N\"\211\262\204L\211\323N\206p\211\324N\262
\262\202L\266\203\211\262\205\213\211\203\211
N\205\213J\266\203\206
\211\211\325N\262
\205
\211\211\325N\262
\317\320\321!\317\204\277\n\211\262\204\277\262\f\205\275\322\f\"\262
\203\352\211\204\352\304N\203\331\322\304N\"\211\262\204\277\211\323N\206\343\211\324N\262
\262\202\277\266\203\211\262\205\376\211\203\374
N\205\376J\266\203\262
\211\203\f
\211!\202
\326!\262
\262\2032
\327\330\"\2032
\331p\332\330\"@\332\330\"A\311\333&\210\334\335!\203G
\203C
\336!\210\202G
\337\340!\210)\266\202\262
)\207" [semantic-new-buffer-fcn-was-run semantic-lex-syntax-table mode-local-active-mode major-mode mode-local-symbol-table error "Cannot analyze buffers not supported by Semantic" semantic-refresh-tags-safe semantic-get-cache-data current-context syntax-table make-closure #[0 "r\301q\210\302\300!)\207" [V0 V1 set-syntax-table] 2] set-syntax-table semantic-analyze-current-context nil override-flag symbol-name intern-soft mode-local-parent derived-mode-parent mode-local--overload-obsolete semantic-analyze-current-context-default eieio-oref bounds semantic-cache-data-to-buffer slot-value exit-cache-zone called-interactively-p any semantic-analyze-pop-to-context message "No Context."] 16 (#$ . 17767) "d"])
(put 'semantic-analyze-current-context 'mode-local-overload t)
#@119 Analyze the current context at POSITION.
Returns an object based on symbol `semantic-analyze-context'.

(fn POSITION)
(defalias 'semantic-analyze-current-context-default #[257 "\305\211\306\206	`!\211@\3078\310 \305\311!\305\211\211\211\211\211\211\211\312 \262\203|
\313 \262\3141>\315\n\"\211\2620\210\202C\316
!\266\317!@;\203d\317!\317!@\320\305\321!\305\211\257\266\203\240\210\203|
\322!\305
\203\213
@\211A@\262
\320=\203\204
@
B\262

A\262\202n\211\237\266\202\211\204*
\322!\305
\203\265
@\211A@\262
\323=\203\256
@
B\262

A\262\202\230\211\237\266\202\211\203)
\n\322
@\211\324\325\307
8\262
\"\266\203!\305
\203\362@\211@\262
@\211@\262
\230\203\353
@
B\262

A\262\202\321\211\237\266\202)\262
\203%

\211\203 
\211@\326\325\307
8\262
\"\266\202\203
\211@B\262\211A\262
\202\376\266\202*
\262\210\327
!@\262\3301^
\211:\205X
\211@;\205X
\211A@9\205X
\211A@\205X
\307
8<\205X
\331
8<0\262
\202b
\210\305\262
\205x
S\211\332\325\307
8\262
\"\266\2038\262\262\n\203\326
\f\203\254
\3332\250
\315\f\n\301\333$\262\f\334\f!\211\262\205\247
\315
\n\301\333$\211\262
0\210\202\326
\3351\321
\315\f\n\301#\262\f\334\f!\211\262\205\314
\315
\n\301#\211\262
0\210\202\326
\316
!\266\203\377
\336\337p\340\n\341\342C\343\344\345\346\347	\350&\262\202b\351 \211\262\203@\3521\315\n\305\211\353%\211\2620\202!\316
!\210\305\262
\203@\354\337p\355\343\346\344\345\347	\350&\262\202b\n\203_\356\337p\343\f\346\344\345\347	\350&\262\202b\305\262
*\207" [semantic-analyze-error-stack semantic--prefixtypes semantic-case-fold case-fold-search debug-on-error nil semantic-ctxt-current-symbol-and-bounds 2 semantic-ctxt-current-class-list semantic-calculate-scope semantic-ctxt-current-function semantic-ctxt-current-argument (error) semantic-analyze-find-tag-sequence semantic-analyze-push-error last function semantic-tag-make-plist semantic-something-to-tag-table type :members plist-get :constructor reverse (error) 3 :arguments unfindable semantic-analyze-dereference-alias (error) semantic-analyze-context-functionarg :buffer :function :index :argument :scope :prefix :prefixclass :bounds :prefixtypes :errors semantic-ctxt-current-assignment (error) mustbeclassvariable semantic-analyze-context-assignment :assignee semantic-analyze-context] 37 (#$ . 19914)])
#@201 Dereference first tag in TAGLIST if it is an alias.
Returns a sequence of names which can then be fed again into
`semantic-analyze-find-tag-sequence'.
Returns nil if no alias was found.

(fn TAGLIST)
(defalias 'semantic-analyze-dereference-alias #[257 "\211@\300\301\302
8\262
\"\266\202\303=\2059\304
@\305\301\302
8\262
\"\266\202@\211@\262
!\306
<\2032
\2024
CA\"\262
\207" [:kind plist-get 2 alias semantic-analyze-split-name :members append] 8 (#$ . 22320)])
#@150 Perform `semantic-analyze-current-context'.
Display the results as a debug list.
Optional argument CTXT is the context to show.

(fn &optional CTXT)
(defalias 'semantic-adebug-analyze #[256 "\300\301!\210\302 
\206\f\303 \211\204\304\305!\207\304\306\307\310\311\"!\266\202\"\210\312
!\210\211\2033\313\314!\210\315
\316\"\207\304\317!\207" [require data-debug current-time semantic-analyze-current-context message "No Analyzer Results" "Analysis  took %.2f seconds." nil float-time time-subtract semantic-analyze-pulse data-debug-new-buffer "*Analyzer ADEBUG*" data-debug-insert-object-slots "]" "No Context to analyze here."] 11 (#$ . 22799) nil])
(byte-code "\301\302\303\304\303\305%\210\306\307\310\311\312DD\313\314\315\316&\207" [semantic-format-tag-custom-list cl-generic-define-method semantic-analyze-pulse nil ((context semantic-analyze-context)) #[257 "\300\301!\210r\302
\303\"q\210\302
\304\"\211\205\305
@A\"\262
)\207" [require pulse eieio-oref buffer bounds pulse-momentary-highlight-region] 5 "Pulse the region that CONTEXT affects.\n\n(fn CONTEXT)"] custom-declare-variable semantic-analyze-summary-function funcall function #[0 "\300\207" [semantic-format-tag-prototype] 1 ""] "Function to use when creating items in Imenu.\nSome useful functions are found in `semantic-format-tag-functions'." :group semantic :type] 8)
#@142 Send the tag SEQUENCE to standard out.
Use PREFIX as a label.
Use BUFF as a source of override methods.

(fn SEQUENCE &optional PREFIX BUFF)
(defalias 'semantic-analyze-princ-sequence #[769 "\204\f\301!\210\301\302!\210\205\207\301!\210@\3031C\211:\205=\211@;\205=\211A@9\205=\211A@\205=\304
8<\205=\305
8<0\262
\202G\210\306\262
\203T\301@!!\210\202u@;\203m\301\307!\210\301\310@\311\"!\210\301\307!\210\202u\301\312\313@\"!\210\301\314!\210A\262\315G\316\"\262\202\f\207" [semantic-analyze-summary-function princ "<none>\n" (error) 2 3 nil "\"" semantic--format-colorize-text variable format "'%S" "\n" make-string 32] 7 (#$ . 24158)])
(byte-code "\300\301\302\303\302\304%\210\300\301\302\305\306\307%\210\300\301\302\310\306\311%\207" [cl-generic-define-method semantic-analyze-show nil ((context semantic-analyze-context)) #[257 "\300\301\302\"\303\"\210\300\301\304\"\305\"\210\300\301\306\"\307\"\210\300\301\310\"\311\"\210\312\313!\210\301
\314\"\2051\315\301\314\"!\207" [semantic-analyze-princ-sequence eieio-oref prefix "Prefix: " prefixclass "Prefix Classes: " prefixtypes "Prefix Types: " errors "Encountered Errors: " princ "--------\n" scope semantic-analyze-show] 5 "Insert CONTEXT into the current buffer in a nice way.\n\n(fn CONTEXT)"] ((context semantic-analyze-context-assignment)) t #[514 "\300\301\302\"\303\"\210
 \207" [semantic-analyze-princ-sequence eieio-oref assignee "Assignee: "] 6 "Insert CONTEXT into the current buffer in a nice way.\n\n(fn CL--CNM CONTEXT)"] ((context semantic-analyze-context-functionarg)) #[514 "\300\301\302\"\303\"\210\304\305!\210\304\301\306\"!\210\304\307!\210\300\301\310\"\311\"\210
 \207" [semantic-analyze-princ-sequence eieio-oref function "Function: " princ "Argument Index: " index "\n" argument "Argument: "] 6 "Insert CONTEXT into the current buffer in a nice way.\n\n(fn CL--CNM CONTEXT)"]] 6)
#@124 Display CONTEXT in a temporary buffer.
CONTEXT's content is described in `semantic-analyze-current-context'.

(fn CONTEXT)
(defalias 'semantic-analyze-pop-to-context #[257 "\306
!\210r\307\310!q\210p\311 \210
\312\211\313\211\313\314 \210\315\316!\210+\211\317\320!\210\317\321!!\210\317\322!\210\317\323!\210\317\324\325\"!\210\317\322!\210\326!\210\327
!\210)\266\330\331\310!!\207" [default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only semantic-analyze-pulse get-buffer-create "*Semantic Context Analysis*" kill-all-local-variables nil t erase-buffer run-hooks temp-buffer-setup-hook princ "Context Type: " eieio-object-name "\n" "Bounds: " eieio-oref bounds semantic-analyze-show internal-temp-output-buffer-show shrink-window-if-larger-than-buffer get-buffer-window standard-output] 8 (#$ . 26067)])
#@184 Return possible analysis completions at point.
The completions provided are via `semantic-analyze-possible-completions'.
This function can be used by `completion-at-point-functions'.
(defalias 'semantic-analyze-completion-at-point-function #[0 "\205\301 \302
!\211\205\303\304\"@\303\304\"AE\266\202\207" [semantic-new-buffer-fcn-was-run semantic-analyze-current-context semantic-analyze-possible-completions eieio-oref bounds] 6 (#$ . 26953)])
#@295 Return possible analysis completions at point.
The completions provided are via `semantic-analyze-possible-completions',
but with the `no-tc' option passed in, which means constraints based
on what is being assigned to are ignored.
This function can be used by `completion-at-point-functions'.
(defalias 'semantic-analyze-notc-completion-at-point-function #[0 "\205\301 \302
\303\"\211\205\304\305\"@\304\305\"AE\266\202\207" [semantic-new-buffer-fcn-was-run semantic-analyze-current-context semantic-analyze-possible-completions no-tc eieio-oref bounds] 6 (#$ . 27413)])
#@325 Return possible analysis completions at point.
The completions provided are via `semantic-analyze-possible-completions',
but with the `no-tc' and `no-longprefix' option passed in, which means
constraints resulting in a long multi-symbol dereference are ignored.
This function can be used by `completion-at-point-functions'.
(defalias 'semantic-analyze-nolongprefix-completion-at-point-function #[0 "\205\301 \302
\303\304#\211\205\305\306\"@\305\306\"AE\266\202\207" [semantic-new-buffer-fcn-was-run semantic-analyze-current-context semantic-analyze-possible-completions no-tc no-longprefix eieio-oref bounds] 6 (#$ . 28000)])
(provide 'semantic/analyze)