ikan Uploader :
Directory : /proc/self/root/usr/share/emacs/25.2/lisp/cedet/semantic/
Upload File : |
| Current File : //proc/self/root/usr/share/emacs/25.2/lisp/cedet/semantic/tag-file.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'semantic/tag)
#@182 Go to the location of TAG.
TAG may be a stripped element, in which case PARENT specifies a
parent tag that has position information.
PARENT can also be a `semanticdb-table' object.
(defalias 'semantic-go-to-tag #[(tag &optional parent) "\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\362 +,-\"\202\317 .\320\216\321,!\203\322,!q\210\202\324\323,!\203\324\323,!!q\210\202\324-\203j- ,\3251T,:\205P,@;\205P,A@9\205P,A@\205P\326,8<\205P\327,8<0\202V\210\307)\203j\321-!\203j\322-!q\210\202\324-\203\274- ,\3301\244,:\205\240,@;\205\240,A@9\205\240,A@\205\240\326,8<\205\240\327,8<0\202\246\210\307)\203\274\323-!\203\274\324\323-!!q\210\202\324-\203\324\331\332!\203\324\333-!\203\324\334-!q\210*\335,!\203,\211 , ,\336,8) /\337/!\203\370\340/!\202\374/\341H*b\202\335-!\203Y-\211 , ,\336,8) /\337/!\203$\340/!\202(/\341H*b\210\342,\211 ,@)-\211 , ,\336,8) /\337/!\203O\343/!\202S/\344H*\345#\202,\346 0 ,\347, ,\326,8)0\"*\203\216eb\210,\346 0 ,\347, ,\326,8)0\"*Sy\202- ,\3501\303,:\205\277,@;\205\277,A@9\205\277,A@\205\277\326,8<\205\277\327,8<0\202\305\210\307)\203\n-\346 0 ,\347, ,\326,8)0\"*\203\neb\210-\346 0 ,\347, ,\326,8)0\"*Sy\210\342,\211 ,@)\307\345#\202eb\210\342,\211 ,@)\307\345#)\207" [overload property mode symbol bind name semantic-go-to-tag nil override-flag symbol-name intern-soft mode-local-symbol-table mode-local-parent derived-mode-parent overload-obsolete match-data #[nil "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3] semantic-tag-in-buffer-p semantic-tag-buffer semantic-tag-file-name find-file-noselect (error) 2 3 (error) featurep semantic/db semanticdb-table-child-p semanticdb-get-buffer semantic-tag-with-position-p 4 semantic-overlay-p semantic-overlay-start 0 re-search-forward semantic-overlay-end 1 t :line plist-get (error) mode-local-active-mode major-mode #1=#:override tag parent save-match-data-internal o attribute] 5 (#$ . 435)])
(byte-code "\300\301\302\303#\210\304\305\301\306#\207" [put semantic-go-to-tag mode-local-overload t make-obsolete-overload semantic-find-nonterminal "23.2"] 4)
#@162 Find the filename represented from TAG.
Depends on `semantic-dependency-include-path' for searching. Always searches
`.' first, then searches additional paths.
(defalias 'semantic-dependency-tag-file #[(&optional tag) "\204 \306\307!@\310\211\211A@) *=\204 \311\312\310D\"\210\212\307\n\307\211 \313!\2037 \314!q\210\202C \315!\203C \316\315!!\317!\320\321!\203q $\203q \3221h \323 \211 %\205c \321% \")0\202j \210\307\211\203q \f
\204\302\324\211 &\307\325 ' (\211 )( ( )\326)!\307 * +(\204\257 ,\211(\204\257 -(\205\255 \327+\"*(\203\343 *\204\343 (\330N\203\316 \327+(\330N\"\211*\204\257 (\211 (\331N\206\334 (\332N)\211(\204\264 *,\211)\205\374 '\203\371 )'N\205\374 )J+\206\227&\211 &\333N)\205\227&\211 &\333N)\307\325 ' (\211 )( ( )\326)!\307 * +(\204I,\211(\204I-(\205G\327+\"*(\203}*\204}(\330N\203h\327+(\330N\"\211*\204I(\211 (\331N\206v(\332N)\211(\204N*,\211)\205\226'\203\223)'N\205\226)J+)\211 .\203\245.!\202\300\212\334\335!\210\336 \211\337 /\340\3418)/\"+\"))
;\205\316\342\343
#\210
-\207" [tag class default-directory tag-fname edefind result semantic-find-tag-by-overlay nil include signal wrong-type-argument semantic-tag-in-buffer-p semantic-tag-buffer semantic-tag-file-name file-name-directory semantic-tag-include-filename fboundp ede-expand-filename (error) ede-toplevel semantic-dependency-tag-file override-flag symbol-name intern-soft mode-local-symbol-table mode-local-parent derived-mode-parent overload-obsolete require semantic/dep semantic-dependency-find-file-on-path :system-flag plist-get 2 semantic--tag-put-property dependency-file ede-minor-mode proj overload property mode symbol bind name mode-local-active-mode major-mode #1=#:override attribute] 6 (#$ . 3087)])
(byte-code "\300\301\302\303#\210\304\305\301\306#\207" [put semantic-dependency-tag-file mode-local-overload t make-obsolete-overload semantic-find-dependency "23.2"] 4)
#@239 Return a file in which prototypes belonging to BUFFER should be placed.
Default behavior (if not overridden) looks for a token specifying the
prototype file, or the existence of an EDE variable indicating which
file prototypes belong in.
(defalias 'semantic-prototype-file #[(buffer) "\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\317\320!\203\203rq\210\320 )\202rq\210\321\322\307\323#\205\324\325!))\207" [overload property mode symbol bind name semantic-prototype-file nil override-flag symbol-name intern-soft mode-local-symbol-table mode-local-parent derived-mode-parent overload-obsolete fboundp ede-header-file re-search-forward "::Header:: \\([a-zA-Z0-9.]+\\)" t match-string 1 mode-local-active-mode major-mode #1=#:override buffer ede-minor-mode] 5 (#$ . 5085)])
(byte-code "\300\301\302\303#\210\304\305\306\307#\210\304\310\311\307#\210\312\313!\207" [put semantic-prototype-file mode-local-overload t semantic-alias-obsolete semantic-find-nonterminal semantic-go-to-tag "23.2" semantic-find-dependency semantic-dependency-tag-file provide semantic/tag-file] 4)
Kontol Shell Bypass