[patch,libfortran] Fix Regression PR34676 IO error delayed

[Jerry DeLisle]

Hi,

This patch is fairly obvious and self explanatory.

Regression tested on x86-64.

OK for trunk?

Jerry

2008-01-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libfortran/34676
	* io/list_read.c (next_char): Only save the EOF condition for later if
	advance="no".
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr34676.diff
Type: text/x-patch
Size: 658 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20080105/68b9afe0/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: list_read_8.f90
Type: text/x-fortran
Size: 341 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20080105/68b9afe0/attachment-0001.bin>