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-files.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.

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

#@238 Convert the REFERENCEDIR (a full path name) into a filename.
Convert directory separation characters into ! characters.
Optional argument TESTMODE is used by tests to avoid conversion
to the file's truename, and dodging platform tricks.
(defalias 'cedet-directory-name-to-file-name #[(referencedir &optional testmode) "\n\204\n�\304	!\305	!\203�\306	!\307>\204�\n\203J�\n\204(�\310\311	!!	\312H\313=\203J�\314\315	\316H\227!	\317H\320=\203C�\321\202D�\322\323	\317\"R\324\320\325\326\327\330	##\211)\207" [referencedir file testmode system-type file-truename file-directory-p file-name-as-directory (windows-nt ms-dos) expand-file-name convert-standard-filename 1 58 "/drive_" char-to-string 0 2 47 "" "/" substring subst-char-in-string 33 replace-regexp-in-string "!" "!!"] 8 (#$ . 409)])
#@222 Reverse the process of `cedet-directory-name-to-file-name'.
Convert REFERENCEFILE to a directory name replacing ! with /.
Optional TESTMODE is used in tests to avoid doing some platform
specific conversions during tests.
(defalias 'cedet-file-name-to-directory-name #[(referencefile &optional testmode) "\305\306\307	#\310\311\312	#\n\313>\204�\203<�\314\315	\"\203.�\316\317	\"\211\320\321	\317\225\"Q)\314\322	\"\203<�\311\321	\317\"P	)\207" [referencefile file system-type testmode driveletter subst-char-in-string 33 47 replace-regexp-in-string "//" "!" (windows-nt ms-dos) string-match "^/drive_\$[a-z]\$/" match-string 1 ":" substring "^!"] 6 (#$ . 1216)])
#@60 Return list of files in directory matching to given regex.
(defalias 'cedet-files-list-recursively #[(dir re) "\306!\205a�\307\310\"\311\211\311\211\203]�\f@\312!\211\313\230\204U�
\314\230\204U�\315!\203=�\316
\"\203=�	B\202U�\317!\203U�\320\"\211\203T�\321	\"))\fA\211\204�\311	,\207" [dir matched files file --dolist-tail-- fname file-accessible-directory-p directory-files t nil file-name-nondirectory "." ".." file-regular-p string-match file-directory-p cedet-files-list-recursively append re tfiles] 4 (#$ . 1896)])
(provide 'cedet-files)

${this.title}

Code Editor : cedet-files.elc