]> git.eshelyaron.com Git - emacs.git/commitdiff
* Do not try to load unexistent eln file if async compilation was skipped
authorAndrea Corallo <akrl@sdf.org>
Tue, 4 May 2021 19:31:44 +0000 (21:31 +0200)
committerAndrea Corallo <akrl@sdf.org>
Tue, 4 May 2021 19:46:39 +0000 (21:46 +0200)
* lisp/emacs-lisp/comp.el (comp-run-async-workers): Don't try to
load if the eln file was not produced.

lisp/emacs-lisp/comp.el

index 0ebaccbe4a670f0d219e3be5eb0ea846150634bc..297c1f7ebcae78529524521c23680db16bdbfbef 100644 (file)
@@ -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))