WWWWWW

Current Directory: /usr/share/emacs/24.3/lisp/cedet/semantic
Viewing File: /usr/share/emacs/24.3/lisp/cedet/semantic/ia.elc
;ELC
;;; Compiled by mockbuild@buildfarm01-new.corp.cloudlinux.com on Tue Nov 11 12:57:04 2025
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/ia.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.

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


(byte-code "\301\302!\210\301\303!\210\301\304!\210\301\305!\210\301\306!\210\307\310\311\312\313\314\315&\207" [semantic-format-tag-custom-list require semantic/analyze semantic/format pulse semantic/senator semantic/analyze/refs custom-declare-variable semantic-ia-completion-format-tag-function 'semantic-format-tag-prototype "Function used to convert a tag to a string during completion." :group semantic :type] 8)
#@57 Insert TAG into the current buffer based on completion.
(defalias 'semantic-ia-insert-tag #[(tag) "\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-ia-insert-tag nil override-flag symbol-name intern-soft mode-local-symbol-table mode-local-parent derived-mode-parent overload-obsolete semantic-ia-insert-tag-default mode-local-active-mode major-mode #1=#:override tag] 5 (#$ . 981)])
(put 'semantic-ia-insert-tag 'mode-local-overload t)
#@57 Insert TAG into the current buffer based on completion.
(defalias 'semantic-ia-insert-tag-default #[(tag) "\211@)c\210\211A@)\211\302=\203\303c\202\304)\207" [tag tt function "(" nil] 3 (#$ . 1949)])
(defalias 'semantic-ia-get-completions 'semantic-ia-get-completions-deprecated "`Semantic-ia-get-completions' is obsolete.\nUse `semantic-analyze-possible-completions' instead.")
#@221 A function to help transition away from `semantic-ia-get-completions'.
Return completions based on CONTEXT at POINT.
You should not use this, nor the aliased version.
Use `semantic-analyze-possible-completions' instead.
(defalias 'semantic-ia-get-completions-deprecated #[(context point) "\301!\207" [context semantic-analyze-possible-completions] 2 (#$ . 2344)])
#@150 Complete the current symbol at POS.
If POS is nil, default to point.
Completion options are calculated with `semantic-analyze-possible-completions'.
(defalias 'semantic-ia-complete-symbol #[(&optional pos) "\205\334	\204\n`\306	!\307\n!\310\311\n\312\"!@\211\313\314\315\217)\203*\f\211@)\2049\316\n!\205\333\317 \202\333\320\f\206?\321\"\211;\203\220\f\206O\321\230\204\220\322\" \311\n\323\"@\203}\311\n\323\"A\203}\311\n\323\"@\311\n\323\"A|\210\311\n\323\"@b\210 \203\211\324 !\202\214c)\202\332\311\n\323\"A\203\237\311\n\323\"Ab\210!\"r\325\326!q\210p\327 \210\"!\313\211#$\330\211%\330&'\331 \210\332\333!\210+\211()\334\335*\"!\336(!\210+)+\207" [semantic-new-buffer-fcn-was-run pos a syms pre tag semantic-analyze-current-context semantic-analyze-possible-completions reverse eieio-oref prefix nil (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) semantic-analyze-context-p semantic-complete-symbol try-completion "" semantic-find-first-tag-by-name bounds semantic-ia-insert-tag get-buffer-create "*Completions*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook display-completion-list mapcar internal-temp-output-buffer-show tc tok default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf standard-output semantic-ia-completion-format-tag-function] 5 (#$ . 2716) "d"])
#@64 *Function used to convert a tag to a string during completion.
(custom-declare-variable 'semantic-ia-completion-menu-format-tag-function ''semantic-format-tag-uml-concise-prototype '(#$ . -4204) :group 'semantic :type semantic-format-tag-custom-list)
#@136 Complete the current symbol via a menu based at POINT.
Completion options are calculated with `semantic-analyze-possible-completions'.
(defalias 'semantic-ia-complete-symbol-menu #[(point) "\306\307!\210\310!\311	!\211\204\312\313!\210\314	!\205P\315 \202P\316\317\n\"\320\321B\322 \323#\211\205O\f\321\324\325\217)\204@\fA\326H\327	\330\"@\327	\330\"A|\210\331\f!**\207" [point a syms menu ans tag require imenu semantic-analyze-current-context semantic-analyze-possible-completions message "No smart completions found.  Trying Senator." semantic-analyze-context-p senator-completion-menu-popup mapcar #[(tag) "	!\302	!B\207" [semantic-ia-completion-menu-format-tag-function tag vector] 3] imenu--mouse-menu nil senator-completion-menu-point-as-event "Completions" (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) 0 eieio-oref bounds semantic-ia-insert-tag] 5 (#$ . 4462) "d"])
#@43 Pop up a tooltip for completion at POINT.
(defalias 'semantic-ia-complete-tip #[(point) "\306!\307	!\310i\311 Z\312 \"\212\214~\210\313 `}\210eb\210\314\315 !T*\316\317\n\320#\321\322!\203=\322
\323 \324\211\f&\202@\325
!-\207" [point a syms x y str semantic-analyze-current-context semantic-analyze-possible-completions mod window-hscroll window-width window-start vertical-motion buffer-size mapconcat semantic-tag-name "\n" fboundp x-show-tip selected-frame nil message] 7 (#$ . 5410) "d"])
#@47 Display a summary for the symbol under POINT.
(defalias 'semantic-ia-show-summary #[(point) "\303!\211\205\304	!\211\203\305\306\307\n\310\311#\"\202\305\312!*\207" [point ctxt pf semantic-analyze-current-context semantic-analyze-interesting-tag message "%s" semantic-format-tag-summarize nil t "No summary info available"] 7 (#$ . 5920) "P"])
#@60 Display a list of all variants for the symbol under POINT.
(defalias 'semantic-ia-show-variants #[(point) "\306!\307\310	!\203\311	\312\"Ab\210\306`!\313	\314\315#\211G\316U\203}\n@\317\211\211A@)*=\203}
%\320\n@\211\321&\322\f\323\f8)&\"+!\307'\211(\203x\n@\211@)(@\211@)\230\203o(@'B'(A\211(\204V'\237+\nG\324U\203\212\325\326!\202\334\nG\316U\203\235\325\327\330\n@\307\331#\"\202\334)*r\332\333!q\210p\334 \210*)\307\211+,\331\211-\331./\335 \210\336\337!\210+\21101\340\n\341p#\210\3420!\210+\343\344\333!!*\207" [point ctxt comp class tag semantic-case-fold semantic-analyze-current-context nil semantic-analyze-context-functionarg-p eieio-oref bounds semantic-analyze-possible-completions no-unique no-tc 1 type semantic-something-to-tag-table :members plist-get 2 0 message "No Variants found." "%s" semantic-format-tag-summarize t get-buffer-create "*Symbol Variants*" kill-all-local-variables 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 case-fold-search attribute result tags default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf standard-output] 7 (#$ . 6279) "P"])
#@92 Jump to DEST, a Semantic tag.
This helper manages the mark, buffer switching, and pulsing.
(defalias 'semantic-ia--fast-jump-helper #[(dest) "\305!\203\306!\307	\310\"\211\203\n@*\311!\204.\312\313\f\314\f8)\"*\2034\315!\204;\316\317\320!\"\210\321 \210\322\323!\203G\323 \210\324!\210\325p!\210\326`!\207" [dest refs impl attribute tag semantic-tag-prototype-p semantic-analyze-tag-references semantic-analyze-refs-impl t semantic-tag-with-position-p :line plist-get 2 semantic-tag-file-name error "Tag %s has no buffer information" semantic-format-tag-name push-mark fboundp push-tag-mark semantic-go-to-tag switch-to-buffer pulse-momentary-highlight-one-line] 5 (#$ . 7618)])
#@151 Jump to the tag referred to by the code at POINT.
Uses `semantic-analyze-current-context' output to identify an accurate
origin of the code at point.
(defalias 'semantic-ia-fast-jump #[(point) "\306!\211\205\307\310	\311\"!\211@\nA@\312\313\314\217)\203&\315!\202\225\f\312\316\317\217)\203u\307\310	\320\"!@\321!\203V\322\323\324\211@)#!\203V\315!\202q\f\312\325\326\217)\205q\322\323\324\f\211@)#!\205q\315\f!)\202\225\327 \330\211\211A@)*=\203\221\331\332!\210\333 \202\225\334\335\",\207" [point ctxt pf first second tag semantic-analyze-current-context reverse eieio-oref prefix nil (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) semantic-ia--fast-jump-helper (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) prefixtypes semantic-tag-with-position-p y-or-n-p format "Could not find `%s'.  Jump to %s? " (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) semantic-current-tag include require semantic/decorate/include semantic-decoration-include-visit error "Could not find suitable jump point for %s" secondclass class] 6 (#$ . 8326) "d"])
#@164 Jump to the tag referred to by the point clicked on.
See `semantic-ia-fast-jump' for details on how it works.
 This command is meant to be bound to a mouse event.
(defalias 'semantic-ia-fast-mouse-jump #[(evt) "\301\212\302\303!!\210`)!\207" [evt semantic-ia-fast-jump posn-set-point event-end] 4 (#$ . 9564) "e"])
#@63 Display the code-level documentation for the symbol at POINT.
(defalias 'semantic-ia-show-doc #[(point) "\306!\307\310	\311\"!\211@;\203\312\313!\202\240\n@\314\315\316\217)\203\235\317\n@!\211\2031\f\320\230\203;\312\321\322\n@!\"\202\231
!r\323\324!q\210p\325 \210!\314\211\"#\326\211$\326%&\327 \210\330\331!\210+\211'(\332\333!\210\332\322\n@!!\210\332\334!\210\332\334!\210\332\335!\210\332\334!\210\332\334!\210\f\203\220\332\f!\202\223\332\336!\337'!\210+)\202\240\312\340!*\207" [point ctxt pf tag doc default-directory semantic-analyze-current-context reverse eieio-oref prefix message "Incomplete symbol name." nil (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) semantic-documentation-for-tag "" "Doc unavailable for: %s" semantic-format-tag-prototype get-buffer-create "*TAG DOCUMENTATION*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook princ "Tag: " "\n" "Snarfed Documentation: " "  Documentation unavailable." internal-temp-output-buffer-show "Unknown tag." #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf standard-output] 5 (#$ . 9886) "d"])
#@164 Display all known parts for the datatype TYPENAME.
If the type in question is a class, all methods and other accessible
parts of the parent classes are displayed.
(defalias 'semantic-ia-describe-class #[(typename) "\306!\211\307\310\311\217)\204\312\313	\"\210r\314\315!q\210p\316 \210\f\307\211\317\211\317\320 \210\321\322!\210+\211\323\324	!!\210\323\325!\210\323\326!\210\327	!\211 \205m\323\330!\210\323\324 @!!\210\323\325!\210 A\211 \204S\307)\331!\210,\207" [typename class tag default-directory #1=#:old-dir buffer-read-only semantic-analyze-find-tag nil (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) error "Cannot find class %s" get-buffer-create "*TAG DOCUMENTATION*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook princ semantic-format-tag-summarize "\n" "  Type Members:\n" semantic-analyze-scoped-type-parts "    " internal-temp-output-buffer-show buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf standard-output parts] 4 (#$ . 11123) "sType Name: "])
(provide 'semantic/ia)
F1l3 Manager
