1#@!#!123s

file_get_contents 1#@!#!123s
: / usr / share / emacs / 24.3 / lisp / cedet / semantic /
Filename : db-ref.elc
back
;ELC���
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:11:14 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/db-ref.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!\210\300\303!\210\300\304!\210\305\306\307\306\310\"\"\210\311\306\312\313\314$\210\305\315\307\315\316\"\"\210\311\315\312\313\317$\210\305\320\307\320\321\"\"\210\311\320\312\313\322$\210\305\315\307\315\323\"\"\210\311\315\312\324\325$\210\305\326\307\326\327\"\"\210\311\326\312\313\330$\210\305\326\307\326\327\"\"\210\311\326\312\324\331$\210\305\332\307\332\333\"\"\210\311\332\312\324\334$\210\335\336\312\337\340$\207" [require eieio semantic semantic/db semantic/tag eieio--defalias semanticdb-add-reference eieio--defgeneric-init-form #1="Add a reference for the database table DBT based on INCLUDE-TAG.\nDBT is the database table that owns the INCLUDE-TAG.  The reference\nwill be added to the database that INCLUDE-TAG refers to." eieio--defmethod nil semanticdb-abstract-table #[(dbt include-tag) "\304\305!\205\n�\306\307\"\310	\n\"\211\205�\311\312\n#\210\313*\207" [semanticdb-find-default-throttle include-tag dbt refdbt featurep semantic/db-find remq unloaded semanticdb-find-table-for-include object-add-to-list db-refs t] 5 #1#] semanticdb-check-references #2="Check and cleanup references in the database DBT.\nAbstract tables would be difficult to reference." #[(dbt) "\300\207" [nil] 1 #2#] semanticdb-includes-in-table #3="Return a list of direct includes in table DBT." #[(dbt) "\304\305!!\306\211\203$�\n@\211A@)\307=\203�\n@	B\nA\211\204\f�	\237*\207" [dbt result tags tag semantic-something-to-tag-table semanticdb-get-tags nil include] 4 #3#] #4="Check and cleanup references in the database DBT.\nAny reference to a file that cannot be found, or whos file no longer\nrefers to DBT will be removed." semanticdb-table #[(dbt) "\306\307\"\310\306\311\"P\211\205~�\312\n@\313\f!\205�\314\f!\211\203+�\315
!\204+�\316\317\f!\320\n!\316\211\203^�\321	@\211@)\"\203U�@BA\211\204?�\237+\211\204j�\316*\204u�\322\307\f#\210+\nA\211\204�\316*\207" [dbt myexpr refs ok db f eieio-oref db-refs "\\<" file t semanticdb-table-child-p semanticdb-full-filename file-exists-p nil semanticdb-includes-in-table semantic-something-to-tag-table string-match object-remove-from-list semantic-case-fold case-fold-search result tags tag inc] 6 #4#] semanticdb-refresh-references #5="Refresh references to DBT in other files." #[(dbt) "\300\207" [nil] 1 #5#] #[(dbt) "\302!\211\205�\303	@\"\210	A\211\204�\304)\207" [dbt refs semanticdb-includes-in-table semanticdb-add-reference nil] 4 "Refresh references to DBT in other files."] semanticdb-notify-references #6="Notify all references of the table DBT using method.\nMETHOD takes two arguments.\n  (METHOD TABLE-TO-NOTIFY DBT)\nTABLE-TO-NOTIFY is a semanticdb-table which is being notified.\nDBT, the second argument is DBT." #[(dbt method) "\301\302\303\304\"\"\207" [dbt mapc #[(R) "	\n\"\207" [method R dbt] 3] eieio-oref db-refs] 5 #6#] eieio-defclass semanticdb-ref-adebug ((i-depend-on :initarg :i-depend-on) (local-table :initarg :local-table) (i-include :initarg :i-include)) ("Simple class to allow ADEBUG to show a nice list.")] 5)
#@164 Dump out the list of references for the current buffer.
If REFRESH is non-nil, cause the current table to have its references
refreshed before dumping the result.
(defalias 'semanticdb-ref-test #[(refresh) "\306\307!\210\203\f�\310	!\210	\311\n\312\"\313\n!\314\315\316\317\n\320\f&\321\322!\210\323
\324\",\207" [refresh semanticdb-current-table tab myrefs myinc adbc require eieio-datadebug semanticdb-refresh-references eieio-oref db-refs semanticdb-includes-in-table semanticdb-ref-adebug "DEBUG" :i-depend-on :local-table :i-include data-debug-new-buffer "*References ADEBUG*" data-debug-insert-object-slots "!"] 8 (#$ . 3660) "p"])
(provide 'semantic/db-ref)