feature/native-comp 337367a 5/5: * lisp/emacs-lisp/comp.el (native-compile): Fix free function compilation.

[Andrea Corallo]

branch: feature/native-comp
commit 337367a733e107df1ecb89955f0a249491bc62d9
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    * lisp/emacs-lisp/comp.el (native-compile): Fix free function compilation.
---
 lisp/emacs-lisp/comp.el | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 3176351..28dbd56 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -2654,11 +2654,11 @@ Return the compilation unit file name."
          (byte-compile-debug t)
          (comp-ctxt
           (make-comp-ctxt
-           :output (comp-el-to-eln-filename (if (symbolp function-or-file)
-                                                (symbol-name function-or-file)
-                                              function-or-file)
-                                            (when byte-native-for-bootstrap
-                                              (car (last comp-eln-load-path))))
+           :output (if (symbolp function-or-file)
+                       (make-temp-file (symbol-name function-or-file) nil 
".eln")
+                     (comp-el-to-eln-filename function-or-file
+                                              (when byte-native-for-bootstrap
+                                                (car (last 
comp-eln-load-path)))))
            :with-late-load with-late-load)))
     (comp-log "\n\n" 1)
     (condition-case err