403Webshell
Server IP : 217.160.0.212  /  Your IP : 216.73.216.141
Web Server : Apache
System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64
User : sws1073854427 ( 1073854427)
PHP Version : 8.4.23
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /usr/share/emacs/28.2/lisp/cedet/semantic/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/emacs/28.2/lisp/cedet/semantic/db-mode.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(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)) (#$ . 107))
#@54 Return non-nil if `semanticdb-minor-mode' is active.
(defalias 'semanticdb-minor-mode-p #[0 "@@@A@J\235\207" [semanticdb-hooks] 2 (#$ . 607)])
(byte-code "\300\301\302\"\210\300\303\304\"\210\305\304\306\307\310DD\311\312\313\314\315\316\317\320\321&\207" [defvaralias semanticdb-mode-hook global-semanticdb-minor-mode-hook semanticdb-global-mode global-semanticdb-minor-mode custom-declare-variable funcall function #[0 "\300\207" [nil] 1 ""] "Non-nil if Global Semanticdb minor mode is enabled.\nSee the `global-semanticdb-minor-mode' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `global-semanticdb-minor-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean :group semantic] 12)
#@740 Toggle Semantic DB mode.

This is a minor mode.  If called interactively, toggle the `Global
Semanticdb minor mode' mode.  If the prefix argument is positive,
enable the mode, and if it is zero or negative, disable the mode.

If called from Lisp, toggle the mode if ARG is `toggle'.  Enable the
mode if ARG is nil, omitted, or is a positive number.  Disable the
mode if ARG is a negative number.

To check whether the minor mode is enabled in the current buffer,
evaluate `(default-value \='global-semanticdb-minor-mode)'.

The mode's hook is called both when the mode is enabled and when it is
disabled.

In Semantic DB mode, Semantic parsers store results in a
database, which can be saved for future Emacs sessions.

(fn &optional ARG)
(defalias 'global-semanticdb-minor-mode #[256 "\303 \304\301\305=\203\306\301!?\202!\247\203 \307W\203 \310\202!\311\"\210\312\300!\2038\313\301\"\306\301!\2038\301B	\203V\n\211\203R\211@\314A@@\"\210A\266\202\202=\210\202m\n\211\203l\211@\315A@@\"\210A\266\202\202W\210\316\317\306\301!\203y\320\202z\321\"\210\322\323!\203\242\324\301!\210\303 \203\222\211\303 \232\203\242\325\326\306\301!\203\236\327\202\237\330\331#\210\210\332 \210\306\301!\207" [global-minor-modes global-semanticdb-minor-mode semanticdb-hooks current-message set-default toggle default-value 1 nil t boundp delq 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] 7 (#$ . 1472) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar global-semanticdb-minor-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\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.)" custom-type hook standard-value nil add-minor-mode global-semanticdb-minor-mode boundp] 6)
#@110 Toggle use of the Semantic Database feature.
Update the environment of Semantic enabled buffers accordingly.
(defalias 'semanticdb-toggle-global-mode #[0 "\300 \203\301 \210\302\303!\207" [semanticdb-minor-mode-p semanticdb-save-all-db global-semanticdb-minor-mode toggle] 2 (#$ . 3791) nil])
#@80 Function saved in `semantic-init-db-hook'.
Sets up the semanticdb environment.
(defalias 'semanticdb-semantic-init-hook-fcn #[0 "\303 \205v\304\303 !\211@A\305\301	#\210\211\305\306p#\210\307\310\"\2038\311\310\"\2038\311\312\"\2063\313dU\204;\314 \207\3151J\316\311\317\"!0\210\202T\210\320 \210\305\317\321#\210\311\322\"\211\203d\323\324!\210\325!\210\210\326\311\310\"!\210\305\327\321#\210\330 \266\203\207" [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] 7 (#$ . 4092)])
#@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 #[0 "\205	\205\n\205\303 \207" [semantic-new-buffer-fcn-was-run semantic--buffer-cache semanticdb-current-table semantic-clear-toplevel-cache] 1 (#$ . 5006)])
#@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 #[0 "\205b	\205b\n\205b\304 \210\305=\203*\306 \210\307\n\310\311#\210\307\n\312\311#\210\307\n\313\314#\207\3151[\316 \210\307\n\310d#\210\317\320\n!!\307\n\312\3218\262#\210\307\n\313\3228\262#\210\307\n\323\314#\2620\207\210\306 \210\324\325!\207" [semantic-new-buffer-fcn-was-run semantic--buffer-cache semanticdb-current-table semantic-parse-tree-state 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."] 7 (#$ . 5428)])
#@63 Function called when Emacs is killed.
Save all the databases.
(defalias 'semanticdb-kill-emacs-hook #[0 "\300 \207" [semanticdb-save-all-db] 1 (#$ . 6317)])
#@90 Function run after parsing.
Argument NEW-TABLE is the new table of tags.

(fn NEW-TABLE)
(defalias 'semanticdb-synchronize-table #[257 "\205\301\"\207" [semanticdb-current-table semanticdb-synchronize] 4 (#$ . 6480)])
#@90 Function run after parsing.
Argument NEW-TABLE is the new table of tags.

(fn NEW-TABLE)
(defalias 'semanticdb-partial-synchronize-table #[257 "\205\301\"\207" [semanticdb-current-table semanticdb-partial-synchronize] 4 (#$ . 6709)])
(provide 'semantic/db-mode)

Youez - 2016 - github.com/yon3zu
LinuXploit