diff options
| author | Andrea Corallo <akrl@sdf.org> | 2021-05-04 21:31:44 +0200 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2021-05-04 21:46:39 +0200 |
| commit | d6ddc97884c3106a59b956fbc4e4f5f3e4aaf4e2 (patch) | |
| tree | 6b4c39e9b8c370dac3103c0c1caf5e8eb08e07c9 /lisp/emacs-lisp/comp.el | |
| parent | c36df52ff5c05826382d88ddbe3fffaa99d12597 (diff) | |
| download | emacs-d6ddc97884c3106a59b956fbc4e4f5f3e4aaf4e2.tar.gz emacs-d6ddc97884c3106a59b956fbc4e4f5f3e4aaf4e2.tar.bz2 emacs-d6ddc97884c3106a59b956fbc4e4f5f3e4aaf4e2.zip | |
* Do not try to load unexistent eln file if async compilation was skipped
* lisp/emacs-lisp/comp.el (comp-run-async-workers): Don't try to
load if the eln file was not produced.
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index 0ebaccbe4a6..297c1f7ebca 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -3944,11 +3944,14 @@ display a message." source-file) (comp-accept-and-process-async-output process) (ignore-errors (delete-file temp-file)) - (when (and load1 - (zerop (process-exit-status process))) - (native-elisp-load - (comp-el-to-eln-filename source-file1) - (eq load1 'late))) + (let ((eln-file (comp-el-to-eln-filename + source-file1))) + (when (and load1 + (zerop (process-exit-status + process)) + (file-exists-p eln-file)) + (native-elisp-load eln-file + (eq load1 'late)))) (comp-run-async-workers)) :noquery (not comp-async-query-on-exit)))) (puthash source-file process comp-async-compilations)) |