From: Andrea Corallo <akrl@sdf.org>
Date: Tue, 14 Feb 2023 11:34:48 +0000 (+0100)
Subject: * src/comp.c (Fcomp__compile_ctxt_to_file): Don't create output file twice
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e6043641d300030aaf1f2deb7b1e6c4dfbed8629;p=emacs.git

* src/comp.c (Fcomp__compile_ctxt_to_file): Don't create output file twice
---

diff --git a/src/comp.c b/src/comp.c
index ba549155925..7d2987605d9 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -4991,7 +4991,8 @@ DEFUN ("comp--compile-ctxt-to-file", Fcomp__compile_ctxt_to_file,
       format_string ("%s_libgccjit_repro.c", SSDATA (ebase_name)));
 
   Lisp_Object tmp_file =
-    Fmake_temp_file_internal (base_name, Qnil, build_string (".eln.tmp"), Qnil);
+    Fmake_temp_file_internal (base_name, make_fixnum (0),
+			      build_string (".eln.tmp"), Qnil);
   Lisp_Object encoded_tmp_file = ENCODE_FILE (tmp_file);
 #ifdef WINDOWSNT
   encoded_tmp_file = ansi_encode_filename (encoded_tmp_file);