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

re PR libfortran/46373 (fflush called when reading from a string)

Browse Source 
2010-11-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libgfortran/46373
	* io/transfer.c (data_transfer_init): Do not call flush_if_preconnected
	if this is an internal unit.

From-SVN: r166490
This commit is contained in:
Jerry DeLisle 2010-11-09 13:51:57 +00:00
parent fc489e4a07
commit 54d4b3bcb2
2 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
libgfortran/ChangeLog
View File

@ -1,3 +1,9 @@
2010-11-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/46373
* io/transfer.c (data_transfer_init): Do not call flush_if_preconnected
if this is an internal unit.
2010-11-04 Janne Blomqvist <jb@gcc.gnu.org>
PR libfortran/44931

1
libgfortran/io/transfer.c
View File

@ -2646,6 +2646,7 @@ data_transfer_init (st_parameter_dt *dtp, int read_flag)
}
/* Bugware for badly written mixed C-Fortran I/O. */
if (!is_internal_unit (dtp))
flush_if_preconnected(dtp->u.p.current_unit->s);
dtp->u.p.current_unit->mode = dtp->u.p.mode;