* 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 ba5491559253bad341c19fbaff004e917439ab01..7d2987605d901f8efbc2906664cb5bb4dddfeb74 100644 (file)
--- 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);