Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
analyze	[ DIR ]	drwxr-xr-x
bovine	[ DIR ]	drwxr-xr-x
decorate	[ DIR ]	drwxr-xr-x
symref	[ DIR ]	drwxr-xr-x
wisent	[ DIR ]	drwxr-xr-x
analyze.elc	28.54 KB	-rw-r--r--
bovine.elc	4.98 KB	-rw-r--r--
chart.elc	4.28 KB	-rw-r--r--
complete.elc	76.43 KB	-rw-r--r--
ctxt.elc	35.96 KB	-rw-r--r--
db-debug.elc	2.75 KB	-rw-r--r--
db-ebrowse.elc	19.95 KB	-rw-r--r--
db-el.elc	13.43 KB	-rw-r--r--
db-file.elc	14.32 KB	-rw-r--r--
db-find.elc	42.67 KB	-rw-r--r--
db-global.elc	9.38 KB	-rw-r--r--
db-javascript.elc	10.97 KB	-rw-r--r--
db-mode.elc	6.7 KB	-rw-r--r--
db-ref.elc	4.96 KB	-rw-r--r--
db-typecache.elc	18.33 KB	-rw-r--r--
db.elc	39.36 KB	-rw-r--r--
debug.elc	17.84 KB	-rw-r--r--
decorate.elc	8.29 KB	-rw-r--r--
dep.elc	7.5 KB	-rw-r--r--
doc.elc	4.14 KB	-rw-r--r--
ede-grammar.elc	9.58 KB	-rw-r--r--
edit.elc	21.04 KB	-rw-r--r--
find.elc	24.37 KB	-rw-r--r--
format.elc	34.91 KB	-rw-r--r--
fw.elc	12.36 KB	-rw-r--r--
grammar-wy.elc	53.64 KB	-rw-r--r--
grammar.elc	78.55 KB	-rw-r--r--
html.elc	7.16 KB	-rw-r--r--
ia-sb.elc	9.44 KB	-rw-r--r--
ia.elc	11.76 KB	-rw-r--r--
idle.elc	60.12 KB	-rw-r--r--
imenu.elc	12.07 KB	-rw-r--r--
java.elc	16.47 KB	-rw-r--r--
lex-spp.elc	34.13 KB	-rw-r--r--
lex.elc	77.22 KB	-rw-r--r--
loaddefs.el	58.17 KB	-rw-r--r--
mru-bookmark.elc	15.46 KB	-rw-r--r--
sb.elc	11.45 KB	-rw-r--r--
scope.elc	25 KB	-rw-r--r--
senator.elc	29.09 KB	-rw-r--r--
sort.elc	18.84 KB	-rw-r--r--
symref.elc	17.35 KB	-rw-r--r--
tag-file.elc	6.45 KB	-rw-r--r--
tag-ls.elc	24.72 KB	-rw-r--r--
tag-write.elc	3.77 KB	-rw-r--r--
tag.elc	54.36 KB	-rw-r--r--
texi.elc	16.99 KB	-rw-r--r--
util-modes.elc	44.17 KB	-rw-r--r--
util.elc	13.24 KB	-rw-r--r--
wisent.elc	7.67 KB	-rw-r--r--

Code Editor : ia-sb.elc

