Gecko [ goons4good.org ]

Name	Size	Permission	Date
auto.elc	8.76 KB	-rw-r--r--	2023-06-07 04:12
autoconf-edit.elc	12.02 KB	-rw-r--r--	2023-06-07 04:12
base.elc	16.73 KB	-rw-r--r--	2023-06-07 04:12
cpp-root.elc	10.19 KB	-rw-r--r--	2023-06-07 04:12
custom.elc	5.33 KB	-rw-r--r--	2023-06-07 04:12
dired.elc	3.1 KB	-rw-r--r--	2023-06-07 04:12
emacs.elc	7.95 KB	-rw-r--r--	2023-06-07 04:12
files.elc	13.04 KB	-rw-r--r--	2023-06-07 04:12
generic.elc	12.86 KB	-rw-r--r--	2023-06-07 04:12
linux.elc	8.31 KB	-rw-r--r--	2023-06-07 04:12
loaddefs.el	5.96 KB	-rw-r--r--	2023-06-07 04:00
locate.elc	9.49 KB	-rw-r--r--	2023-06-07 04:12
make.elc	2.5 KB	-rw-r--r--	2023-06-07 04:12
makefile-edit.elc	2.86 KB	-rw-r--r--	2023-06-07 04:12
pconf.elc	5.07 KB	-rw-r--r--	2023-06-07 04:12
pmake.elc	18.3 KB	-rw-r--r--	2023-06-07 04:12
proj-archive.elc	2.24 KB	-rw-r--r--	2023-06-07 04:12
proj-aux.elc	1.38 KB	-rw-r--r--	2023-06-07 04:12
proj-comp.elc	12.02 KB	-rw-r--r--	2023-06-07 04:12
proj-elisp.elc	14.78 KB	-rw-r--r--	2023-06-07 04:12
proj-info.elc	6.03 KB	-rw-r--r--	2023-06-07 04:12
proj-misc.elc	2.53 KB	-rw-r--r--	2023-06-07 04:12
proj-obj.elc	8.4 KB	-rw-r--r--	2023-06-07 04:12
proj-prog.elc	4.64 KB	-rw-r--r--	2023-06-07 04:12
proj-scheme.elc	1.25 KB	-rw-r--r--	2023-06-07 04:12
proj-shared.elc	5.59 KB	-rw-r--r--	2023-06-07 04:12
proj.elc	23.19 KB	-rw-r--r--	2023-06-07 04:12
project-am.elc	30.56 KB	-rw-r--r--	2023-06-07 04:12
shell.elc	1.81 KB	-rw-r--r--	2023-06-07 04:12
simple.elc	3.01 KB	-rw-r--r--	2023-06-07 04:12
source.elc	4.62 KB	-rw-r--r--	2023-06-07 04:12
speedbar.elc	11.33 KB	-rw-r--r--	2023-06-07 04:12
srecode.elc	2.26 KB	-rw-r--r--	2023-06-07 04:12
system.elc	3.09 KB	-rw-r--r--	2023-06-07 04:12
util.elc	2.65 KB	-rw-r--r--	2023-06-07 04:12

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:12:44 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/ede/linux.el
;;; in Emacs version 24.3.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.

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

(byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310\307\301\311\312&	\210\313\314\315\316\307\304\317\320&\210\313\321\322\323\307\304\317\320&\207" [require ede ede/make custom-declare-group project-linux nil "File and tag browser frame." :group tools :version "24.3" custom-declare-variable project-linux-compile-target-command (concat ede-make-command " -k -C %s SUBDIRS=%s") "*Default command used to compile a target." :type string project-linux-compile-project-command (concat ede-make-command " -k -C %s") "*Default command used to compile a project."] 10)
#@57 List of projects created by option `ede-linux-project'.
(defvar ede-linux-project-list nil (#$ . 1131))
#@90 Find a Linux project in the list of Linux projects.
DIR is the directory to search from.
(defalias 'ede-linux-file-existing #[(dir) "\305\211\203'�	\204'�\306\n@!\307\310\311!P\f\"\203�\n@)\nA\211\204�	*\207" [ede-linux-project-list ans projs root dir nil ede-project-root-directory string-match "^" regexp-quote] 5 (#$ . 1241)])
#@33 Get the root directory for DIR.
(defalias 'ede-linux-project-root #[(&optional dir) "\204�	\305\306!\n\203�\307\310\311\n\312\"!!\2023�\313\314\"\2053�\315\211\225O\316\317\320\f\"!\2052�\f)*\207" [dir default-directory proj case-fold-search base t ede-linux-file-existing ede-up-directory file-name-directory eieio-oref :file string-match "linux[^/]*" 0 file-exists-p expand-file-name "scripts/ver_linux"] 5 (#$ . 1586)])
#@50 Find the Linux version for the Linux src in DIR.
(defalias 'ede-linux-version #[(dir) "\306\307!rq\210\310 \210\311	!\312\313\314\315\316$\210eb\210\314\211\211\317\320!\210\321\322!\317\323!\210\321\322!\317\324!\210\321\322!
\325\f\325\260\326!\210-\207" [buff dir default-directory sub minor major get-buffer-create " *linux-query*" erase-buffer file-name-as-directory insert-file-contents "Makefile" nil 0 512 re-search-forward "^VERSION *= *\$[0-9.]+\$" match-string 1 "^PATCHLEVEL *= *\$[0-9.]+\$" "^SUBLEVEL *= *\$[0-9.]+\$" "." kill-buffer] 5 (#$ . 2025)])
(eieio-defclass 'ede-linux-project '(ede-project eieio-instance-tracker) '((tracking-symbol :initform 'ede-linux-project-list)) '("Project Type for the Linux source code." :method-invocation-order :depth-first))
#@183 Return an Linux Project object if there is a match.
Return nil if there isn't one.
Argument DIR is the directory it is created for.
ROOTPROJ is nil, since there is only one project.
(defalias 'ede-linux-load #[(dir &optional rootproj) "\302!\206�\303\304\305\304\306\307!\310\311!\312\313\314\"&	\315	!)\207" [dir proj ede-linux-file-existing ede-linux-project "Linux" :name :version ede-linux-version :directory file-name-as-directory :file expand-file-name "scripts/ver_linux" ede-add-project-to-global-list] 12 (#$ . 2827)])
(byte-code "\300\301\302\303\304\305\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324&\325\"\210\326\327\330\322\331$\210\326\332\333\322\334$\210\335\336\337\336\340\"\"\210\341\336\322\320\342$\210\335\343\337\343\344\"\"\210\341\343\322\320\345$\210\335\346\337\346\347\"\"\210\341\346\322\320\350$\210\335\351\337\351\352\"\"\210\341\351\322\320\353$\207" [ede-add-project-autoload ede-project-autoload "linux" :name "LINUX ROOT" :file ede/linux :proj-file "scripts/ver_linux" :proj-root-dirmatch "linux[^/]*" :proj-root ede-linux-project-root :load-type ede-linux-load :class-sym ede-linux-project :new-p nil :safe-p t unique eieio-defclass ede-linux-target-c (ede-target) ("EDE Linux Project target for C code.\nAll directories need at least one target.") ede-linux-target-misc (ede-target) ("EDE Linux Project target for Misc files.\nAll directories need at least one target.") eieio--defalias initialize-instance eieio--defgeneric-init-form #1="Make sure the targets slot is bound." eieio--defmethod #[(this &rest fields) "\301 \210\302\303\"?\205�\304\305\306#\207" [this call-next-method slot-boundp targets eieio-oset :targets nil] 4 #1#] ede-project-root-directory #2="Return the root for THIS Linux project with file." #[(this &optional file) "\301\302\303\304\"!!\207" [this ede-up-directory file-name-directory eieio-oref file] 5 #2#] ede-project-root #3="Return my root." #[(this) "\207" [this] 1 #3#] ede-find-subproject-for-directory #4="Return PROJ, for handling all subdirs below DIR." #[(proj dir) "\207" [proj] 1 #4#]] 21)
#@69 Find a target that is a CLASS and is in DIR in the list of TARGETS.
(defalias 'ede-linux-find-matching-target #[(class dir targets) "\306	\306\211\203&�@\307\n\f\"\203�\310\n\311\"
\230\203�\nA\211\204\n�*)\207" [match targets T --dolist-tail-- class dir nil object-of-class-p eieio-oref :path] 4 (#$ . 4930)])
(byte-code "\300\301\302\301\303\"\"\210\304\301\305\306\307$\210\300\310\302\310\311\"\"\210\304\310\305\312\313$\207" [eieio--defalias ede-find-target eieio--defgeneric-init-form #1="Find an EDE target in PROJ for BUFFER.\nIf one doesn't exist, create a new one for this directory." eieio--defmethod nil ede-linux-project #[(proj buffer) "\306\307!!\211\204�\310\202�\311\312	\"\203�\313\202�\310\314\304\"
\315\n\f#\211\204H�\316\n\317\320\321!!\322\323\324&\325\326#\210-\207" [buffer ext cls proj targets default-directory file-name-extension buffer-file-name ede-linux-target-misc string-match "c\\|h" ede-linux-target-c eieio-oref ede-linux-find-matching-target make-instance :name file-name-nondirectory directory-file-name :path :source nil object-add-to-list :targets dir ans] 9 #1#] ede-preprocessor-map #2="Get the pre-processor map for Linux C code.\nAll files need the macros from lisp.h!" ede-linux-target-c #[(this) "\306\307!\210\310!\311	!\312\n\313\"\211\205�\314!\205�\315!\316\f\2037�\317\f!\203/�\320\f!\210\321
\322\f\323\"\"
-\207" [this proj root versionfile table filemap require semantic/db ede-target-parent ede-project-root ede-expand-filename "include/linux/version.h" file-exists-p semanticdb-file-table-object (("__KERNEL__" . "")) semanticdb-needs-refresh-p semanticdb-refresh-table append eieio-oref lexical-table] 6 #2#]] 5)
#@70 Return a file name if NAME exists under ROOT with SUBDIR in between.
(defalias 'ede-linux-file-exists-name #[(name root subdir) "\304\304	\n\"\"\305!\205�)\207" [name subdir root F expand-file-name file-exists-p] 5 (#$ . 6656)])
(byte-code "\300\301\302\301\303\"\"\210\304\301\305\306\307$\210\300\310\302\310\311\"\"\210\304\310\305\306\312$\210\300\313\302\313\314\"\"\210\304\313\305\315\316$\210\317\320!\207" [eieio--defalias ede-expand-filename-impl eieio--defgeneric-init-form #1="Within this project PROJ, find the file NAME.\nKnows about how the Linux source tree is organized." eieio--defmethod nil ede-linux-project #[(proj name) "\306!\307\n!\310!	\204�\311\202;�\312\313	\"\203+�\314\f\315#\206;�\314\f\316#\202;�\312\317	\"\203:�\314\f\320#\202;�\311\211\206B�\321 ,\207" [name ext proj root dir F file-name-extension ede-project-root ede-project-root-directory nil string-match "h" ede-linux-file-exists-name "" "include" "txt" "Documentation" call-next-method] 5 #1#] project-compile-project #2="Compile the entire current project.\nArgument COMMAND is the command to use when compiling." #[(proj &optional command) "\305!\306\307!\210\n\204�\f\204�\310\n	\"\307\f!)\207" [proj dir project-linux-compile-project-command compile-command command ede-project-root-directory require compile format] 3 #2#] project-compile-target #3="Compile the current target.\nArgument COMMAND is the command to use for compiling the target." ede-linux-target-c #[(obj &optional command) "\306!\307	!\310\n!\311\312\"\313\314!\210
\204�\204)�\315\f#\314!,\207" [obj proj root dir subdir project-linux-compile-project-command ede-target-parent ede-project-root ede-project-root-directory eieio-oref path require compile format compile-command command project-linux-compile-target-command] 4 #3#] provide ede/linux] 5)