WWWWWW

Current Directory: /usr/share/emacs/24.3/lisp/cedet/ede
Viewing File: /usr/share/emacs/24.3/lisp/cedet/ede/cpp-root.elc
;ELC
;;; Compiled by mockbuild@buildfarm01-new.corp.cloudlinux.com on Tue Nov 11 12:56:30 2025
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cedet/ede/cpp-root.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.

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


(require 'ede)
#@60 List of projects created by option `ede-cpp-root-project'.
(defvar ede-cpp-root-project-list nil (#$ . 576))
#@96 Find a cpp-root project in the list of cpp-root projects.
DIR is the directory to search from.
(defalias 'ede-cpp-root-file-existing #[(dir) "\305\211\203'	\204'\306\n@!\307\310\311!P\f\"\203\n@)\nA\211\204	*\207" [ede-cpp-root-project-list ans projs root dir nil ede-project-root-directory string-match "^" regexp-quote] 5 (#$ . 691)])
#@60 Return a full file name to the project file stored in DIR.
(defalias 'ede-cpp-root-project-file-for-dir #[(&optional dir) "\302!\211\205\f\303	\304\")\207" [dir proj ede-cpp-root-file-existing eieio-oref :file] 4 (#$ . 1047)])
#@142 Count number of hits to the cpp root thing.
This is a debugging variable to test various optimizations in file
lookup in the main EDE logic.
(defvar ede-cpp-root-count 0 (#$ . 1284))
#@33 Get the root directory for DIR.
(defalias 'ede-cpp-root-project-root #[(&optional dir) "\304\206	!T\n\205\305\n!)\207" [dir default-directory projfile ede-cpp-root-count ede-cpp-root-project-file-for-dir file-name-directory] 2 (#$ . 1473)])
#@176 Return a CPP root object if you created one.
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-cpp-root-load #[(dir &optional rootproj) "\301!\207" [dir ede-cpp-root-file-existing] 2 (#$ . 1729)])
(byte-code "\300\301\302\303\304\305\306\307\310\311\312\313\314\315\306\316\317\320\321&\322\"\210\323\324\325\317\326$\210\323\327\330\331\332$\210\333\334\335\334\336\"\"\210\337\334\317\327\340$\210\333\341\335\341\342\"\"\210\337\341\317\327\343$\210\333\344\335\344\345\"\"\210\337\344\317\327\346$\210\333\347\335\347\350\"\"\210\337\347\317\327\351$\210\333\352\335\352\353\"\"\210\337\352\317\327\354$\210\333\355\335\355\353\"\"\210\337\355\317\327\356$\210\333\357\335\357\360\"\"\210\337\357\317\327\361$\210\333\362\335\362\363\"\"\210\337\362\317\327\364$\210\333\365\335\365\366\"\"\210\337\365\317\327\367$\210\333\370\335\370\371\"\"\210\337\370\317\327\372$\210\333\373\335\373\374\"\"\210\337\373\317\327\375$\210\333\370\335\370\376\"\"\210\337\370\317\324\377$\210\333\373\335\373\374\"\"\210\337\373\317\324\201@$\207" [ede-add-project-autoload ede-project-autoload "cpp-root" :name "CPP ROOT" :file ede-cpp-root :proj-file ede-cpp-root-project-file-for-dir :proj-root ede-cpp-root-project-root :load-type ede-cpp-root-load :class-sym :new-p nil :safe-p t unique eieio-defclass ede-cpp-root-target (ede-target) ("EDE cpp-root project target.\nAll directories need at least one target.") ede-cpp-root-project (ede-project eieio-instance-tracker) ((tracking-symbol :initform 'ede-cpp-root-project-list) (include-path :initarg :include-path :initform '("/include" "../include/") :type list :documentation "The default locate function expands filenames within a project.\nIf a header file (.h, .hh, etc) name is expanded, and\nthe :locate-fcn slot is nil, then the include path is checked\nfirst, and other directories are ignored.  For very large\nprojects, this optimization can save a lot of time.\n\nDirectory names in the path can be relative to the current\nbuffer's `default-directory' (not starting with a /).  Directories\nthat are relative to the project's root should start with a /, such\nas  \"/include\", meaning the directory `include' off the project root\ndirectory.") (system-include-path :initarg :system-include-path :initform nil :type list :documentation "The system include path for files in this project.\nC files initialized in an ede-cpp-root-project have their semantic\nsystem include path set to this value.  If this is nil, then the\nsemantic path is not modified.") (spp-table :initarg :spp-table :initform nil :type list :documentation "C Preprocessor macros for your files.\nPreprocessor symbols will be used while parsing your files.\nThese macros might be passed in through the command line compiler, or\nare critical symbols derived from header files.  Providing header files\nmacro values through this slot improves accuracy and performance.\nUse `:spp-files' to use these files directly.") (spp-files :initarg :spp-files :initform nil :type list :documentation "C header file with Preprocessor macros for your files.\nThe PreProcessor symbols appearing in these files will be used while\nparsing files in this project.\nSee `semantic-lex-c-preprocessor-symbol-map' for more on how this works.") (header-match-regexp :initarg :header-match-regexp :initform "\\.\\(h\\(h\\|xx\\|pp\\|\\+\\+\\)?\\|H\\)$\\|\\<\\w+$" :type string :documentation "Regexp used to identify C/C++ header files.") (locate-fcn :initarg :locate-fcn :initform nil :type (or null function) :documentation "The locate function can be used in place of\n`ede-expand-filename' so you can quickly customize your custom target\nto use specialized local routines instead of the EDE routines.\nThe function symbol must take two arguments:\n  NAME - The name of the file to find.\n  DIR - The directory root for this cpp-root project.\n\nIt should return the fully qualified file name passed in from NAME.  If that file does not\nexist, it should return nil.")) ("EDE cpp-root project class.\nEach directory needs a project file to control it.") eieio--defalias initialize-instance eieio--defgeneric-init-form #1="Make sure the :file is fully expanded." eieio--defmethod #[(this &rest fields) "\303 \210\304\305\306\"!\307\310	!\311\312#\211\203 \n=\204 \313\n!\210)\314	!\203-\315	!\2035\313!\210\316\317!\210\320\306	#\210\320\311\310	!#\210\321\310	!!\210\322!\210\323\324\"?\205Z\320\325\326#)\207" [this f old call-next-method expand-file-name eieio-oref :file eieio-instance-tracker-find file-name-directory :directory ede-cpp-root-project-list delete-instance file-exists-p file-directory-p error ":file for ede-cpp-root must be a file" eieio-oset ede-project-directory-remove-hash ede-add-project-to-global-list slot-boundp targets :targets nil] 6 #1#] ede-find-subproject-for-directory #2="Return PROJ, for handling all subdirs below DIR." #[(proj dir) "\207" [proj] 1 #2#] ede-find-target #3="Find an EDE target in PROJ for BUFFER.\nIf one doesn't exist, create a new one for this directory." #[(proj buffer) "\305\301\"\n\306\307	#\211\204&\310\311\312\313!!\307\314\315&\316\317\f#\210\f+\207" [proj targets default-directory dir ans eieio-oref object-assoc :path ede-cpp-root-target :name file-name-nondirectory directory-file-name :source nil object-add-to-list :targets] 9 #3#] ede-expand-filename-impl #4="Within this project PROJ, find the file NAME.\nThis knows details about or source tree." #[(proj name) "\306 \211\204W\307	\310\"\311\307	\312\"!\n\203\n\f\"\202V\313	\f\"\203S\307	\314\"\315\211\203O\316	@\"\317\f
\"\320
!\203F
A\211\2042*\202V\306 *\206]\306 )\207" [ans proj lf dir name tmp call-next-method eieio-oref locate-fcn file-name-directory file ede-cpp-root-header-file-p include-path nil ede-cpp-root-translate-file expand-file-name file-exists-p ip] 5 #4#] ede-project-root #5="Return my root." #[(this) "\207" [this] 1 #5#] ede-project-root-directory #[(this) "\301\302\303\"!\207" [this file-name-directory eieio-oref file] 4 "Return my root."] ede-cpp-root-header-file-p #6="Non nil if in PROJ the filename NAME is a header." #[(proj name) "\303 \304\216\305\306	\307\"\n\"*\207" [save-match-data-internal proj name match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) string-match eieio-oref header-match-regexp] 4 #6#] ede-cpp-root-translate-file #7="For PROJ, translate a user specified FILENAME.\nThis is for project include paths and spp source files." #[(proj filename) "\303\304\305\"!\n\306\230\204 \n\307H\310U\203 \311\n\312\313O	\"\202$\311\n!\n)\207" [proj dir filename file-name-directory eieio-oref file "" 0 47 expand-file-name 1 nil] 4 #7#] ede-set-project-variables #8="Set variables local to PROJECT in BUFFER.\nAlso set up the lexical preprocessor map." #[(project &optional buffer) "\302 \210\303\304!\205\303\305!\205\306\307\310\"!\211\207" [project semantic-lex-spp-project-macro-symbol-obarray call-next-method featurep semantic/bovine/c semantic/lex-spp semantic-lex-make-spp-table eieio-oref spp-table] 4 #8#] ede-system-include-path #9="Get the system include path used by project THIS." #[(this) "\301\302\"\207" [this eieio-oref system-include-path] 3 #9#] ede-preprocessor-map #10="Get the pre-processor map for project THIS." #[(this) "\303\304!\210\305\306\"\307!\310\311\305\312\"\"\210\n*\207" [this root spp require semantic/db eieio-oref spp-table ede-project-root mapc #[(F) "\305	\"\211\205\f\306\n!\211\204\307\310	\"\202+\311!\203\"\312!\210\313\f\314\315\"\"\211*\207" [root F expfile table spp ede-expand-filename semanticdb-file-table-object message "Cannot find file %s in project." semanticdb-needs-refresh-p semanticdb-refresh-table append eieio-oref lexical-table] 6] spp-files] 5 #10#] #11="Get the system include path used by target THIS." #[(this) "\301\302!!\207" [this ede-system-include-path ede-target-parent] 3 #11#] #[(this) "\301\302!!\207" [this ede-preprocessor-map ede-target-parent] 3 "Get the pre-processor map for project THIS."]] 19)
#@226 Create a bunch of projects under directory DIR.
PROJFILE is a file name sans directory that indicates a subdirectory
is a project directory.
Generic ATTRIBUTES, such as :include-path can be added.
Note: This needs some work.
(defalias 'ede-create-lots-of-projects-under-dir #[(dir projfile &rest attributes) "\305\306\"\211\307\211\205@\310\311\f\n\"!\210A\211\204
\307+\207" [dir files F --dolist-tail-- projfile directory-files t nil file-exists-p expand-file-name] 5 (#$ . 9922)])
(provide 'ede/cpp-root)
F1l3 Manager
