aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/cedet/ede/cpp-root.el
diff options
context:
space:
mode:
authorStefan Monnier2021-03-12 11:32:42 -0500
committerStefan Monnier2021-03-12 11:32:42 -0500
commitd1a7d16f8e1a42d6e6edc0621e29b38f92e9fc2e (patch)
tree99ff2074307930d16368e8efee9c65e5f02f36d1 /lisp/cedet/ede/cpp-root.el
parente609bf59ebb23c10f0e9f56df38f64be37de06dd (diff)
downloademacs-d1a7d16f8e1a42d6e6edc0621e29b38f92e9fc2e.tar.gz
emacs-d1a7d16f8e1a42d6e6edc0621e29b38f92e9fc2e.zip
* lisp/cedet/{*.el,ede/*.el}: Use lexical-binding
Remove a few redundant `:group` arguments as well. * lisp/cedet/ede.el: Use lexical-binding. Don't load `ede/files` at compile-time. (ede-speedbar): Declare function. (ede-load-project-file): Allow `rootreturn` to be a reference rather than a symbol. (ede-initialize-state-current-buffer): Pass `ROOT` as a reference rather than a symbol to `ede-directory-get-open-project` and `ede-load-project-file` so we don't need to make it dynamically scoped. (ede-flush-deleted-projects): Avoid `add-to-list` on a local var. * lisp/cedet/ede/files.el: Use lexical-binding. (ede-directory-get-open-project): Allow `rootreturn` to be a reference rather than a symbol. (ede-project-root-directory): Remove unused var `root`. (ede-expand-filename-impl): Remove unused vars `path` and `proj`. * lisp/cedet/cedet-idutils.el: Use lexical-binding. (cedet-idutils-search): Remove always-nil variable `scopeflags`. * lisp/cedet/data-debug.el: Use lexical-binding. (data-debug-insert-overlay-button, data-debug-insert-overlay-list-button) (data-debug-insert-buffer-button, data-debug-insert-buffer-list-button) (data-debug-insert-process-button): Remove always-nil variable `tip`. (data-debug-insert-ring-button): Remove unused var `ringthing`. (data-debug-insert-widget-properties): Remove unused var `type`. * lisp/cedet/semantic.el: Use lexical-binding. (semantic-mode): Strength-reduce `eval` to `symbol-value`. * lisp/cedet/ede/custom.el: Use lexical-binding. (ede-project-sort-targets): Remove unused vars `count`, `current`, and `order`. * lisp/cedet/ede/pconf.el: Use lexical-binding. (ede-proj-configure-synchronize): Remove unused var `add-missing`. * lisp/cedet/ede/pmake.el (ede-proj-makefile-garbage-patterns): Simplify via η-reduction. (ede-proj-makefile-dependencies): Use `seq-some` rather than `eval+or`. * lisp/cedet/ede/proj-elisp.el: Use lexical-binding. (project-compile-target): Remove unused var `elc`. (ede-update-version-in-source): Remove unused var `match`. (project-compile-target): Declare function `cedet-update-autoloads` from file we don't have. * lisp/cedet/cedet-cscope.el: Use lexical-binding. * lisp/cedet/cedet-files.el: Use lexical-binding. * lisp/cedet/cedet-global.el: Use lexical-binding. * lisp/cedet/cedet.el: Use lexical-binding. * lisp/cedet/ede/auto.el: Use lexical-binding. * lisp/cedet/ede/autoconf-edit.el: Use lexical-binding. * lisp/cedet/ede/config.el: Use lexical-binding. * lisp/cedet/ede/cpp-root.el: Use lexical-binding. * lisp/cedet/ede/detect.el: Use lexical-binding. * lisp/cedet/ede/generic.el: Use lexical-binding. * lisp/cedet/ede/linux.el: Use lexical-binding. * lisp/cedet/ede/locate.el: Use lexical-binding. * lisp/cedet/ede/makefile-edit.el: Use lexical-binding. * lisp/cedet/ede/proj-info.el: Use lexical-binding. * lisp/cedet/ede/proj-obj.el: Use lexical-binding. * lisp/cedet/ede/proj-prog.el: Use lexical-binding. * lisp/cedet/ede/proj-shared.el: Use lexical-binding. * lisp/cedet/ede/proj.el: Use lexical-binding. * lisp/cedet/ede/shell.el: Use lexical-binding. * lisp/cedet/ede/simple.el: Use lexical-binding. * lisp/cedet/ede/source.el: Use lexical-binding. * lisp/cedet/ede/speedbar.el: Use lexical-binding. * lisp/cedet/ede/util.el: Use lexical-binding.
Diffstat (limited to 'lisp/cedet/ede/cpp-root.el')
-rw-r--r--lisp/cedet/ede/cpp-root.el12
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/cedet/ede/cpp-root.el b/lisp/cedet/ede/cpp-root.el
index 41f0c682892..652d6476f02 100644
--- a/lisp/cedet/ede/cpp-root.el
+++ b/lisp/cedet/ede/cpp-root.el
@@ -1,4 +1,4 @@
1;;; ede/cpp-root.el --- A simple way to wrap a C++ project with a single root 1;;; ede/cpp-root.el --- A simple way to wrap a C++ project with a single root -*- lexical-binding: t; -*-
2 2
3;; Copyright (C) 2007-2021 Free Software Foundation, Inc. 3;; Copyright (C) 2007-2021 Free Software Foundation, Inc.
4 4
@@ -275,7 +275,7 @@ Each directory needs a project file to control it.")
275;; objects is deleted. 275;; objects is deleted.
276 276
277(cl-defmethod initialize-instance ((this ede-cpp-root-project) 277(cl-defmethod initialize-instance ((this ede-cpp-root-project)
278 &rest fields) 278 &rest _fields)
279 "Make sure the :file is fully expanded." 279 "Make sure the :file is fully expanded."
280 ;; Add ourselves to the master list 280 ;; Add ourselves to the master list
281 (cl-call-next-method) 281 (cl-call-next-method)
@@ -310,7 +310,7 @@ Each directory needs a project file to control it.")
310;; project, simplifying authoring new single-point projects. 310;; project, simplifying authoring new single-point projects.
311 311
312(cl-defmethod ede-find-subproject-for-directory ((proj ede-cpp-root-project) 312(cl-defmethod ede-find-subproject-for-directory ((proj ede-cpp-root-project)
313 dir) 313 _dir)
314 "Return PROJ, for handling all subdirs below DIR." 314 "Return PROJ, for handling all subdirs below DIR."
315 proj) 315 proj)
316 316
@@ -319,7 +319,7 @@ Each directory needs a project file to control it.")
319;; Creating new targets on a per directory basis is a good way to keep 319;; Creating new targets on a per directory basis is a good way to keep
320;; files organized. See ede-emacs for an example with multiple file 320;; files organized. See ede-emacs for an example with multiple file
321;; types. 321;; types.
322(cl-defmethod ede-find-target ((proj ede-cpp-root-project) buffer) 322(cl-defmethod ede-find-target ((proj ede-cpp-root-project) _buffer)
323 "Find an EDE target in PROJ for BUFFER. 323 "Find an EDE target in PROJ for BUFFER.
324If one doesn't exist, create a new one for this directory." 324If one doesn't exist, create a new one for this directory."
325 (let* ((targets (oref proj targets)) 325 (let* ((targets (oref proj targets))
@@ -451,7 +451,7 @@ This is for project include paths and spp source files."
451 "Get the pre-processor map for project THIS." 451 "Get the pre-processor map for project THIS."
452 (ede-preprocessor-map (ede-target-parent this))) 452 (ede-preprocessor-map (ede-target-parent this)))
453 453
454(cl-defmethod project-compile-project ((proj ede-cpp-root-project) &optional command) 454(cl-defmethod project-compile-project ((proj ede-cpp-root-project) &optional _command)
455 "Compile the entire current project PROJ. 455 "Compile the entire current project PROJ.
456Argument COMMAND is the command to use when compiling." 456Argument COMMAND is the command to use when compiling."
457 ;; we need to be in the proj root dir for this to work 457 ;; we need to be in the proj root dir for this to work
@@ -474,7 +474,7 @@ Argument COMMAND is the command to use for compiling the target."
474 (project-compile-project (oref obj project) command))) 474 (project-compile-project (oref obj project) command)))
475 475
476 476
477(cl-defmethod project-rescan ((this ede-cpp-root-project)) 477(cl-defmethod project-rescan ((_this ede-cpp-root-project))
478 "Don't rescan this project from the sources." 478 "Don't rescan this project from the sources."
479 (message "cpp-root has nothing to rescan.")) 479 (message "cpp-root has nothing to rescan."))
480 480