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/ia-sb.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\207" [require semantic/analyze speedbar] 2)
#@53 Keymap used when in semantic analysis display mode.
(defvar semantic-ia-sb-key-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\207" [speedbar-make-specialized-keymap define-key "
" speedbar-edit-line "I" semantic-ia-sb-show-tag-info] 5) (#$ . 163))
#@33 Extra menu items Analysis mode.
(defvar semantic-ia-sb-easymenu-definition '("---" ["Tag Information" semantic-ia-sb-show-tag-info t] ["Jump to Tag" speedbar-edit-line t] ["Complete" speedbar-edit-line t]) (#$ . 428))
(byte-code "\300\301!\210\302\303\304D!\207" [speedbar-add-expansion-list ("Analyze" semantic-ia-sb-easymenu-definition semantic-ia-sb-key-map semantic-ia-speedbar) speedbar-add-mode-functions-list "Analyze" (speedbar-line-directory . semantic-ia-sb-line-path)] 3)
#@147 Start Speedbar in semantic analysis mode.
The analyzer displays information about the current context, plus a smart
list of possible completions.
(defalias 'semantic-speedbar-analysis #[0 "\300\301!\210\302\303!\207" [speedbar-frame-mode 1 speedbar-change-initial-expansion-list "Analyze"] 2 (#$ . 918) nil])
#@162 Create buttons in speedbar which define the current analysis at POINT.
DIRECTORY is the current directory, which is ignored, and ZERO is 0.

(fn DIRECTORY ZERO)
(defalias 'semantic-ia-speedbar #[514 "\303\211\211\211\304 \303\211\30519\306\307\310\311\"!\210p\262	\212\312`!\262\313`!\262\314 \262\2053\315!\211\262)0\210\202:\210\316!\210r\nq\210\317 \210\320\321!\210\322\323\324\303\211\325	!\303\211\326\327&	\210\211\203c\330\331\332#\210\203l\333!\210\203\203\334!\210\203\203\320\335!\210\336\331\337#\210\205\212\340!*\207" [mode-local-active-mode major-mode speedbar-buffer nil selected-frame (error) dframe-select-attached-frame dframe-current-frame speedbar-frame speedbar-mode semantic-calculate-scope semantic-analyze-current-context semantic-find-tag-by-overlay semantic-analyze-possible-completions select-frame erase-buffer speedbar-insert-separator "Buffer/Function" speedbar-make-tag-line bracket 32 buffer-name speedbar-file-face 0 semantic-ia-sb-string-list speedbar-tag-face semantic-sb-token-jump semantic-ia-sb-show-doc semantic-ia-sb-more-buttons "Completions" semantic-ia-sb-completion-list semantic-ia-sb-complete semantic-ia-sb-show-scope] 18 (#$ . 1234)])
(cl-generic-define-method 'semantic-ia-sb-show-doc nil '((context semantic-analyze-context)) nil #[257 "\300\301\302\"!@\303\30416\211:\2050\211@;\2050\211A@9\2050\211A@\2050\3058<\2050\3068<0\262\202:\210\303\262\205O\307!\262\211\205O\310\311!\210\211c\210\312c\207" [reverse eieio-oref prefix nil (error) 2 3 semantic-documentation-for-tag speedbar-insert-separator "Documentation" "\n"] 6 "Show documentation about CONTEXT if CONTEXT points at a complete symbol.\n\n(fn CONTEXT)"])
#@37 Show SCOPE information.

(fn SCOPE)
(defalias 'semantic-ia-sb-show-scope #[257 "\211\205\300\301\"\211\205\302\303!\210\304\305\306#\207" [eieio-oref localvar speedbar-insert-separator "Local Variables" semantic-ia-sb-string-list speedbar-tag-face semantic-sb-token-jump] 6 (#$ . 2958)])
(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-ia-sb-more-buttons nil ((context semantic-analyze-context)) #[257 "\300\301\"\211\205\302\303!\210\304\305\306#\207" [eieio-oref prefix speedbar-insert-separator "Prefix" semantic-ia-sb-string-list speedbar-tag-face semantic-sb-token-jump] 6 "Show a set of speedbar buttons specific to CONTEXT.\n\n(fn CONTEXT)"] ((context semantic-analyze-context-assignment)) t #[514 " \210\300\301\"\211\205\302\303!\210\304\305\306#\207" [eieio-oref assignee speedbar-insert-separator "Assignee" semantic-ia-sb-string-list speedbar-tag-face semantic-sb-token-jump] 7 "Show a set of speedbar buttons specific to CONTEXT.\n\n(fn CL--CNM CONTEXT)"] ((context semantic-analyze-context-functionarg)) #[514 " \210\300\301\"\211\205J\302\303!\210\304\305\306#\210\300\307\"@\211\310\311\3128\262\"\266\203\302\313\314\300\315\"\"!\210\211\203C\304\305\306\300\315\"\316%\207\304\305\306#\266\202\207" [eieio-oref function speedbar-insert-separator "Function" semantic-ia-sb-string-list speedbar-tag-face semantic-sb-token-jump argument :arguments plist-get 2 format "Argument #%d" index speedbar-selected-face] 12 "Show a set of speedbar buttons specific to CONTEXT.\n\n(fn CL--CNM CONTEXT)"]] 6)
#@208 Create some speedbar buttons from LIST.
Each button will use FACE, and be activated with FUNCTION.
Optional IDX is an index into LIST to apply IDXFACE instead.

(fn LIST FACE FUNCTION &optional IDX IDXFACE)
(defalias 'semantic-ia-sb-string-list #[1283 "\300\205\340\301@;\203@\202Z@\3021C\211:\205=\211@;\205=\211A@9\205=\211A@\205=\3038<\205=\3048<0\262\202G\210\301\262\203Y\305@!\262\306@!\202Z\307\203dU\204i\202j@\3021\232\211:\205\224\211@;\205\224\211A@9\205\224\211A@\205\224\3038<\205\224\3048<0\262\202\236\210\301\262\203\275\310\311\312\313\f@\205\261\f@\314&	\210\202\324\310\315\316\301\211\205\313\f@\314&	\210A\262	T\266\204\202\207" [1 nil (error) 2 3 semantic-tag-with-position-p semantic-format-tag-uml-concise-prototype "<No Tag>" speedbar-make-tag-line angle 105 semantic-ia-sb-tag-info 0 statictag 63] 19 (#$ . 4598)])
#@125 Create some speedbar buttons from LIST.
Each button will use FACE, and be activated with FUNCTION.

(fn LIST FACE FUNCTION)
(defalias 'semantic-ia-sb-completion-list #[771 "\205\205\300@;\203@\202Q@\3011?\211:\2059\211@;\2059\211A@9\2059\211A@\2059\3028<\2059\3038<0\262\202C\210\300\262\203P\304\262\305@!\202Q\306\203k\307\310\311\312@@\313&	\210\202|\307\314\315\300\211@\313&	\210A\262\266\202\207" [nil (error) 2 3 t semantic-format-tag-uml-concise-prototype "foo" speedbar-make-tag-line angle 105 semantic-ia-sb-tag-info 0 statictag 32] 15 (#$ . 5525)])
#@132 Display information about the tag on the current line.
Same as clicking on the <i> button.
See `semantic-ia-sb-tag-info' for more.
(defalias 'semantic-ia-sb-show-tag-info #[0 "\300\212\300\210\301u\210\302`\303\"\262)\304\300\305#\207" [nil -1 get-text-property speedbar-token semantic-ia-sb-tag-info 0] 5 (#$ . 6139) nil])
#@217 Display as much information as we can about tag.
Show the information in a shrunk split-buffer and expand
out as many details as possible.
TEXT, TAG, and INDENT are speedbar function arguments.

(fn TEXT TAG INDENT)
(defalias 'semantic-ia-sb-tag-info #[771 "\3061.\211:\205(\211@;\205(\211A@9\205(\211A@\205(\3078<\205(\3108<0\262\2022\210\311\262\205Q\312\216\311\313\314\315\316\"!\210p\262r\317\320!q\210p\321 \210\311\211\322\211\322\323 \210\324\325!\210+\211%r\320q\210db\210\326\311\322#\327\261\210\3301\205rq\210\331\311\")0\202\207\210\311\211\203\226\326\311\322#c\266\202A\211\332\333\3078\262\"\266\203\211\3061\322\211:\205\314\211@;\205\314\211A@9\205\314\211A@\205\314\3078<\205\314\3108<0\262\202\326\210\311\262\203\343\211\211@\262\262\202\354\211<\203\354\211@\262\211\211\334&!\205\377\211;\205\377\335&\"\262\211\262\205	\211J\262\2038\211\336\334&!\205\"\211;\205\"\335&\"\262\211\2030\211N\266\203\2026\337\340\341\"\266\203\262\210\211\203@\211c\210\210)\342!\210)\266\343\344\320!!\262)\207" [default-directory buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only (error) 2 3 nil #[0 "\301!\207" [speedbar-frame select-frame] 2] dframe-select-attached-frame dframe-current-frame speedbar-frame speedbar-mode get-buffer-create "*Tag Information*" kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook semantic-format-tag-prototype "\n" (error) semantic-analyze-tag-type :type plist-get obarrayp intern-soft summary signal wrong-type-argument (semantic-lex-keyword-p name) internal-temp-output-buffer-show shrink-window-if-larger-than-buffer get-buffer-window standard-output semantic-flex-keywords-obarray] 15 (#$ . 6473)])
#@67 Return the file name associated with DEPTH.

(fn &optional DEPTH)
(defalias 'semantic-ia-sb-line-path #[256 "\300 \301\302\"\216\303 \304!\206p\305!\266\202)\207" [match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] speedbar-line-token semantic-tag-buffer buffer-file-name] 6 (#$ . 8271)])
#@125 At point in the attached buffer, complete the symbol clicked on.
TEXT TAG and INDENT are the details.

(fn TEXT TAG INDENT)
(defalias 'semantic-ia-sb-complete #[771 "\300\301\302\303\"!\210\304\216\305`!\306\307\"\310\212`AX\203#`@Y\203#\311\262@b\210@A|\210\211@\262c\210\211\203;`\262)\211\205Q\312 \300\301\302\303\"!\210b\210\313!\262\266\203)\207" [dframe-select-attached-frame dframe-current-frame speedbar-frame speedbar-mode #[0 "\301!\207" [speedbar-frame select-frame] 2] semantic-analyze-current-context eieio-oref bounds nil t selected-frame select-frame] 11 (#$ . 8603)])
(provide 'semantic/ia-sb)

Youez - 2016 - github.com/yon3zu
LinuXploit