;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/project-am.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\300\303!\210\300\304!\210\300\305!\210\300\306!\210\307\310\311\312\313\314\313\302&\210\315\316\311\317\313\310\320\321&\210\315\322\323\317\313\310\320\321&\210\315\324\325\326\313\310\320\327&\207" [require make-mode ede ede/make ede/makefile-edit semantic/find ede/autoconf-edit custom-declare-group project-am nil "File and tag browser frame." :group tools custom-declare-variable project-am-compile-project-command "*Default command used to compile a project." :type string project-am-compile-target-command (concat ede-make-command " -k %s") project-am-debug-target-function 'gdb "*Default Emacs command used to debug a target." sexp] 8)
#@442 Alist of type names and the type of object to create for them.
Each entry is of the form:
  (EMACSNAME CLASS AUTOMAKEVAR INDIRECT)
where EMACSNAME is a name for Emacs to use.
CLASS is the EDE target class to represent the target.
AUTOMAKEVAR is the Automake variable to identify.  This cannot be a
   regular expression.
INDIRECT is optional.  If it is non-nil, then the variable in
question lists other variables that need to be looked up.
(defconst project-am-type-alist '(("bin" project-am-program "bin_PROGRAMS" t) ("sbin" project-am-program "sbin_PROGRAMS" t) ("noinstbin" project-am-program "noinst_PROGRAMS" t) ("checkbin" project-am-program "check_PROGRAMS" t) ("lib" project-am-lib "lib_LIBS" t) ("libraries" project-am-lib "lib_LIBRARIES" t) ("librariesnoinst" project-am-lib "noinst_LIBRARIES" t) ("pkglibraries" project-am-lib "pkglib_LIBRARIES" t) ("checklibs" project-am-lib "check_LIBRARIES" t) ("ltlibraries" project-am-lib "lib_LTLIBRARIES" t) ("ltlibrariesnoinst" project-am-lib "noinst_LTLIBRARIES" t) ("pkgltlibraries" project-am-lib "pkglib_LTLIBRARIES" t) ("checkltlibs" project-am-lib "check_LTLIBRARIES" t) ("headernoinst" project-am-header-noinst "noinst_HEADERS") ("headerinst" project-am-header-inst "include_HEADERS") ("headerpkg" project-am-header-pkg "pkginclude_HEADERS") ("headerpkg" project-am-header-chk "check_HEADERS") ("texinfo" project-am-texinfo "info_TEXINFOS" t) ("man" project-am-man "man_MANS") ("lisp" project-am-lisp "lisp_LISP") ("extrabin" project-am-program "EXTRA_PROGRAMS" t) ("builtsrcs" project-am-built-src "BUILT_SOURCES") ("extradist" project-am-extra-dist "EXTRA_DIST")) (#$ . 1252))
#@307 Alist of meta-target type, each entry has form:
     (CLASS REGEXPVAR INDIRECT)
where CLASS is the EDE target class for target.
REGEXPVAR is the regexp used in `semantic-find-tags-by-name-regexp'.
INDIRECT is optional. If it is non-nil, then the variable in it have
other meta-variable based on this name.
(defconst project-am-meta-type-alist '((project-am-program "_PROGRAMS$" t) (project-am-lib "_\\(LIBS\\|LIBRARIES\\|LTLIBRARIES\\)$" t) (project-am-man "_\\(DATA\\|HEADERS\\|PYTHON\\|JAVA\\|SCRIPTS\\|MANS\\|TEXINFOS\\)$" nil)) (#$ . 2899))
(byte-code "\300\301\302\303\304$\210\300\305\306\307\310$\210\300\311\312\313\314$\210\300\315\316\303\317$\210\300\320\321\303\322$\210\300\323\324\303\325$\210\300\326\327\303\330$\210\300\331\332\303\333$\210\300\334\335\303\336$\210\300\337\340\303\341$\210\300\342\343\344\345$\210\300\346\347\303\350$\210\300\351\352\303\353$\210\300\354\355\303\356$\210\300\357\360\361\362$\210\363\364\365\364\366\"\"\210\367\364\303\301\370$\210\363\371\365\371\372\"\"\210\367\371\303\301\373$\210\363\374\365\374\375\"\"\210\367\374\303\301\376$\210\363\377\365\377\201@\"\"\210\367\377\303\357\201A$\210\363\201B\365\201B\201C\"\"\210\367\201B\303\301\201D$\210\363\201B\365\201B\201C\"\"\210\367\201B\303\357\201E$\210\363\201F\365\201F\201G\"\"\210\367\201F\303\301\201H$\210\363\201I\365\201I\201J\"\"\210\367\201I\303\305\201K$\210\363\201L\365\201L\201M\"\"\210\367\201L\303\305\201N$\210\363\201O\365\201O\201P\"\"\210\367\201O\303\301\201Q$\207" [eieio-defclass project-am-target (ede-target) nil ("Base target class for everything in project-am.") project-am-objectcode (project-am-target) ((source :initarg :source :documentation "List of source files.")) ("A target which creates object code, like a C program or library.") project-am-program (project-am-objectcode) ((ldadd :initarg :ldadd :documentation "Additional LD args." :initform nil)) ("A top level program to build") project-am-header (project-am-target) ("A group of misc source files, such as headers.") project-am-header-noinst (project-am-header) ("A group of header files that are not installed.") project-am-header-inst (project-am-header) ("A group of header files that are not installed.") project-am-header-pkg (project-am-header) ("A group of header files that are not installed.") project-am-header-chk (project-am-header) ("A group of header files that are not installed.") project-am-lib (project-am-objectcode) ("A top level library to build") project-am-lisp (project-am-target) ("A group of Emacs Lisp programs to byte compile.") project-am-texinfo (project-am-target) ((include :initarg :include :initform nil :documentation "Additional texinfo included in this one.")) ("A top level texinfo file to build.") project-am-man (project-am-target) ("A top level man file to build.") project-am-built-src (project-am-target) ("A group of Emacs Lisp programs to byte compile.") project-am-extra-dist (project-am-target) ("A group of Emacs Lisp programs to byte compile.") project-am-makefile (ede-project) ((targets :initarg :targets :initform nil :documentation "Top level targets in this makefile.") (configureoutputfiles :initform nil :documentation "List of files output from configure system.")) ("Encode one makefile.") eieio--defalias project-add-file eieio--defgeneric-init-form #2="Add the current buffer into a project.\nOT is the object target.  DIR is the directory to start in." eieio--defmethod #[(ot) "\203\n\306\307!\202#\310	!\211\204\306\311!\210\312\313\314\315\316\n\317\"\"\320\321$)\322\f!\323\315\316\n\317\"#\324\325 !\f\204B\326\327\325 !\"\330 '\331\216\332\f(\"\203V\322\f!\202W\f)\333\316)\334\"!\211*\204q\335\316)\334\"!\210\202v\336*!\210\337\340\f!!\210\341 \210\342
\261\210\343\320!\210\344\f!\210\345 \210*\204\230\346p!\210,\f\211,\207" [ede-object default-directory amf target ot ofn error "Already associated w/ a target" project-am-load "No project file" completing-read "Target: " object-assoc-list name eieio-oref targets nil t ede-target-parent object-assoc file-name-nondirectory buffer-file-name project-new-target project-am-preferred-target-type current-window-configuration ((set-window-configuration #1=#:wconfig)) obj-of-class-p get-file-buffer file find-file switch-to-buffer makefile-move-to-macro project-am-macro makefile-end-of-command " " makefile-fill-paragraph project-rescan save-buffer kill-buffer #1# ede-target pf dbka] 8 #2#] project-remove-file #4="Remove the current buffer from any project targets." #[(ot fnnd) "\306 \307\216\310	\n\"\203\311	!\202	\312\313\314\"!\211\204)\315\313\314\"!\210\202-\316\f!\210\317\320	!!\210\321\322\323\324
!!P!\210\325\326\327\211\330\331%\210\332\330!\210\333	!\210\334 \210\f\204X\335p!\210,\330\211\207" [#3=#:wconfig ot ede-target pf dbka fnnd current-window-configuration ((set-window-configuration #3#)) obj-of-class-p ede-target-parent get-file-buffer eieio-oref file find-file switch-to-buffer makefile-move-to-macro project-am-macro makefile-navigate-macro " *" regexp-quote ede-name replace-match #6="" t nil 0 makefile-fill-paragraph project-rescan save-buffer kill-buffer ede-object] 7 #4#] project-edit-file-target #5="Edit the target associated w/ this file." #[(obj) "\301\302\303\"\304P!\210eb\210\305\306!!\210e`U\205\307\310!!\207" [obj find-file eieio-oref path "Makefile.am" makefile-move-to-macro project-am-macro re-search-forward ede-target-name] 4 #5#] project-new-target #8="Create a new target named NAME.\nArgument TYPE is the type of target to insert.  This is a string\nmatching something in `project-am-type-alist' or type class symbol.\nDespite the fact that this is a method, it depends on the current\nbuffer being in order to provide a smart default target type." #[(proj &optional name type) "\206\306\307\310\"	\2062\311\312\n\313\314\315=\203\316\2021\317=\203&\320\2021\321=\2030\322\2021\323%\324	\n\"\313\fA@\325\326\3271!%\211\204P\330\331\f\"\210\332 2\333\216\334
3\"\203d\335
!\202e
4\336\3374\340\"!\2115\204\341\3374\340\"!\210\202\204\3425!\210eb\210\343 \210`eU\203\226db\210\202\237\344 \210\345c\210\346u\210\347
!\203\253\350\347
!!\210eb\210\351\fAA@!\210`eU\203\324\3526\313\314#\203\315\346y\210\313\210\345c\210\350\fAA@!\210\353 \210\354\355
!\261\210\356 \210\3577!\2105?\205\357\360p!.\207" [name type project-am-type-alist major-mode ntype ot read-string "Name: " #6# completing-read "Type: " nil t texinfo-mode "texinfo" nroff-mode "man" emacs-lisp-mode "lisp" "bin" assoc :name :path expand-file-name error "Error creating target object %S" current-window-configuration ((set-window-configuration #7=#:wconfig)) obj-of-class-p ede-target-parent get-file-buffer eieio-oref file find-file switch-to-buffer makefile-next-dependency beginning-of-line "\n" -1 project-am-macro makefile-insert-macro makefile-move-to-macro re-search-forward makefile-end-of-command " " ede-target-name save-buffer project-rescan kill-buffer default-directory #7# ede-target pf dbka makefile-macroassign-regex ede-object] 8 #8#] project-compile-project #9="Compile the entire current project.\nArgument COMMAND is the command to use when compiling." #[(obj &optional command) "\306\307!\210\204\"	\204\n\204\f\203 \310\311	\312\211\313%\202!	\314
!\307!)\207" [command project-am-compile-project-command compile-command compilation-read-command current-prefix-arg default-directory require compile read-from-minibuffer "Project compile command: " nil (compile-history . 1) project-am-find-topmost-level] 6 #9#] #[(obj &optional command) "\306\307!\210\204\"	\204\n\204\f\203 \310\311	\312\211\313%\202!	\314
!\307!)\207" [command project-am-compile-project-command compile-command compilation-read-command current-prefix-arg default-directory require compile read-from-minibuffer "Project compile command: " nil (compile-history . 1) project-am-find-topmost-level] 6 "Compile the entire current project.\nArgument COMMAND is the command to use when compiling."] project-compile-target #10="Compile the current target.\nArgument COMMAND is the command to use for compiling the target." #[(obj &optional command) "\306\307!\210\204\n	\n\2048\203)\310\311\f\203!\312
\313\f!\"\202\"
\314\211\315%\2027\f\2031\2027\312
\313\f!\"\307\n!\207" [project-am-compile-project-command compile-command command compilation-read-command ede-object project-am-compile-target-command require compile read-from-minibuffer "Project compile command: " format project-compile-target-command nil (compile-history . 1)] 6 #10#] project-debug-target #11="Run the current project target in a debugger." #[(obj) "\306\307!\310\311\"\312\313\216\314\315!\210q\210\n\316\317\320
!\321\322!Q\"
	!,\207" [obj cmd dd tb default-directory project-am-debug-target-function get-buffer-create " *padt*" eieio-oref path nil ((kill-buffer tb)) require ede/shell read-from-minibuffer "Run (like this): " symbol-name " " ede-target-name] 6 #11#] project-run-target #12="Run the current project target in comint buffer." #[(obj) "\305\306!\210\307\310!\311\312\"\313\314\216q\210\n\315\316\317!\260
\"\320	\",\207" [obj cmd dd tb default-directory require ede/shell get-buffer-create " *padt*" eieio-oref path nil ((kill-buffer tb)) read-from-minibuffer "Run (like this): " ede-target-name ede-shell-run-something] 4 #12#] project-make-dist #13="Run the current project in the debugger." #[(this) "\303\304!\210\204\n	\305\n\306P\"\207" [project-am-compile-project-command compile-command this require compile project-compile-project " dist"] 4 #13#]] 5)
#@216 Read an automakefile DIRECTORY into our data structure.
If a given set of projects has already been loaded, then do nothing
but return the project for the directory given.
Optional ROOTPROJ is the root EDE project.
(defalias 'project-am-load #[(directory &optional rootproj) "\304\305\306\307	\"\310\n#\211\204\311	!*\207" [ede-constructing directory ede-projects amo t object-assoc expand-file-name "Makefile.am" file project-am-load-makefile] 5 (#$ . 12569)])
#@50 Find the topmost automakefile starting with DIR.
(defalias 'project-am-find-topmost-level #[(dir) "\302	\303P!\204\302	\304P!\204\302	\305P!\203%	\306\307	!!\202\310!)\207" [dir newdir file-exists-p "Makefile.am" "configure.ac" "configure.in" file-name-directory directory-file-name expand-file-name] 3 (#$ . 13043)])
#@151 Set the Makefile.am in DIR to be the current buffer.
Run FORMS while the makefile is current.
Kill the makefile if it was not loaded before the load.
(defalias 'project-am-with-makefile-current '(macro . #[(dir &rest forms) "\302\303\304\305ED\306B\307\310\311\312\313\314\315\316	\317\"BFFE\207" [dir forms let* fn expand-file-name "Makefile.am" ((fb nil) (kb (get-file-buffer fn))) if (not (file-exists-p fn)) nil save-excursion (if kb (setq fb kb) (let ((semantic-init-hook nil) (recentf-exclude '((lambda (f) t)))) (setq fb (find-file-noselect fn)))) (set-buffer fb) prog1 append ((if (not kb) (kill-buffer (current-buffer))))] 12 (#$ . 13380)]))
(byte-code "\300\301\302\303#\210\304\305\306\"\207" [put project-am-with-makefile-current lisp-indent-function 1 add-hook edebug-setup-hook #[nil "\300\301\302\303#\207" [put project-am-with-makefile-current edebug-form-spec (form def-body)] 4]] 4)
#@264 Convert PATH into a project Makefile, and return its project object.
It does not check for existing project objects.  Use `project-am-load'.
Optional argument SUGGESTEDNAME will be the project name.
This is used when subprojects are made in named subdirectories.
(defalias 'project-am-load-makefile #[(path &optional suggestedname) "\306\307\"\310\311	!\312	!\205\256\212\203\202$\310\313\314	!*\nq\210\2038\315!\2038\202\245\316!!\"\205F\317\"!\211#\206U!@\206U\317	!$!A@\206_\320%\321!8&\322!8'\323$\324$\325%\326&\206}\327\330	&	(\331(\332\333	!#\210\331(\334'#\210\335\336!\210(\337(!\210(.\204\255\340p!\210)+\207" [path fn fb kb recentf-exclude semantic-init-hook expand-file-name "Makefile.am" nil get-file-buffer file-exists-p ((lambda (f) t)) find-file-noselect project-am-makefile-p project-am-package-info project-am-last-dir "0.0" 2 3 project-am-makefile :name :version :mailinglist "" :file eieio-oset :directory file-name-directory configureoutputfiles make-local-variable ede-object project-rescan kill-buffer pi suggestedname sfn pn ver bug cof ampf] 11 (#$ . 14289)])
(byte-code "\300\301\302\301\303\"\"\210\304\301\305\306\307$\207" [eieio--defalias project-targets-for-file eieio--defgeneric-init-form #1="Return a list of targets the project PROJ." eieio--defmethod nil project-am-makefile #[(proj) "\301\302\"\207" [proj eieio-oref targets] 3 #1#]] 5)
#@136 Scan the current Makefile.am for targets.
CURRPROJ is the current project being scanned.
DIR is the directory to apply to new targets.
(defalias 'project-am-scan-for-targets #[(currproj dir) "\306\307\"\310\211\311\312\f\"\210\311\313
\"\210\n+\207" [currproj otargets ntargets tmp project-am-type-alist project-am-meta-type-alist eieio-oref targets nil mapc #[(typecar) "\3068A@\3078	\203\310\311\312!\"\202D\312!\211\205C\313\314
#\211\2046\n\315\316%\317!\210B\211)+\207" [typecar indirect class macro files otargets 2 3 mapc #[(lstcar) "\306\307	#\211\204\310\311\f%\312\n!\210\n
B\211\207" [lstcar otargets tmp class dir ntargets object-assoc name :name :path project-rescan] 7] makefile-macro-file-list object-assoc name :name :path project-rescan tmp dir ntargets] 7] #[(typecar) "@A@\3068	\203\261\307\310\311
\312\211\313 !\311\211\203C@\211A@)\314=\203:@BA\211\204$\237*!\311\211\203p\315\n@\211@)\"\203g@BA\211\204Q\237+\311\211\203\251@\316\317\"\211A@)\203\240\320\316\317\"\211A@)\237\f\"A\211\204}*\f\237)\"\202a

\312\211\313 !\311\211\203\341@\211A@)\314=\203\330@BA\211\204\302\237*!\311\211\203
\315\n@\211@)\"\203
@BA\211\204\357\237+\311\211\205`
@\321@\322#\211\204V
\321@\322 #\211\204J
@\323@\324!%\325!\210BA\211\204
\311*+\207" [typecar indirect metaregex class atargets semantic-case-fold 2 mapc #[(lstcar) "\306\307	#?\205$\306\307\n#\211\204\f\310\311
%\312!\210	B\211\207" [lstcar ntargets otargets tmp class dir object-assoc name :name :path project-rescan] 6] nil semantic-something-to-tag-table semantic-fetch-tags variable string-match assoc :default-value append object-assoc name :name :path project-rescan case-fold-search result tags tag TAG --dolist-tail-- x T ntargets tmp otargets dir] 7]] 4 (#$ . 15728)])
#@101 Store in PLACE the SUBDIRS expanded from variables.
Strip out duplicates, and recurse on variables.
(defalias 'project-am-expand-subdirlist #[(place subdirs) "\301\302\"\207" [subdirs mapc #[(sp) "\303!\211\203\304\n\305	!\"\202\nJ\235?\205\n\nJBL)\207" [sp var place makefile-extract-varname-from-text project-am-expand-subdirlist makefile-macro-file-list] 5]] 3 (#$ . 17707)])
(byte-code "\300\301\302\301\303\"\"\210\304\301\305\306\307$\210\300\301\302\301\310\"\"\210\304\301\305\311\312$\210\300\301\302\301\310\"\"\210\304\301\305\313\314$\210\300\301\302\301\310\"\"\210\304\301\305\315\316$\210\300\301\302\301\310\"\"\210\304\301\305\317\320$\210\300\301\302\301\321\"\"\210\304\301\305\322\323$\210\300\301\302\301\324\"\"\210\304\301\305\325\326$\210\300\301\302\301\327\"\"\210\304\301\305\330\331$\210\300\301\302\301\310\"\"\210\304\301\305\332\333$\210\300\334\302\334\335\"\"\210\304\334\305\336\337$\210\300\334\302\334\340\"\"\210\304\334\305\341\342$\210\300\334\302\334\340\"\"\210\304\334\305\343\344$\210\300\334\302\334\340\"\"\210\304\334\305\345\346$\210\300\334\302\334\340\"\"\210\304\334\305\347\350$\210\300\334\302\334\335\"\"\210\304\334\305\315\351$\210\300\334\302\334\335\"\"\210\304\334\305\317\352$\210\300\334\302\334\340\"\"\210\304\334\305\322\353$\207" [eieio--defalias project-rescan eieio--defgeneric-init-form #1="Rescan the makefile for all targets and sub targets." eieio--defmethod nil project-am-makefile #[(this &optional suggestedname) "\306\307\310\311\312\"!\"\313\314	!\315	!\205\352\212\203 \202)\313\316\317	!*\nq\210\320\311\321\"!\211(@)(A@*\322(8+\323(8,\311\324\"-\325\326\327!\326\330!\".\313\211$/\3060!1\3132\3311\"34\203\201\332\333\3344!#\210\202\304)\203\304\335\311\321\"!\335\336\311\321\"!!\230\203\304\332\333)#\203\304*\203\304\332\337*#\203\304+\203\304\332\340+#\203\304\332\341,#\210\332\3423\237#\210\343\344.\"\210\345\346$\237\"\210\332\324/#.\f\204\351\347p!\210)+\207" [this fn fb kb recentf-exclude semantic-init-hook expand-file-name "Makefile.am" file-name-directory eieio-oref file nil get-file-buffer file-exists-p ((lambda (f) t)) find-file-noselect project-am-package-info directory 2 3 subproj append makefile-macro-file-list "DIST_SUBDIRS" "SUBDIRS" project-am-scan-for-targets eieio-oset name project-am-last-dir directory-file-name project-am-find-topmost-level version mailinglist configureoutputfiles targets project-am-expand-subdirlist csubprojexpanded mapc #[(sp) "\306\307\310\311	\312\"!\"!\307\313\n\"\211\311	\312\"\230?\205B\314\315\f#\211\204-\316\317\320\217\2027\2037\321
\n\"\210
\205B
B\211*\207" [sp this subdir submake osubproj tmp file-name-as-directory expand-file-name file-name-directory eieio-oref :file "Makefile.am" object-assoc file nil (byte-code "\301\211\"\207" [subdir project-am-load-makefile] 3) ((error)) project-rescan ede-deep-rescan nsubproj] 8] kill-buffer pi pn pv bug cof osubproj csubproj nsubproj default-directory dir tmp ntargets suggestedname] 7 #1#] #2="Rescan object THIS." project-am-program #[(this) "\301\302\303\304!!#\210\305\302\"\204\301\302\305\306\"\307PC#\210\301\310\303\305\306\"\311P!#\207" [this eieio-oset :source makefile-macro-file-list project-am-macro eieio-oref :name ".c" :ldadd "_LDADD"] 7 #2#] project-am-lib #[(this) "\301\302\303\304!!#\210\305\302\"?\205\301\302\306\305\307\"!\310PC#\207" [this eieio-oset :source makefile-macro-file-list project-am-macro eieio-oref file-name-sans-extension :name ".c"] 7 "Rescan object THIS."] project-am-texinfo #[(this) "\301\302\303\304!!#\207" [this eieio-oset :include makefile-macro-file-list project-am-macro] 6 "Rescan object THIS."] project-am-man #[(this) "\301\302\303\304!!#\207" [this eieio-oset :source makefile-macro-file-list project-am-macro] 6 "Rescan object THIS."] #3="Rescan the lisp sources." project-am-lisp #[(this) "\301\302\303\304!!#\207" [this eieio-oset :source makefile-macro-file-list project-am-macro] 6 #3#] #4="Rescan the Header sources for object THIS." project-am-header #[(this) "\301\302\303\304!!#\207" [this eieio-oset :source makefile-macro-file-list project-am-macro] 6 #4#] #5="Rescan built sources for object THIS." project-am-built-src #[(this) "\301\302\303\304!#\207" [this eieio-oset :source makefile-macro-file-list "BUILT_SOURCES"] 5 #5#] project-am-extra-dist #[(this) "\301\302\303\304!#\207" [this eieio-oset :source makefile-macro-file-list "EXTRA_DIST"] 5 "Rescan object THIS."] project-am-macro #6="Return the default macro to 'edit' for this object type." project-am-objectcode #[(this) "\301\302\303\304\305\"#\306P\207" [this subst-char-in-string 45 95 eieio-oref :name "_SOURCES"] 6 #6#] #7="Return the default macro to 'edit' for this object." project-am-header-noinst #[(this) "\300\207" ["noinst_HEADERS"] 1 #7#] project-am-header-inst #[(this) "\300\207" ["include_HEADERS"] 1 "Return the default macro to 'edit' for this object."] project-am-header-pkg #[(this) "\300\207" ["pkginclude_HEADERS"] 1 "Return the default macro to 'edit' for this object."] project-am-header-chk #[(this) "\300\207" ["check_HEADERS"] 1 "Return the default macro to 'edit' for this object."] #[(this) "\301\302\303\"!\304P\207" [this file-name-sans-extension eieio-oref :name "_TEXINFOS"] 4 "Return the default macro to 'edit' for this object type."] #[(this) "\301\302\"\207" [this eieio-oref :name] 3 "Return the default macro to 'edit' for this object type."] #[(this) "\300\207" ["lisp_LISP"] 1 "Return the default macro to 'edit' for this object."]] 5)
#@106 Return an object starting with AMF associated with BUFFER.
nil means that this buffer belongs to no-one.
(defalias 'project-am-buffer-object #[(amf buffer) "\205J\305	\"\203
\207\306\307\"\306\310\"\311\211\2033\n\2043\305\f@	\"\203,\f@\fA\211\204\203H\n\204H\312@	\"A\211\2047\n+\207" [amf buffer obj sobj targ ede-buffer-mine eieio-oref targets subproj nil project-am-buffer-object] 5 (#$ . 23335)])
(byte-code "\300\301\302\301\303\"\"\210\304\301\305\306\307$\210\300\301\302\301\303\"\"\210\304\301\305\310\311$\210\300\301\302\301\303\"\"\210\304\301\305\312\313$\210\300\301\302\301\303\"\"\210\304\301\305\314\315$\210\300\301\302\301\303\"\"\210\304\301\305\316\317$\210\300\320\302\320\321\"\"\210\304\320\305\306\322$\210\300\323\302\323\324\"\"\210\304\323\305\325\326$\210\300\323\302\323\327\"\"\210\304\323\305\310\330$\210\300\323\302\323\331\"\"\210\304\323\305\312\332$\207" [eieio--defalias ede-buffer-mine eieio--defgeneric-init-form #1="Return t if object THIS lays claim to the file in BUFFER." eieio--defmethod nil project-am-makefile #[(this buffer) "\306\307!!\310\n\311\"	\230\206K\312\313	\"\206K\312\314	\"\206K\312\315	\"\206K\316\310\n\317\"\316\211\203H
@\312\320\f!\321P	\"\203A\322
A\211\2041*))\207" [buffer efn this ans f --dolist-tail-- expand-file-name buffer-file-name eieio-oref :file string-match "/configure\\.ac$" "/configure\\.in$" "/configure$" nil configureoutputfiles regexp-quote "$" t] 4 #1#] project-am-objectcode #[(this buffer) "\302\303!\304	\305\"\"\304	\306\"\235\207" [buffer this file-relative-name buffer-file-name eieio-oref :path :source] 5 "Return t if object THIS lays claim to the file in BUFFER."] project-am-texinfo #[(this buffer) "\303\304!\305	\306\"\"\305	\307\"\n\230\206\n\305	\310\"\235)\207" [buffer this bfn file-relative-name buffer-file-name eieio-oref :path :name :include] 5 "Return t if object THIS lays claim to the file in BUFFER."] project-am-man #[(this buffer) "\302\303\"\304\305	!\302\306\"\"\230\207" [this buffer eieio-oref :name file-relative-name buffer-file-name :path] 6 "Return t if object THIS lays claim to the file in BUFFER."] project-am-lisp #[(this buffer) "\302\303!\304	\305\"\"\304	\306\"\235\207" [buffer this file-relative-name buffer-file-name eieio-oref :path :source] 5 "Return t if object THIS lays claim to the file in BUFFER."] project-am-subtree #2="Return the sub project in AMPF specified by SUBDIR." #[(ampf subdir) "\302\303!\304\305	\306\"#\207" [subdir ampf object-assoc expand-file-name file eieio-oref subproj] 6 #2#] project-compile-target-command #3="Default target to use when compiling a given target." project-am-target #[(this) "\300\207" [""] 1 #3#] #4="Default target to use when compiling an object code target." #[(this) "\301\302\"\207" [this eieio-oref :name] 3 #4#] #5="Default target t- use when compiling a texinfo file." #[(this) "\302\303\"\304\305	\"\203\306\307\310\211	$	)\207" [this n eieio-oref :name string-match "\\.texi?\\(nfo\\)?" replace-match ".info" t] 5 #5#]] 5)
#@109 Return the last part of a directory name.
Argument FILE is the file to extract the end directory name from.
(defalias 'project-am-last-dir #[(file) "\303!\304	!\305\n!*\207" [file s d file-name-directory directory-file-name file-name-nondirectory] 2 (#$ . 26409)])
#@52 For FILE, return the preferred type for that file.
(defalias 'project-am-preferred-target-type #[(file) "\305\306\"\203		\207\305\307\"\203\n\207\305\310\"\203\207\f\207" [file project-am-texinfo project-am-man project-am-lisp project-am-program string-match "\\.texi?\\(nfo\\)$" "\\.[0-9]$" "\\.el$"] 3 (#$ . 26683)])
(byte-code "\300\301\302\301\303\"\"\210\304\301\305\306\307$\210\300\310\302\310\311\"\"\210\304\310\305\312\313$\207" [eieio--defalias ede-buffer-header-file eieio--defgeneric-init-form #1="There are no default header files." eieio--defmethod nil project-am-objectcode #[(this buffer) "\303 \206(\304\305\"\306\211\203&	\204&\307\310\n@\"\203\n@\nA\211\204	*\207" [this found s call-next-method eieio-oref source nil string-match "\\.\\(h\\|H\\|hh\\|hpp\\)"] 4 #1#] ede-documentation #2="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." project-am-texinfo #[(this) "\305\306\307\"\306\310\"\"\311!\306\n\312\"\313	\203)\314	@\"\fB	A\211\204\f,\207" [this src proj dir out append eieio-oref source include ede-target-parent directory nil expand-file-name] 6 #2#]] 5)
#@63 List of possible configure files to look in for project info.
(defvar project-am-autoconf-file-options '("configure.ac" "configure.in") (#$ . 27910))
#@53 Return the name of the autoconf file to use in DIR.
(defalias 'project-am-autoconf-file #[(dir) "\305	\305\211\203\"@\306\307\n\f\"!\203\307\n\f\"A\211\204\n*)\207" [ans project-am-autoconf-file-options L --dolist-tail-- dir nil file-exists-p expand-file-name] 5 (#$ . 28066)])
#@166 Set the Configure FILE in the top most directory above DIR as current.
Run FORMS in the configure file.
Kill the Configure buffer if it was not already in a buffer.
(defalias 'project-am-with-config-current '(macro . #[(file &rest forms) "\302\303\304\305DDC\306\307\310D\311\312	\313\"B\257D\207" [file forms save-excursion let fb generate-new-buffer (set-buffer fb) (erase-buffer) insert-file-contents prog1 append ((kill-buffer fb))] 10 (#$ . 28364)]))
(byte-code "\300\301\302\303#\210\304\305\306\"\207" [put project-am-with-config-current lisp-indent-function 1 add-hook edebug-setup-hook #[nil "\300\301\302\303#\207" [put project-am-with-config-current edebug-form-spec (form def-body)] 4]] 4)
#@66 Extract the value of the shell variable VAR from a shell script.
(defalias 'project-am-extract-shell-variable '(macro . #[(var) "\212eb\210\301\302\303!\304Q\305\306#\205\307`\310 \")\207" [var re-search-forward "^" regexp-quote "\\s-*=\\s-*" nil t buffer-substring-no-properties point-at-eol] 4 (#$ . 29075)]))
#@52 Extract the package information for directory DIR.
(defalias 'project-am-extract-package-info #[(dir) "\306!\307\310\"\311\312!!\313\314\211\211\203\235\212\315!\211q\210\316 \210\317!\210\320\321!\320\322!\320\323!\320\324! \211!G\325V\203X!@!A@\326!8\202n G\325V\203n @ A@\326 8\203z@C\202|\211\"G\325V\203\213\"\202\223\327\"@\330\331#-\332!\210*\202\275\333
!\203\275\212\315
!\211q\210\316 \210\317
!\210\314\211\332!\210*\f\n	F.\207" [dir configfiles bugrep ver name conf-sh project-am-autoconf-file expand-file-name "configure" file-name-nondirectory directory-file-name "1.0" nil generate-new-buffer erase-buffer insert-file-contents autoconf-parameters-for-macro "AC_INIT" "AM_INIT_AUTOMAKE" "AC_CONFIG_FILES" "AC_OUTPUT" 1 2 split-string "\\s-" t kill-buffer file-exists-p conf-in fb aco acf aia aci outfiles] 7 (#$ . 29396)])
#@133 Get the package information for directory topmost project dir over DIR.
Calculates the info with `project-am-extract-package-info'.
(defalias 'project-am-package-info #[(dir) "\302 \211\203\f\303\304\"\305	!)\207" [top dir ede-toplevel eieio-oref :directory project-am-extract-package-info] 4 (#$ . 30306)])
(byte-code "\300\301\302\301\303\"\"\210\304\301\305\306\307$\210\300\301\302\301\303\"\"\210\304\301\305\310\311$\210\312\313!\207" [eieio--defalias ede-system-include-path eieio--defgeneric-init-form #1="Return `project-am-localvars-include-path', usually local variable\nper file or in .dir-locals.el or similar." eieio--defmethod nil project-am-makefile #[(this) "\301\300!\205\207" [project-am-localvars-include-path boundp] 2 #1#] project-am-target #[(this) "\301\300!\205\207" [project-am-localvars-include-path boundp] 2 "Return `project-am-localvars-include-path', usually local variable\nper file or in .dir-locals.el or similar."] provide ede/project-am] 5)