aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/cedet/ede/make.el
diff options
context:
space:
mode:
authorVibhav Pant2020-08-21 14:04:35 +0530
committerVibhav Pant2020-08-21 14:04:35 +0530
commitf0f8d7b82492e741950c363a03b886965c91b1b0 (patch)
tree19b716830b1ebabc0d7d75949c4e6800c0f104ad /lisp/cedet/ede/make.el
parent9e64a087c4d167e7ec1c4e22bea3e6af53b563de (diff)
parentc818c29771d3cb51875643b2f6c894073e429dd2 (diff)
downloademacs-feature/native-comp-macos-fixes.tar.gz
emacs-feature/native-comp-macos-fixes.zip
Merge branch 'feature/native-comp' into feature/native-comp-macos-fixesfeature/native-comp-macos-fixes
Diffstat (limited to 'lisp/cedet/ede/make.el')
-rw-r--r--lisp/cedet/ede/make.el24
1 files changed, 5 insertions, 19 deletions
diff --git a/lisp/cedet/ede/make.el b/lisp/cedet/ede/make.el
index ecce3e7105b..140e7387a68 100644
--- a/lisp/cedet/ede/make.el
+++ b/lisp/cedet/ede/make.el
@@ -32,29 +32,15 @@
32 32
33(declare-function inversion-check-version "inversion") 33(declare-function inversion-check-version "inversion")
34 34
35(if (fboundp 'locate-file) 35(defsubst ede--find-executable (exec)
36 (defsubst ede--find-executable (exec) 36 "Return an expanded file name for a program EXEC on the exec path."
37 "Return an expanded file name for a program EXEC on the exec path." 37 (declare (obsolete locate-file "28.1"))
38 (locate-file exec exec-path)) 38 (locate-file exec exec-path))
39
40 ;; Else, older version of Emacs.
41
42 (defsubst ede--find-executable (exec)
43 "Return an expanded file name for a program EXEC on the exec path."
44 (let ((p exec-path)
45 (found nil))
46 (while (and p (not found))
47 (let ((f (expand-file-name exec (car p))))
48 (if (file-exists-p f)
49 (setq found f)))
50 (setq p (cdr p)))
51 found))
52 )
53 39
54(defvar ede-make-min-version "3.0" 40(defvar ede-make-min-version "3.0"
55 "Minimum version of GNU make required.") 41 "Minimum version of GNU make required.")
56 42
57(defcustom ede-make-command (cond ((ede--find-executable "gmake") 43(defcustom ede-make-command (cond ((executable-find "gmake")
58 "gmake") 44 "gmake")
59 (t "make")) ;; What to do? 45 (t "make")) ;; What to do?
60 "The MAKE command to use for EDE when compiling. 46 "The MAKE command to use for EDE when compiling.