OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

mkstemps.c (mkstemps): On VMS, open temp file with option that causes it to be deleted when closed. 

* libiberty/mkstemps.c (mkstemps): On VMS, open temp file with option
	that causes it to be deleted when closed.
	* gcc/gcc.c (delete_if_ordinary): Backout previous change.

From-SVN: r48872
This commit is contained in:
Douglas B Rupp 2002-01-15 09:34:56 -05:00 committed by Richard Kenner
parent 9a52433e8a
commit 0e83ceb1b9
4 changed files with 15 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gcc/ChangeLog
View File

@ -1,10 +1,12 @@
2002-01-15 Douglas B Rupp <rupp@gnat.com>
* gcc.c (delete_if_ordinary): Backout previous change.
2002-01-15 Kazu Hirata <kazu@hxi.com>
* confiig/h8300/h8300.c (print_operand): Remove support for
* config/h8300/h8300.c (print_operand): Remove support for
unused operand characters.
2002-01-15 Kazu Hirata <kazu@hxi.com>
* read-rtl.c: Fix formatting.
* real.c: Likewise.
* recog.c: Likewise.

4
gcc/gcc.c
View File

@ -2110,9 +2110,7 @@ delete_if_ordinary (name)
if (i == 'y' || i == 'Y')
#endif /* DEBUG */
/* On VMS, more than one version of the temporary file may have been
created. This ensures we delete all of them. */
while (stat (name, &st) >= 0 && S_ISREG (st.st_mode))
if (stat (name, &st) >= 0 && S_ISREG (st.st_mode))
if (unlink (name) < 0)
if (verbose_flag)
perror_with_name (name);

5
libiberty/ChangeLog
View File

@ -1,3 +1,8 @@
2002-01-15 Douglas B Rupp <rupp@gnat.com>
* mkstemps.c (mkstemps): On VMS, open temp file with option
that causes it to be deleted when closed.
2002-01-02 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* cp-demangle.c (long_options): Const-ify.

4
libiberty/mkstemps.c
View File

@ -121,7 +121,11 @@ mkstemps (template, suffix_len)
v /= 62;
XXXXXX[5] = letters[v % 62];
#ifdef VMS
fd = open (template, O_RDWR|O_CREAT|O_EXCL, 0600, "fop=tmd");
#else
fd = open (template, O_RDWR|O_CREAT|O_EXCL, 0600);
#endif
if (fd >= 0)
/* The file does not exist. */
return fd;