Current File : //proc/self/root/kunden/proc/thread-self/root/usr/share/emacs/27.2/lisp/cedet/semantic/db-debug.elc

;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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 (#$ . 513) 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 (#$ . 880) 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 (#$ . 1168) 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 (#$ . 1451) 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 overlayp 4 message "Tag %s has an erroneous overlay!" semantic-format-tag-summarize semanticdb-table-oob-sanity-check semantic-tag-components-with-overlays nil] 5 (#$ . 1754)])
#@40 Validate the current semanticdb TABLE.
(defalias 'semanticdb-table-sanity-check #[(&optional table) "\204	\304!\305\n!\211\203rq\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 (#$ . 2150) 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 (#$ . 2522) nil])
(provide 'semantic/db-debug)