diff options
| author | Andrea Corallo <akrl@sdf.org> | 2021-03-31 20:29:32 +0200 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2021-03-31 20:38:32 +0200 |
| commit | 8e524f459149dfd83e2205d24c174074b10d5c6a (patch) | |
| tree | 1905463475650379f0aff81c11e92780fe3120a4 /lisp/emacs-lisp/comp.el | |
| parent | 53ca0d98441da75be49111a3a88c1a7629f27d6d (diff) | |
| download | emacs-8e524f459149dfd83e2205d24c174074b10d5c6a.tar.gz emacs-8e524f459149dfd83e2205d24c174074b10d5c6a.tar.bz2 emacs-8e524f459149dfd83e2205d24c174074b10d5c6a.zip | |
* lisp/emacs-lisp/comp.el (comp-final): Clean-up temporary file.
Diffstat (limited to 'lisp/emacs-lisp/comp.el')
| -rw-r--r-- | lisp/emacs-lisp/comp.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index 59e9dbc0138..213eb7b4126 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -3666,7 +3666,9 @@ Prepare every function for final compilation and drive the C back-end." (call-process (expand-file-name invocation-name invocation-directory) nil t t "--batch" "-l" temp-file)) - output + (progn + (delete-file temp-file) + output) (signal 'native-compiler-error (buffer-string))) (comp-log-to-buffer (buffer-string)))))))) |