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

2023-02-14 12:34:48 +01:00
parent b950b46f51
commit e6043641d3
1 changed files with 2 additions and 1 deletions
--- 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);