;ELC���
;;; Compiled
;;; in Emacs version 27.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 "\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 nil (#$ . 487))
(byte-code "\204�\301 \302\303\304#\210\302\305\306#\210\301\207" [semantic-ia-sb-key-map speedbar-make-specialized-keymap define-key "
" speedbar-edit-line "I" semantic-ia-sb-show-tag-info] 4)
#@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]) (#$ . 791))
(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 #[nil "\300\301!\210\302\303!\207" [speedbar-frame-mode 1 speedbar-change-initial-expansion-list "Analyze"] 2 (#$ . 1281) nil])
#@141 Create buttons in speedbar which define the current analysis at POINT.
DIRECTORY is the current directory, which is ignored, and ZERO is 0.
(defalias 'semantic-ia-speedbar #[(directory zero) "\306\211\211\211\307 \306\211$\3101=�\311\312\313\314\"!\210p%\212\315`!\316`!$\317 $\2058�\320$!\211)0\202A�\210\202B�\210\321\n!\210r&q\210\322 \210\323\324!\210\325\326\327\306\211\330\f!\306\211\331\332&	\210	\203k�\333	\334\335#\210$\203u�\336$!\210$\203\215�\337$!\210\203\215�\323\340!\210\341\334\342#\210
\205\224�\343
!.\207" [mode-local-active-mode cnt cf completions buffer scope 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 analysis major-mode speedbar-buffer] 10 (#$ . 1600)])
(cl-generic-define-method 'semantic-ia-sb-show-doc nil '((context semantic-analyze-context)) nil #[(context) "\304\305\306\"!@\307\211\31017�:\2053�@;\2053�A@9\2053�A@\2053�\3118<\2053�\3128<0\2029�\210\307)\205N�\313\n!\211\205N�\314\315!\210	c\210\316c*\207" [context doc sym tag reverse eieio-oref prefix nil (error) 2 3 semantic-documentation-for-tag speedbar-insert-separator "Documentation" "\n"] 5 "Show documentation about CONTEXT if CONTEXT points at a complete symbol."])
#@25 Show SCOPE information.
(defalias 'semantic-ia-sb-show-scope #[(scope) "\205�\302\303\"\211\205�\304\305!\210\306	\307\310#)\207" [scope localvars eieio-oref localvar speedbar-insert-separator "Local Variables" semantic-ia-sb-string-list speedbar-tag-face semantic-sb-token-jump] 5 (#$ . 3344)])
(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)) #[(context) "\302\301\"\211\205�\303\304!\210\305	\306\307#)\207" [context prefix eieio-oref speedbar-insert-separator "Prefix" semantic-ia-sb-string-list speedbar-tag-face semantic-sb-token-jump] 5 "Show a set of speedbar buttons specific to CONTEXT."] ((context semantic-analyze-context-assignment)) t #[(#1=#:cl--cnm context) " \210\303	\302\"\211\205�\304\305!\210\306\n\307\310#)\207" [#1# context assignee eieio-oref speedbar-insert-separator "Assignee" semantic-ia-sb-string-list speedbar-tag-face semantic-sb-token-jump] 5 "Show a set of speedbar buttons specific to CONTEXT."] ((context semantic-analyze-context-functionarg)) #[(#2=#:cl--cnm context) " \210\306	\307\"\211\205U�\310\311!\210\312\n\313\314#\210\306	\315\"\n@\211\316\317\3208)\f\"+\321\310\322\323\306	\324\"\"!\210\203N�\312\313\314\306	\324\"\325%\202T�\312\313\314#+)\207" [#2# context func tag attribute idx eieio-oref function speedbar-insert-separator "Function" semantic-ia-sb-string-list speedbar-tag-face semantic-sb-token-jump argument :arguments plist-get 2 0 format "Argument #%d" index speedbar-selected-face args arg] 8 "Show a set of speedbar buttons specific to CONTEXT."]] 6)
#@161 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.
(defalias 'semantic-ia-sb-string-list #[(list face function &optional idx idxface) "\306	\205\322�\307	@;\203�	@\202T�	@\3101A�:\205=�@;\205=�A@9\205=�A@\205=�\3118<\205=�\3128<0\202C�\210\307)\203S�\313	@!\314	@!\202T�\315
\203_�
U\204d�\202f�	@\3161\226�:\205\222�@;\205\222�A@9\205\222�A@\205\222�\3118<\205\222�\3128<0\202\230�\210\307)\203\264�\317\320\321\322	@\f\n\205\251�	@\323&	\210\202\310�\317\324\325\307\211\f\n\205\300�	@\323&	\210	AT+\202�)\207" [count list usefn tag string idx 1 nil (error) 2 3 semantic-tag-with-position-p semantic-format-tag-uml-concise-prototype "<No Tag>" (error) speedbar-make-tag-line angle 105 semantic-ia-sb-tag-info 0 statictag 63 face idxface localface function] 10 (#$ . 5041)])
#@100 Create some speedbar buttons from LIST.
Each button will use FACE, and be activated with FUNCTION.
(defalias 'semantic-ia-sb-completion-list #[(list face function) "\205{�\306@;\203�@\202O�@\3071?�\n:\205;�\n@;\205;�\nA@9\205;�\nA@\205;�\310\n8<\205;�\311\n8<0\202A�\210\306)\203N�\312\313@!\202O�\314	\203f�\315\316\317\320@\f@
\321&	\210\202t�\315\322\323\306\211\f@
\321&	\210A*\202��\207" [list documentable tag string function face 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] 10 (#$ . 5971)])
#@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 #[nil "\301\212\301\210\302u\210\303`\304\")\305\301\306#)\207" [tok nil -1 get-text-property speedbar-token semantic-ia-sb-tag-info 0] 4 (#$ . 6588) nil])
#@195 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.
(defalias 'semantic-ia-sb-tag-info #[(text tag indent) "\3061-�:\205)�@;\205)�A@9\205)�A@\205)�\3078<\205)�\3108<0\202/�\210\311)\205\\\312\216\311\313\314\315\316\"!\210p\nr\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\211�r	q\210\331\311\")0\202\213�\210\311\211+\203\234�\326+\311\322#c\210\202O\211\332,\333\3078),\"+\211-\3341\335�:\205\331�@;\205\331�A@9\205\331�A@\205\331�\3078<\205\331�\3108<0\202\337�\210\311)\203\356�-\211@)-\202\371�-<\203\371�-@--\211\335.!\205
\211;\205
\336.\"\262\211\262\205\211J\262\203E-\337\335.!\2051\211;\2051\336.\"\262\211\203=\211N\202A\340\341\342\"\266\203+)+\203O+c\210*\343)!\210+\344\345\320!!*\207" [tag ob default-directory #1=#:old-dir buffer-read-only buffer-file-name (error) 2 3 nil #[nil "\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 (error) 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 buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf standard-output typetok attribute type semantic-flex-keywords-obarray] 7 (#$ . 6926)])
#@45 Return the file name associated with DEPTH.
(defalias 'semantic-ia-sb-line-path #[(&optional depth) "\303 \304\216\305 \306	!\203�\306	!\202�p\307\n!,\207" [save-match-data-internal tok buff match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] speedbar-line-token semantic-tag-buffer buffer-file-name] 2 (#$ . 8683)])
#@103 At point in the attached buffer, complete the symbol clicked on.
TEXT TAG and INDENT are the details.
(defalias 'semantic-ia-sb-complete #[(text tag indent) "\305\306\307\310\"!\210\311\216\312`!\313\301\"\314\212`	AX\203%�`	@Y\203%�\315	@b\210	@	A|\210\211@)c\210\n\203<�`)\n\205R�\316 \305\306\307\310\"!\210\nb\210\317\f!),\207" [a bounds movepoint tag cf dframe-select-attached-frame dframe-current-frame speedbar-frame speedbar-mode #[nil "\301!\207" [speedbar-frame select-frame] 2] semantic-analyze-current-context eieio-oref nil t selected-frame select-frame] 5 (#$ . 9050)])
(provide 'semantic/ia-sb)

${this.title}

Code Editor : ia-sb.elc