From 337367a733e107df1ecb89955f0a249491bc62d9 Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Sun, 23 Aug 2020 12:36:07 +0200 Subject: [PATCH] * 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 3176351b37d..28dbd567474 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 -- 2.39.5