One Hat Cyber Team

Your IP : 18.116.100.138
Server IP : 192.185.194.254
Server : Linux raider.websitewelcome.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
Server Software : Apache
PHP Version : 7.4.33
Buat File | Buat Folder
Dir : ~/usr/share/emacs/24.3/lisp/cedet/ede/
View File Name : simple.elc

;ELC���
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:11:09 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/ede/simple.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\311\312\313\314\315\316\317\320\321\322&
\323#\210\324\325\326\327\330\301\331\332&\210\324\333\334\335\330\301\331\336&\207" [require ede cedet-files add-to-list ede-project-class-files ede-project-autoload "simple-overlay" :name "Simple" :file ede/simple :proj-file ede-simple-projectfile-for-dir :load-type ede-simple-load :class-sym ede-simple-project :safe-p nil t custom-declare-variable ede-simple-save-directory "~/.ede" "*Directory where simple EDE project overlays are saved." :group :type directory ede-simple-save-file-name "ProjSimple.ede" "*File name used for simple project wrappers." string] 16)
#@160 Return a full file name to the project file stored in the current directory.
The directory has three parts:
  <STORAGE ROOT>/<PROJ DIR AS FILE>/ProjSimple.ede
(defalias 'ede-simple-projectfile-for-dir #[(&optional dir) "\206�	\305\306!!\307\n!\fQ)\207" [dir default-directory d ede-simple-save-directory ede-simple-save-file-name file-name-as-directory expand-file-name cedet-directory-name-to-file-name] 3 (#$ . 1237)])
#@157 Load a project of type `Simple' for the directory DIR.
Return nil if there isn't one.
ROOTPROJ is nil, since we will only create a single EDE project here.
(defalias 'ede-simple-load #[(dir &optional rootproj) "\303!\304\211\203�\305\n!\306	\307#\210	*\207" [dir obj pf ede-simple-projectfile-for-dir nil eieio-persistent-read eieio-oset :directory] 5 (#$ . 1669)])
(byte-code "\300\301\302\303\304$\210\300\305\306\307\310$\210\311\312\313\312\314\"\"\210\315\312\303\305\316$\210\311\317\313\317\320\"\"\210\315\317\303\305\321$\210\322\323!\207" [eieio-defclass ede-simple-target (ede-target) nil ("EDE Simple project target.\nAll directories need at least one target.") ede-simple-project (ede-project eieio-persistent) ((extension :initform ".ede") (file-header-line :initform ";; EDE Simple Project")) ("EDE Simple project class.\nEach directory needs a project file to control it.") eieio--defalias ede-commit-project eieio--defgeneric-init-form #1="Commit any change to PROJ to its file." eieio--defmethod #[(proj) "\302!\204�\303\304P!\203�\305!\210\202�\306\307!\210\310	!\207" [ede-simple-save-directory proj file-exists-p y-or-n-p " doesn't exist.  Create? " make-directory error "No save directory for new project" eieio-persistent-save] 3 #1#] ede-find-subproject-for-directory #2="Return PROJ, for handling all subdirs below DIR." #[(proj dir) "\207" [proj] 1 #2#] provide ede/simple] 5)