[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 56c63ca21b: * Fix async native compilation (bug#58637)
From: |
Andrea Corallo |
Subject: |
master 56c63ca21b: * Fix async native compilation (bug#58637) |
Date: |
Wed, 19 Oct 2022 16:26:14 -0400 (EDT) |
branch: master
commit 56c63ca21b3e5e2d0bb05d3897ea287a754c5b29
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>
* Fix async native compilation (bug#58637)
* lisp/emacs-lisp/comp.el (comp--native-compile): Fix gate condition.
(comp-run-async-workers): Add assetion.
---
lisp/emacs-lisp/comp.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 2c9b79334b..5a05fe4854 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -3928,6 +3928,7 @@ processes from `comp-async-compilations'"
"Start compiling files from `comp-files-queue' asynchronously.
When compilation is finished, run `native-comp-async-all-done-hook' and
display a message."
+ (cl-assert (null comp-no-spawn))
(if (or comp-files-queue
(> (comp-async-runnings) 0))
(unless (>= (comp-async-runnings) (comp-effective-async-max-jobs))
@@ -4048,7 +4049,7 @@ the deferred compilation mechanism."
(stringp function-or-file))
(signal 'native-compiler-error
(list "Not a function symbol or file" function-or-file)))
- (unless comp-no-spawn
+ (when (or (null comp-no-spawn) comp-async-compilation)
(catch 'no-native-compile
(let* ((print-symbols-bare t)
(data function-or-file)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 56c63ca21b: * Fix async native compilation (bug#58637),
Andrea Corallo <=