Edit file

File name : db-mode.elc

Content :;ELC��� ;;; Compiled ;;; in Emacs version 26.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/db) #@69 List of hooks and values to add/remove when configuring semanticdb. (defvar semanticdb-hooks '((semanticdb-semantic-init-hook-fcn semantic-init-db-hook) (semanticdb-synchronize-table semantic-after-toplevel-cache-change-hook) (semanticdb-partial-synchronize-table semantic-after-partial-cache-change-hook) (semanticdb-revert-hook before-revert-hook) (semanticdb-kill-hook kill-buffer-hook) (semanticdb-kill-hook change-major-mode-hook) (semanticdb-kill-emacs-hook kill-emacs-hook)) (#$ . 431)) #@54 Return non-nil if `semanticdb-minor-mode' is active. (defalias 'semanticdb-minor-mode-p #[nil "@@@A@J\235\207" [semanticdb-hooks] 2 (#$ . 931)]) #@305 Non-nil if Global Semanticdb minor mode is enabled. See the `global-semanticdb-minor-mode' command for a description of this minor mode. Setting this variable directly does not take effect; either customize it (see the info node `Easy Customization') or call the function `global-semanticdb-minor-mode'. (custom-declare-variable 'global-semanticdb-minor-mode nil '(#$ . 1085) :set 'custom-set-minor-mode :initialize 'custom-initialize-default :group 'semantic :type 'boolean) #@210 Toggle Semantic DB mode. With ARG, turn Semantic DB mode on if ARG is positive, off otherwise. In Semantic DB mode, Semantic parsers store results in a database, which can be saved for future Emacs sessions. (defalias 'global-semanticdb-minor-mode #[(&optional arg) "\306 \307\302 \310=\203�\311\302!?\202�\312 !\313V\"\210\n\203;�\314\211\2037� @\315\fA@\f@\"\210 A\211\204%�*\202V�\314\211\203U� @\316\fA@\f@\"\210 A\211\204C�*\317\320\311\302!\203b�\321\202c�\322\"\210\323\324!\203\220�\325\302!\210\306 \203{�\306 \232\203\220�\326\327\330\311\302!\203\212�\331\202\213�\332#\210))\333 \210\311\302!\207" [#1=#:last-message arg global-semanticdb-minor-mode semanticdb-hooks elt --dolist-tail-- current-message set-default toggle default-value prefix-numeric-value 0 nil add-hook remove-hook run-hooks global-semanticdb-minor-mode-hook global-semanticdb-minor-mode-on-hook global-semanticdb-minor-mode-off-hook called-interactively-p any customize-mark-as-set "" message "Global Semanticdb minor mode %sabled%s" "en" "dis" force-mode-line-update local] 5 (#$ . 1568) (list (or current-prefix-arg 'toggle))]) (defvar global-semanticdb-minor-mode-hook nil) (byte-code "\301\302N\204\f�\303\301\302\304#\210\305\306\307\310\300!\205�\307\211%\210\311\312\301\"\210\311\313\306\"\210\314\315\301\316#\207" [global-semanticdb-minor-mode-map global-semanticdb-minor-mode-hook variable-documentation put "Hook run after entering or leaving `global-semanticdb-minor-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" add-minor-mode global-semanticdb-minor-mode nil boundp defvaralias semanticdb-mode-hook semanticdb-global-mode semantic-varalias-obsolete semanticdb-mode-hooks "23.2"] 6) #@110 Toggle use of the Semantic Database feature. Update the environment of Semantic enabled buffers accordingly. (defalias 'semanticdb-toggle-global-mode #[nil "\300 \203�\301 \210\302\303!\207" [semanticdb-minor-mode-p semanticdb-save-all-db global-semanticdb-minor-mode toggle] 2 (#$ . 3364) nil]) #@80 Function saved in `semantic-init-db-hook'. Sets up the semanticdb environment. (defalias 'semanticdb-semantic-init-hook-fcn #[nil "\306 \205|�\307\306 !\211@A \310\n\304\f#\210\n\310\n\311p#\210\312\n\313\"\203;�\314\n\313\"\203;�\314\n\315\"\2066�\316dU\204@�\317 \202{�\3201N�\321\314\n\322\"!0\202W�\210\323 \210\310\n\322\324#\210\314\n\325\"\211\203k�\326\327!\210\330!\210)\331\314\n\313\"!\210\310\n\332\324#\210\333 +\207" [ans cdb ctbl semanticdb-current-database major-mode semanticdb-current-table buffer-file-name semanticdb-create-table-for-file eieio-oset buffer slot-boundp tags eieio-oref pointmax 0 semantic-clear-toplevel-cache (unbound-slot) semantic-set-unmatched-syntax-cache unmatched-syntax semantic-clear-unmatched-syntax-cache nil lexical-table require semantic/lex-spp semantic-lex-spp-set-dynamic-table semantic--set-buffer-cache dirty semantic--tag-link-cache-to-buffer lt] 5 (#$ . 3667)]) #@216 Hook run before a revert buffer. We can't track incremental changes due to a revert, so just clear the cache. This will prevent the next batch of hooks from wasting time parsing things that don't need to be parsed. (defalias 'semanticdb-revert-hook #[nil "\205� \205�\n\205�\303 \207" [semantic-new-buffer-fcn-was-run semantic--buffer-cache semanticdb-current-table semantic-clear-toplevel-cache] 1 (#$ . 4602)]) #@198 Function run when a buffer is killed. If there is a semantic cache, slurp out the overlays, and store it in our database. If that buffer has no cache, ignore it, we'll handle it later if need be. (defalias 'semanticdb-kill-hook #[nil "\205\\� \205\\�\n\205\\�\305 \210\306=\203*�\307 \210\310\n\311\312#\210\310\n\313\312#\210\310\n\314\315#\207\3161U�\317 \210\310\n\311d#\210\320\321\n!!\310\n\313\322\f8#\210\310\n\314\323\f8#\210\310\n\324\315#)0\207\210\307 \210\325\326!\207" [semantic-new-buffer-fcn-was-run semantic--buffer-cache semanticdb-current-table semantic-parse-tree-state fattr semantic-fetch-tags-fast needs-rebuild semantic-clear-toplevel-cache eieio-oset pointmax 0 fsize lastmodtime nil (error) semantic--tag-unlink-cache-from-buffer file-attributes semanticdb-full-filename 7 5 buffer message "semanticdb: Failed to deoverlay tag cache."] 5 (#$ . 5026)]) #@63 Function called when Emacs is killed. Save all the databases. (defalias 'semanticdb-kill-emacs-hook #[nil "\300 \207" [semanticdb-save-all-db] 1 (#$ . 5913)]) #@74 Function run after parsing. Argument NEW-TABLE is the new table of tags. (defalias 'semanticdb-synchronize-table #[(new-table) "\205�\302 \"\207" [semanticdb-current-table new-table semanticdb-synchronize] 3 (#$ . 6078)]) #@74 Function run after parsing. Argument NEW-TABLE is the new table of tags. (defalias 'semanticdb-partial-synchronize-table #[(new-table) "\205�\302 \"\207" [semanticdb-current-table new-table semanticdb-partial-synchronize] 3 (#$ . 6309)]) (provide 'semantic/db-mode)

Save