;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\207" [require semantic/symref semantic/complete semantic/senator pulse] 2)
#@305 Find references to the current tag.
This command uses the currently configured references tool within the
current project to find references to the current tag.  The
references are organized by file and the name of the function
they are used in.
Display the references in `semantic-symref-results-mode'.
(defalias 'semantic-symref #[0 "\300 \210\301 \211\204
\302\303!\210\304\305\306\211@\262
\"!\204\302\307!\210\310\311!\210\211\211@\262
\312
!\313
\"\207" [semantic-fetch-tags semantic-current-tag error "Place cursor inside tag to be searched for" y-or-n-p format "Find references for %s? " "Quit" message "Gathering References..." semantic-symref-find-references-by-name semantic-symref-produce-list-on-results] 6 (#$ . 221) nil])
#@312 Find references to the symbol SYM.
This command uses the currently configured references tool within the
current project to find references to the input SYM.  The
references are organized by file and the name of the function
they are used in.
Display the references in `semantic-symref-results-mode'.

(fn SYM)
(defalias 'semantic-symref-symbol #[257 "\300 \210\301\302!\210\303
!\304
\"\207" [semantic-fetch-tags message "Gathering References..." semantic-symref-find-references-by-name semantic-symref-produce-list-on-results] 5 (#$ . 970) (byte-code "\300\301!\211@\262
C\207" [semantic-complete-read-tag-project "Symrefs for: "] 2)])
#@325 Find references to the a symbol regexp SYM.
This command uses the currently configured references tool within the
current project to find references to the input SYM.  The
references are the organized by file and the name of the function
they are used in.
Display the references in `semantic-symref-results-mode'.

(fn SYM)
(defalias 'semantic-symref-regexp #[257 "\300 \210\301\302!\210\303
!\304
\"\207" [semantic-fetch-tags message "Gathering References..." semantic-symref-find-text semantic-symref-produce-list-on-results] 5 (#$ . 1616) (byte-code "\300 \211\205
\301
\211@\262
!\302\303\304\"\305\211$\266\202C\207" [semantic-current-tag regexp-quote read-string format-prompt " Symrefs for" nil] 7)])
(custom-declare-group 'semantic-symref-results-mode nil "Symref Results group." :group 'semantic)
#@48 Keymap used in `semantic-symref-results-mode'.
(defvar semantic-symref-results-mode-map (byte-code "\300 \301
!\210\302
\303\304#\210\302
\305\306#\210\302
\307\310#\210\302
\311\312#\210\302
\313\312#\210\302
\314\312#\210\302
\315\316#\210\302
\317\320#\210\302
\321\322#\210\302
\323\324#\210\302
\325\326#\210\302
\327\330#\210\302
\331\332#\210\302
\333\334#\210\207" [make-sparse-keymap suppress-keymap define-key "	" forward-button "\303-i" backward-button " " push-button "-" semantic-symref-list-toggle-showing "=" "+" "n" semantic-symref-list-next-line "p" semantic-symref-list-prev-line "q" quit-window "" semantic-symref-list-expand-all "" semantic-symref-list-contract-all "R" semantic-symref-list-rename-open-hits "(" semantic-symref-list-create-macro-on-open-hit "E" semantic-symref-list-call-macro-on-open-hits] 5) (#$ . 2432))
#@49 Menu entries for the Semantic Symref list mode.
(defvar semantic-symref-list-menu-entries (list "Symref" ["Toggle Line Open" semantic-symref-list-toggle-showing :active t :help "Toggle the current line open or closed."] ["Expand All Entries" semantic-symref-list-expand-all :active t :help "Expand every expandable entry."] ["Contract All Entries" semantic-symref-list-contract-all :active t :help "Close every expandable entry."] ["Rename Symbol in Open hits" semantic-symref-list-rename-open-hits :active t :help "Rename the searched for symbol in all hits that are currently open."]) (#$ . 3286))
#@56 Menu keymap build from `semantic-symref-results-mode'.
(defvar semantic-symref-list-menu nil (#$ . 3892))
#@19 Symref Mode Menu.
(defvar semantic-symref-list-menu nil (#$ . 4004))
(byte-code "\302\303\304	$\210\305\306\307\310\311DD\312\313\314%\210\305\315\307\310\316DD\317\313\320%\207" [semantic-symref-results-mode-map semantic-symref-list-menu-entries easy-menu-do-define semantic-symref-list-menu "Symref Mode Menu." custom-declare-variable semantic-symref-auto-expand-results funcall function #[0 "\300\207" [nil] 1 #1=""] "Non-nil to expand symref results on buffer creation." :type boolean semantic-symref-results-mode-hook #[0 "\300\207" [nil] 1 #1#] "Hook run when `semantic-symref-results-mode' starts." hook] 6)
#@47 The current results in a results mode buffer.
(defvar semantic-symref-current-results nil (#$ . 4626))
#@69 Produce a symref list mode buffer on the results RES.

(fn RES STR)
(defalias 'semantic-symref-produce-list-on-results #[514 "
\204\301\302!\210\303\304\"\210\305\306!\210\307\310\311\"!\312
!\210\211q\210\313 \210\314\300!\210\315!\210eb\207" [semantic-symref-current-results error "No references found" semantic-symref-result-get-tags t message "Gathering References...done" get-buffer-create format "*Symref %s" switch-to-buffer-other-window semantic-symref-results-mode make-local-variable semantic-symref-results-dump] 6 (#$ . 4735)])
(defvar semantic-symref-results-mode-hook nil)
(byte-code "\300\301N\204\f\302\300\301\303#\210\304\305!\204\302\305\306\307#\210\300\207" [semantic-symref-results-mode-hook variable-documentation put "Hook run after entering Symref mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" boundp semantic-symref-results-mode-map definition-name semantic-symref-results-mode] 4)
(defvar semantic-symref-results-mode-map (make-sparse-keymap))
(byte-code "\301\302N\204\303\301\302\304\305!#\210\306\307!\204\303\307\310\311#\210\312\313 !\210\307\302N\204-\303\307\302\304\314!#\210\306\300!\204B\303\300\310\311#\210\315\316\300\317\"\210!\210\300\302N\204P\303\300\302\304\320!#\210\303\311\321\317#\207" [semantic-symref-results-mode-abbrev-table semantic-symref-results-mode-map variable-documentation put purecopy "Keymap for `semantic-symref-results-mode'." boundp semantic-symref-results-mode-syntax-table definition-name semantic-symref-results-mode (lambda (#1=#:def-tmp-var) (defvar semantic-symref-results-mode-syntax-table #1#)) make-syntax-table "Syntax table for `semantic-symref-results-mode'." (lambda (#1#) (defvar semantic-symref-results-mode-abbrev-table #1#)) define-abbrev-table nil "Abbrev table for `semantic-symref-results-mode'." derived-mode-parent] 5)
#@217 Major-mode for displaying Semantic Symbol Reference results.

This mode runs the hook `semantic-symref-results-mode-hook', as the
final or penultimate step during initialization.

\{semantic-symref-results-mode-map}
(defalias 'semantic-symref-results-mode #[0 "\306\300!\210\307\310 \210\311\312\313!\210\314\f!\210
\315 \210\306\316!\210\317\320\321!\210)\322\323!\207" [delay-mode-hooks major-mode mode-name semantic-symref-results-mode-map semantic-symref-results-mode-syntax-table semantic-symref-results-mode-abbrev-table make-local-variable t kill-all-local-variables semantic-symref-results-mode "Symref" use-local-map set-syntax-table buffer-disable-undo font-lock-global-modes nil font-lock-mode -1 run-mode-hooks semantic-symref-results-mode-hook local-abbrev-table] 2 (#$ . 6655) nil])
(byte-code "\301\302\303\304\305DD\306\307%\207" [semantic-format-tag-custom-list custom-declare-variable semantic-symref-results-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'." :type] 6)
#@57 Dump the RESULTS into the current buffer.

(fn RESULTS)
(defalias 'semantic-symref-results-dump #[257 "\303\304 \210\305\306\307\"\211\203^\211@\310!\232\204,\310
!\262\311\312\313\314\315\316&\210\317c\210\320c\210\311\321\312\322\323\305\314\324\316	\325\326&\210\327c\210\311	\305\303#\312\313\323\305\314\330\316	&	\210\317c\210
A\266\202\202\n\266\n\203g\331 \210)\332\305!\207" [inhibit-read-only semantic-symref-results-summary-function semantic-symref-auto-expand-results t erase-buffer nil eieio-oref hit-tags semantic-tag-file-name insert-button mouse-face custom-button-pressed-face action semantic-symref-rb-goto-file tag "\n" "  " "[+]" highlight face semantic-symref-rb-toggle-expand-tag state closed " " semantic-symref-rb-goto-tag semantic-symref-list-expand-all set-buffer-modified-p] 16 (#$ . 7811)])
#@53 Toggle showing the contents below the current line.
(defalias 'semantic-symref-list-toggle-showing #[0 "\300 \210\301\302\303 \304#\205\305u\210\306 \207" [beginning-of-line re-search-forward "\\[[-+]\\]" point-at-eol t -1 push-button] 4 (#$ . 8654) nil])
#@118 Go to the file specified in the symref results buffer.
BUTTON is the button that was clicked.

(fn &optional BUTTON)
(defalias 'semantic-symref-rb-toggle-expand-tag #[256 "\301
\302\"\303
!
\304\305\306
8\262
\"\266\202\301\307\"\310
\311\267\202\301rq\210\211\203F\211@eb\210\211Sy\210\312 \210\313 \210`\314 {B\262
A\266\202\202$\210\211\237\262
)\315!b\210\316u\210\317\320\316!\210\321c\210\322\307\323#\210\212\310\210\211\205\221\324c\210\325c\210\326
@\327\330\331\310\332\333\302
\334
@&\210\211A\262
A\262\202i*\207\317\322\307\335#\210\315!b\210\316u\210\320\316!\210\336c\210\212\310\210\316u\210`\212\316u\210Gy\210`)|*\207\310\207" [inhibit-read-only button-get tag semantic-tag-buffer :hit plist-get 3 state nil #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (closed 31 open 147)) beginning-of-line back-to-indentation point-at-eol button-start 1 t delete-char "-" button-put open "\n" "    " insert-button mouse-face highlight face action semantic-symref-rb-goto-match line closed "+"] 18 (#$ . 8919) nil])
#@118 Go to the file specified in the symref results buffer.
BUTTON is the button that was clicked.

(fn &optional BUTTON)
(defalias 'semantic-symref-rb-goto-file #[256 "\301
\302\"\303
!\304 \305!\210\306`!\210\307=\205\310
!\207" [last-command-event button-get tag semantic-tag-buffer selected-window switch-to-buffer-other-window pulse-momentary-highlight-one-line 32 select-window] 6 (#$ . 10016)])
#@118 Go to the file specified in the symref results buffer.
BUTTON is the button that was clicked.

(fn &optional BUTTON)
(defalias 'semantic-symref-rb-goto-tag #[256 "\301
\302\"\303
!\304 \305!\210\306!\210\307`!\210\310=\205\311
!\207" [last-command-event button-get tag semantic-tag-buffer selected-window switch-to-buffer-other-window semantic-go-to-tag pulse-momentary-highlight-one-line 32 select-window] 6 (#$ . 10424) nil])
#@118 Go to the file specified in the symref results buffer.
BUTTON is the button that was clicked.

(fn &optional BUTTON)
(defalias 'semantic-symref-rb-goto-match #[256 "\301
\302\"\301\303\"\304!\305 \306!\210eb\210Sy\210\307`!\210\310=\205%\311
!\207" [last-command-event button-get tag line semantic-tag-buffer selected-window switch-to-buffer-other-window pulse-momentary-highlight-one-line 32 select-window] 7 (#$ . 10864) nil])
#@46 Next line in `semantic-symref-results-mode'.
(defalias 'semantic-symref-list-next-line #[0 "\300y\210\301 \207" [1 back-to-indentation] 1 (#$ . 11305) nil])
#@46 Next line in `semantic-symref-results-mode'.
(defalias 'semantic-symref-list-prev-line #[0 "\300y\210\301 \207" [-1 back-to-indentation] 1 (#$ . 11468) nil])
#@45 Expand all the nodes in the current buffer.
(defalias 'semantic-symref-list-expand-all #[0 "\300 \211`\301\223\210eb\210\302\303\301\304#\203\305 \210\202\n\211b\207" [make-marker nil re-search-forward "\\[[+]\\]" t semantic-symref-list-toggle-showing] 5 (#$ . 11632) nil])
#@45 Expand all the nodes in the current buffer.
(defalias 'semantic-symref-list-contract-all #[0 "\300 \211`\301\223\210eb\210\302\303\301\304#\203\305 \210\202\n\211b\207" [make-marker nil re-search-forward "\\[[-]\\]" t semantic-symref-list-toggle-showing] 5 (#$ . 11915) nil])
#@147 Return the line number if the cursor is on a buffer line with a hit.
Hits are the line of code from the buffer, not the tag summar or file lines.
(defalias 'semantic-symref-list-on-hit-p #[0 "\212\300\210\301`S!@\211\205\302
\303\"\262
)\207" [nil overlays-at overlay-get line] 4 (#$ . 12201)])
#@332 Record a keyboard macro at the location of the hit in the current list.
Under point should be one hit for the active keyword.  Move
cursor to the beginning of that symbol, then record a macro as if
`kmacro-start-macro' was pressed.  Use `kmacro-end-macro',
{kmacro-end-macro} to end the macro, and return to the symbol found list.
(defalias 'semantic-symref-list-create-macro-on-open-hit #[0 "\301\211\302\"\303\"\212\304\210\305`S!@)\211\205\306
\307\"
\205!\306\310\"\211\204)\311\312!\210\313\314!!\210eb\210\211Sy\210\315\316!\317 \320#\204E\311\321!\210\322\224b\210\323\304!\210\324\325!\207" [semantic-symref-current-results eieio-oref created-by searchfor nil overlays-at overlay-get tag line error "Cannot create macro on a non-hit line" switch-to-buffer-other-window semantic-tag-buffer re-search-forward regexp-quote point-at-eol t "Cannot find hit.  Cannot record macro" 0 kmacro-start-macro message "Complete with C-x ).  Use E in the symref buffer to call this macro."] 8 (#$ . 12506) nil])
#@223 Call the most recently created keyboard macro on each hit.
Cursor is placed at the beginning of the symbol found, even if
there is more than one symbol on the current line.  The
previously recorded macro is then executed.
(defalias 'semantic-symref-list-call-macro-on-open-hits #[0 "\300 \301\302\"\216\303\304!\305 \210\306\307\"\262
)\207" [current-window-configuration make-closure #[0 "\301\300!\207" [V0 set-window-configuration] 2] semantic-symref-list-map-open-hits #[0 "\300p!\210\301\302!\207" [switch-to-buffer kmacro-call-macro nil] 2] semantic-symref-list-update-open-hits message "Executed Macro %d times."] 5 (#$ . 13528) nil])
#@158 Rename the discovered symbol references to NEWNAME.
Only renames the locations that are open in the symref list.
Closed items will be skipped.

(fn NEWNAME)
(defalias 'semantic-symref-list-rename-open-hits #[257 "\300\301\302\"!\303 \210\304\305\"\207" [semantic-symref-list-map-open-hits make-closure #[0 "\301\300\302\303#\207" [V0 replace-match nil t] 4] semantic-symref-list-update-open-hits message "Renamed %d occurrences."] 5 (#$ . 14179) (byte-code "\301\302\303\211\304\"\305\"\"C\207" [semantic-symref-current-results read-string "Rename to: " eieio-oref created-by searchfor] 6)])
#@213 For every open hit in the symref buffer, perform FUNCTION.
The `match-data' will be set to a successful hit of the searched for symbol.
Return the number of occurrences FUNCTION was operated upon.

(fn FUNCTION)
(defalias 'semantic-symref-list-map-open-hits #[257 "\301\211\302\"\303\"\304\212eb\210m\204a\305`S!@\211\205\306
\307\"
\205%\306\310\"\211\203Vr\311!q\210eb\210\211Sy\210\312 \210\313\314!\315 \316#\203UT\262\212\304\224b\210 \210)\2029)\266\317y\210\320\210\202\f)\207" [semantic-symref-current-results eieio-oref created-by searchfor 0 overlays-at overlay-get tag line semantic-tag-buffer beginning-of-line re-search-forward regexp-quote point-at-eol t 1 nil] 10 (#$ . 14781)])
#@59 Update the text for all the open hits in the symref list.
(defalias 'semantic-symref-list-update-open-hits #[0 "\212eb\210\300\301\302\303#\205+\302\210\304`S!@\211\205\305
\306\"\211\203&\307 \210\307 \210\266\202)\207" [re-search-forward "\\[-\\]" nil t overlays-at overlay-get tag semantic-symref-list-toggle-showing] 4 (#$ . 15499)])
(provide 'semantic/symref/list)