diff options
author | Andrea Corallo <akrl@sdf.org> | 2021-02-26 08:49:58 +0100 |
---|---|---|
committer | Andrea Corallo <akrl@sdf.org> | 2021-02-26 14:33:08 +0100 |
commit | 54df918ad1e19513768bc27cb3e0a78856d30135 (patch) | |
tree | d126077251f0aaf8ccf1912f5ff62860bb264f62 /lisp/emacs-lisp/comp.el | |
parent | 3a31fca5dba41e9905b1293fc73dd1d44abc3138 (diff) | |
download | emacs-54df918ad1e19513768bc27cb3e0a78856d30135.tar.gz emacs-54df918ad1e19513768bc27cb3e0a78856d30135.tar.bz2 emacs-54df918ad1e19513768bc27cb3e0a78856d30135.zip |
* Add `comp-async-query-on-exit' customize.
* lisp/emacs-lisp/comp.el (comp-async-query-on-exit): New customize.
(comp-run-async-workers): Make use of.
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
-rw-r--r-- | lisp/emacs-lisp/comp.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index ddf3f049e8c..6af4ee2beb3 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -127,6 +127,10 @@ Usable to modify the compiler environment." "Report warnings and errors from native asynchronous compilation." :type 'boolean) +(defcustom comp-async-query-on-exit nil + "Exiting Emacs, query the user if async compilation process is running." + :type 'boolean) + (defcustom comp-native-driver-options nil "Options passed verbatim to the native compiler's backend driver. Note that not all options are meaningful; typically only the options @@ -3928,7 +3932,8 @@ display a message." (native-elisp-load (comp-el-to-eln-filename source-file1) (eq load1 'late))) - (comp-run-async-workers))))) + (comp-run-async-workers)) + :noquery (not comp-async-query-on-exit)))) (puthash source-file process comp-async-compilations)) when (>= (comp-async-runnings) (comp-effective-async-max-jobs)) do (cl-return))) |