do not emit elc file while native compiling

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 7be43204a16dd00f637db35cf9109521270ddf91..5d2558a579d9e3784046db0fd9063fda6b7c906e 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -2032,7 +2032,9 @@ The value is non-nil if there were no errors, nil if errors."
                  ;; emacs-lisp files in the build tree are
                  ;; recompiled).  Previously this was accomplished by
                  ;; deleting target-file before writing it.
-                 (rename-file tempfile target-file t))
+                  (if byte-native-compiling
+                      (delete-file tempfile)
+                   (rename-file tempfile target-file t)))
                (or noninteractive (message "Wrote %s" target-file)))
            ;; This is just to give a better error message than write-region
            (let ((exists (file-exists-p target-file)))