| 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/ede/ |
Upload File : |
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.
(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\"\210\307\310\311\312!\"\210\307\313\314\312!\"\210\307\315\313\"\210\316\315\317\320#\210\321\312\322\313#\323\312\324\325\326$\207" [require ede/proj ede/pmake ede/pconf autoload semantic-ede-proj-target-grammar "semantic/ede-grammar" defalias ede-proj-target-elisp-p eieio-make-class-predicate ede-proj-target-elisp ede-proj-target-elisp--eieio-childp eieio-make-child-predicate ede-proj-target-elisp-child-p make-obsolete "use (cl-typep ... \\='ede-proj-target-elisp) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (ede-proj-target-makefile) ((menu :initform nil) (keybindings :initform nil) (phony :initform t) (sourcetype :initform '(ede-source-emacs)) (availablecompilers :initform '(ede-emacs-compiler)) (aux-packages :initarg :aux-packages :initform nil :type list :custom (repeat string) :documentation "Additional packages needed.\nThere should only be one toplevel package per auxiliary tool needed.\nThese packages location is found, and added to the compile time\nload path.") (pre-load-packages :initarg :pre-load-packages :initform nil :type list :custom (repeat string) :documentation "Additional packages to pre-load.\nEach package name will be loaded with `require'.\nEach package's directory should also appear in :aux-packages via a package name.")) (:documentation "This target consists of a group of Lisp files.\nA Lisp target may be one general program with many separate Lisp files in it.")] 6)
#@78 Create a new object of class type `ede-proj-target-elisp'.
(fn &rest SLOTS)
(defalias 'ede-proj-target-elisp #[128 "\300\301\302#\207" [apply make-instance ede-proj-target-elisp] 5 (#$ . 1601)])
(byte-code "\300\301\302\303#\300\207" [function-put ede-proj-target-elisp compiler-macro ede-proj-target-elisp--anon-cmacro] 4)
#@26
(fn WHOLE &rest SLOTS)
(defalias 'ede-proj-target-elisp--anon-cmacro #[385 "\211@;\204 \207\300\301\302@@#@\303@DABB\"\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity] 7 (#$ . 1933)])
(byte-code "\300\301\302\303\304\305%\210\300\306\304\307\304\310%\207" [cl-generic-define-method ede-proj-makefile-insert-rules (:after) ((this ede-proj-target-elisp)) nil #[257 "\300\301\"\211\203 \302\303\300\304\"\305\306\307##c\210\210\310c\207" [eieio-oref pre-load-packages format "%s: PRELOADS=%s\n" name mapconcat identity " " "\n"] 9 "Insert rules needed by THIS target.\nThis inserts the PRELOADS target-local variable.\n\n(fn THIS)"] ede-proj-makefile-dependencies ((this ede-proj-target-elisp)) #[257 "\300\301\302!\"\207" [format "$(addsuffix c, $(%s))" ede-proj-makefile-sourcevar] 5 "Return a string representing the dependencies for THIS.\nSome compilers only use the first element in the dependencies, others\nhave a list of intermediates (object files), and others don't care.\nThis allows customization of how these elements appear.\nFor Emacs Lisp, return addsuffix command on source files.\n\n(fn THIS)"]] 6)
#@36 Emacs Lisp source code definition.
(defvar ede-source-emacs (ede-sourcecode :name "Emacs Lisp" :sourcepattern "\\.el$" :garbagepattern '("*.elc")) (#$ . 3108))
#@30 Compile Emacs Lisp programs.
(defvar ede-emacs-compiler (byte-code "\300\301\302\303\304\305\306\307\310\311\312\305\313&C\314\315\316\317\320\321&\f\207" [ede-compiler :name "emacs" :variables (("EMACS" . "emacs") ("EMACSFLAGS" . "-batch --no-site-file --eval '(setq debug-on-error t)'") ("require" . "$(foreach r,$(1),(require (quote $(r))))")) :rules ede-makefile-rule :target "%.elc" :dependencies "%.el" ("$(EMACS) $(EMACSFLAGS) $(addprefix -L ,$(LOADPATH)) --eval '(progn $(call require, $(PRELOADS)))' -f batch-byte-compile $^") :autoconf ("AM_PATH_LISPDIR") :sourcetype (ede-source-emacs) :objectextention ".elc"] 13) (#$ . 3274))
#@42 Compile Emacs Lisp programs with XEmacs.
(defvar ede-xemacs-compiler (clone ede-emacs-compiler :name "xemacs" :variables '(("EMACS" . "xemacs"))) (#$ . 3920))
(byte-code "\300\301\302\303#\210\304\305\306\307\310\311%\207" [make-obsolete-variable ede-xemacs-compiler ede-emacs-compiler "28.1" cl-generic-define-method ede-buffer-mine nil ((this ede-proj-target-elisp) buffer) t #[771 "\300\301\302!\"\203 \303\302!!\304P\211\305\306\"\235\207 \207" [string-match "\\.elc$" buffer-file-name file-name-sans-extension ".el" eieio-oref auxsource] 8 "Return t if object THIS lays claim to the file in BUFFER.\nLays claim to all .elc files that match .el files in this target.\n\n(fn CL--CNM THIS BUFFER)"]] 6)
#@68 Convert a list of PACKAGES, to a list of load path.
(fn PACKAGES)
(defalias 'ede-proj-elisp-packages-to-loadpath #[257 "\300\211\2039 \301@!\211\262\204 \302\303@\"\210\304!\305!\300\306\307\"\203'