1#@!#!123s

file_get_contents 1#@!#!123s
: / usr / share / emacs / 24.3 / lisp / cedet / semantic /
Filename : db-debug.elc
back
;ELC���
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:11:12 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/semantic/db-debug.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!\207" [require data-debug semantic/db semantic/format] 2)
#@47 Dump a list of all databases in Emacs memory.
(defalias 'semanticdb-dump-all-table-summary #[nil "\302\303!\210\304\305!\210\306	\307\")\207" [semanticdb-database-list db require data-debug data-debug-new-buffer "*SEMANTICDB*" data-debug-insert-stuff-list "*"] 3 (#$ . 671) nil])
(defalias 'semanticdb-adebug-database-list 'semanticdb-dump-all-table-summary)
#@37 Run ADEBUG on the current database.
(defalias 'semanticdb-adebug-current-database #[nil "\302\303!\210\304\305!\210\306	\307\")\207" [semanticdb-current-database p require data-debug data-debug-new-buffer "*SEMANTICDB ADEBUG*" data-debug-insert-stuff-list "*"] 3 (#$ . 1038) nil])
#@37 Run ADEBUG on the current database.
(defalias 'semanticdb-adebug-current-table #[nil "\302\303!\210\304\305!\210\306	\307\")\207" [semanticdb-current-table p require data-debug data-debug-new-buffer "*SEMANTICDB ADEBUG*" data-debug-insert-stuff-list "*"] 3 (#$ . 1327) nil])
#@37 Run ADEBUG on the current database.
(defalias 'semanticdb-adebug-project-database-list #[nil "\301\302!\210\303 \304\305!\210\306\307\")\207" [p require data-debug semanticdb-current-database-list data-debug-new-buffer "*SEMANTICDB ADEBUG*" data-debug-insert-stuff-list "*"] 3 (#$ . 1610) nil])
#@60 Validate that CACHE tags do not have any overlays in them.
(defalias 'semanticdb-table-oob-sanity-check #[(cache) "\205&�\302\303	8)!\203�\304\305\306@!\"\210\307\310@!!\210A\211\204�\311\207" [cache tag semantic-overlay-p 4 message "Tag %s has an erroneous overlay!" semantic-format-tag-summarize semanticdb-table-oob-sanity-check semantic-tag-components-with-overlays nil] 5 (#$ . 1913)])
#@40 Validate the current semanticdb TABLE.
(defalias 'semanticdb-table-sanity-check #[(&optional table) "\204�	\304!\305\n!\211\203�rq\210\306 )\202!�\307\310!!*\207" [table semanticdb-current-table full-filename buff semanticdb-full-filename find-buffer-visiting semantic-sanity-check semanticdb-table-oob-sanity-check semanticdb-get-tags] 4 (#$ . 2319) nil])
#@41 Validate the current semantic database.
(defalias 'semanticdb-database-sanity-check #[nil "\302!\211\205�\303	@!\210	A\211\204�\304)\207" [semanticdb-current-database tables semanticdb-get-database-tables semanticdb-table-sanity-check nil] 3 (#$ . 2691) nil])
(provide 'semantic/db-debug)