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

PR47296 Segfault when running out of file descriptors

Browse Source 
From-SVN: r168888
This commit is contained in:
Janne Blomqvist 2011-01-17 07:48:10 +02:00
parent 124b5e3620
commit 9cd72574bc
2 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
libgfortran/ChangeLog
View File

@ -1,3 +1,9 @@
2011-01-17 Janne Blomqvist <jb@gcc.gnu.org>
PR libfortran/47296
* io/unix.c (tempfile): Set opp->file and opp->file_len also if an
error occurs.
2011-01-16 Jakub Jelinek <jakub@redhat.com>
PR fortran/46625

12
libgfortran/io/unix.c
View File

@ -1,4 +1,5 @@
/* Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
/* Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010,
2011
Free Software Foundation, Inc.
Contributed by Andy Vaught
F2003 I/O support contributed by Jerry DeLisle
@ -1084,13 +1085,8 @@ tempfile (st_parameter_open *opp)
while (fd == -1 && errno == EEXIST);
#endif /* HAVE_MKSTEMP */
if (fd < 0)
free (template);
else
{
opp->file = template;
opp->file_len = strlen (template); /* Don't include trailing nul */
}
opp->file = template;
opp->file_len = strlen (template); /* Don't include trailing nul */
return fd;
}