WWWWWW

Current Directory: /usr/share/emacs/24.3/lisp/cedet/semantic/symref
Viewing File: /usr/share/emacs/24.3/lisp/cedet/semantic/symref/filter.elc
;ELC
;;; Compiled by mockbuild@buildfarm01-new.corp.cloudlinux.com on Tue Nov 11 12:57:17 2025
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/symref/filter.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 "\300\301!\210\300\302!\207" [require semantic semantic/analyze] 2)
#@100 Determine if the tag TARGET is used at POSITION in the current buffer.
Return non-nil for a match.
(defalias 'semantic-symref-filter-hit #[(target &optional position) "\301\302\"\207" [position semantic-analyze-current-symbol #[(start end prefix) "\237@\211\303\304\305\217)\205\306\n	\")\207" [prefix tag target nil (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) semantic-equivalent-tag-p] 4]] 3 (#$ . 651)])
#@275 Find all occurrences of the symbol TARGET that match TARGET the tag.
For each match, call HOOKFCN.
HOOKFCN takes three arguments that match
`semantic-analyze-current-symbol's use of HOOKFCN.
  ( START END PREFIX )

Search occurs in the current buffer between START and END.
(defalias 'semantic-symref-hits-in-region #[(target hookfcn start end) "\306\307!\210\212b\210	\211@)\f\310\311!\312Q\313\314#\205/\315 \203\316\317`\"\210\202,\207" [start target tag str semantic-case-fold case-fold-search require semantic/idle "\\<" regexp-quote "\\>" re-search-forward t semantic-idle-summary-useful-context-p semantic-analyze-current-symbol #[(start end prefix) "\237@\211\306\307\310\217)\205\311\n	\"\205\212\f
#))\207" [prefix tag target hookfcn start end nil (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) semantic-equivalent-tag-p] 5] regexp end] 5 (#$ . 1124)])
#@158 Lookup in the current tag the symbol under point.
the count all the other references to the same symbol within the
tag that contains point, and return that.
(defalias 'semantic-symref-test-count-hits-in-tag #[nil "\306 \307\310\311\"!@\312 \313 \314	\315\316\317\217)\205s\320	\321\n\211\322\n8)\323
!\2035\324
!\2028
\314H*\n\211\322\n8)\323
!\203N\325
!\202Q
\326H*$\210\327\330!\203r\331\332\f	\211@)\313 \333\334\"!*$\210\f-\207" [ctxt target tag start Lcount o semantic-analyze-current-context reverse eieio-oref prefix semantic-current-tag current-time 0 nil (byte-code ":\205#@;\205#A@9\205#A@\205#\3018<\205#\3028<\207" [tag 2 3] 2) ((error)) semantic-symref-hits-in-region #[(start end prefix) "T\211\207" [Lcount] 2] 4 semantic-overlay-p semantic-overlay-start semantic-overlay-end 1 called-interactively-p interactive message "Found %d occurrences of %s in %.2f seconds" float-time time-subtract end] 9 (#$ . 2069) nil])
#@95 Fancy way to rename the local variable under point.
Depends on the SRecode Field editing API.
(defalias 'semantic-symref-rename-local-variable #[nil "\306 \307\310\311\"!@\312 	\203\313	!\204\314\315!\210	\316\211\211A@)*=\2040\314\317!\210	\211\320\n8)\321\f!\203E\322\f!\202H\f\323H*\n\211\320\n8)\321\f!\203^\322\f!\202a\f\323H*W\204\234	\211\320\n8)\321\f!\203{\324\f!\202~\f\325H*\n\211\320\n8)\321\f!\203\224\324\f!\202\227\f\325H*V\203\245\314\326\n\211@)\"\210\327\330!\210\331 \211\203\264\332
!\210)\333\211#$\334	\335\n\211\320\n8)\321\f!\203\323\322\f!\202\326\f\323H*\n\211\320\n8)\321\f!\203\354\324\f!\202\357\f\325H*$\210\336\337\340\n\211\320\n8)\321\f!\203\n\322\f!\202
\f\323H*\341\n\211\320\n8)\321\f!\203$\324\f!\202'\f\325H*%#\342#!-\207" [ctxt target tag class o ar semantic-analyze-current-context reverse eieio-oref prefix semantic-current-tag semantic-tag-with-position-p error "Cannot identify symbol under point" variable "Can only rename variables" 4 semantic-overlay-p semantic-overlay-start 0 semantic-overlay-end 1 "Can only rename variables declared in %s" require srecode/fields srecode-active-template-region srecode-delete nil semantic-symref-hits-in-region #[(start end prefix) "\302\303\304\303\305\306	&\207" [start end srecode-field "LOCAL" :name :start :end] 8] srecode-template-inserted-region "REGION" :start :end srecode-overlaid-activate region srecode-field-archive] 8 (#$ . 3047) nil])
(provide 'semantic/symref/filter)
F1l3 Manager
