Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
ede	[ DIR ]	drwxr-xr-x
semantic	[ DIR ]	drwxr-xr-x
srecode	[ DIR ]	drwxr-xr-x
cedet-cscope.elc	4.4 KB	-rw-r--r--
cedet-files.elc	2.41 KB	-rw-r--r--
cedet-global.elc	5.34 KB	-rw-r--r--
cedet-idutils.elc	5.2 KB	-rw-r--r--
cedet.elc	3.59 KB	-rw-r--r--
data-debug.elc	28.3 KB	-rw-r--r--
ede.elc	45.1 KB	-rw-r--r--
inversion.elc	12.96 KB	-rw-r--r--
mode-local.elc	31.84 KB	-rw-r--r--
pulse.elc	6.62 KB	-rw-r--r--
semantic.elc	45.79 KB	-rw-r--r--
srecode.elc	776 B	-rw-r--r--

Code Editor : cedet-cscope.elc

;ELC���
;;; Compiled
;;; in Emacs version 27.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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

#@37 Minimum version of CScope required.
(defvar cedet-cscope-min-version "15.7" (#$ . 408))
#@41 Command name for the CScope executable.
(custom-declare-variable 'cedet-cscope-command "cscope" '(#$ . 502) :type 'string :group 'cedet)
#@434 Perform a search with CScope, return the created buffer.
SEARCHTEXT is text to find.
TEXTTYPE is the type of text, such as `regexp', `string', `tagname',
`tagregexp', or `tagcompletions'.
TYPE is the type of search, meaning that SEARCHTEXT is compared to
filename, tagname (tags table), references (uses of a tag) , or
symbol (uses of something not in the tag table.)
SCOPE is the scope of the search, such as `project' or `subdir'.
(defalias 'cedet-cscope-search #[(searchtext texttype type scope) "\304=\203\n�\305\202&�	\306\267\202%�\307\202&�\310\202&�\311\n\312Q\307\202&�\313\202&�\314\315\316\317\nF!)\207" [type texttype searchtext idx file "-7" #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (tagname 16 tagregexp 20 tagcompletions 24 regexp 33)) "-1" "-0" "^" ".*" "-5" "-3" cedet-cscope-call "-d" "-L"] 5 (#$ . 646)])
#@121 Create a CScope database at the current directory.
FLAGS are additional flags to pass to cscope beyond the
options -cR.
(defalias 'cedet-cscope-create #[(flags) "\301\302\303C\"!\207" [flags cedet-cscope-call append "-cR"] 4 (#$ . 1525)])
#@37 Call CScope with the list of FLAGS.
(defalias 'cedet-cscope-call #[(flags) "\305\306!r\nq\210	\307 \210)\310\311\312\n\312\f&\210\n*\207" [default-directory cd b cedet-cscope-command flags get-buffer-create "*CEDET CScope*" erase-buffer apply call-process nil] 7 (#$ . 1771)])
#@69 Expand the FILENAME with CScope.
Return a fully qualified filename.
(defalias 'cedet-cscope-expand-filename #[(filename) "r\303\304\305\306F!q\210eb\210\307\310!\203�\311\312!\202�\313\314 \315\316#)\317\320	\"\321\322!\203P�\n\203L�\nG\323U\203@�\324\325\n@\"\210\202P�\324\326\n@\nAG#\210\202P�\311\327!\210\n*\207" [filename ans1 ans2 cedet-cscope-call "-d" "-L" "-7" looking-at "[^ \n]*cscope: " error "CScope not available" split-string buffer-string "\n" t mapcar #[(hit) "\301\302\303\"@!\207" [hit expand-file-name split-string " "] 4] called-interactively-p interactive 1 message "%s" "%s + %d others" "No file found"] 5 (#$ . 2060) "sFile: "])
#@193 Return non-nil if CScope has a support file for DIR.
If DIR is not supplied, use the current default directory.
This works by running cscope on a bogus symbol, and looking for
the error code.
(defalias 'cedet-cscope-support-for-directory #[(&optional dir) "\212\206�	\303\304\305\306\307F!q\210eb\210\310\311!\312\313!\203/�\n\203(�\314\315	\"\2025�\314\316	\"\2025�\n?\2055�\317+\207" [dir default-directory ans cedet-cscope-call "-d" "-L" "-7" "moose" looking-at "[^ \n]*cscope: " called-interactively-p interactive message "No support for CScope in %s" "CScope is supported in %s" t] 5 (#$ . 2727) "DDirectory: "])
#@179 Check the version of the installed CScope command.
If optional programmatic argument NOERROR is non-nil,
then instead of throwing an error if CScope isn't available,
return nil.
(defalias 'cedet-cscope-version-check #[(&optional noerror) "\304\305!\210\3061�\307\310C!0\202�\210\311\311\211\204'�\312\313!\203#�\314\315!\210\311\202Z�r	q\210eb\210\316\317\311\320#\210\321\322!\323\311\n#\203M�?\205Y�\324\325\n#\202Y�\312\313!\203X�\314\326\"\210\320)*\207" [rev b cedet-cscope-min-version noerror require inversion (error) cedet-cscope-call "-V" nil called-interactively-p interactive message "CScope not found." re-search-forward "cscope: version \$[0-9.]+\$" t match-string 1 inversion-check-version error "Version of CScope is %s.  Need at least %s" "CScope %s  - Good enough for CEDET."] 5 (#$ . 3356) nil])
#@126 Create a CScope database in DIR.
CScope will automatically choose incremental rebuild if
there is already a database in DIR.
(defalias 'cedet-cscope-create/update-database #[(&optional dir) "\302\303!)\207" [dir default-directory cedet-cscope-create nil] 2 (#$ . 4188) "DDirectory: "])
(provide 'cedet-cscope)

${this.title}

Code Editor : cedet-cscope.elc