diff options
author | Paul Brook <paul@codesourcery.com> | 2004-10-06 18:27:58 +0000 |
---|---|---|
committer | Paul Brook <pbrook@gcc.gnu.org> | 2004-10-06 18:27:58 +0000 |
commit | 7726f633fa2b079664c436e008b310ad36b620e1 (patch) | |
tree | 6bcba4c2581db9c072c8a3bf9c46017ff702d850 /libgfortran | |
parent | 575f7c2bd23fecbeeb4b01dd5e67079078d39496 (diff) | |
download | gcc-7726f633fa2b079664c436e008b310ad36b620e1.tar.gz |
re PR libfortran/17709 (NULL I/O list and Format error.)
PR libfortran/17709
* io/transfer.c (data_transfer_init): Reset sf_seen_eor.
testsuite/
* gfortran.dg/empty_format_1.f90: New test.
From-SVN: r88615
Diffstat (limited to 'libgfortran')
-rw-r--r-- | libgfortran/ChangeLog | 5 | ||||
-rw-r--r-- | libgfortran/io/transfer.c | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 2560d698fb5..82b0577dec2 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,8 @@ +2004-10-06 Paul Brook <paul@codesourcery.com> + + PR libfortran/17709 + * io/transfer.c (data_transfer_init): Reset sf_seen_eor. + 2004-10-04 Andrew Pinski <pinskia@physics.uc.edu> * intrinsics/mvbits.c: Commit the file. diff --git a/libgfortran/io/transfer.c b/libgfortran/io/transfer.c index ca920724b0d..70a41fcff83 100644 --- a/libgfortran/io/transfer.c +++ b/libgfortran/io/transfer.c @@ -1074,6 +1074,7 @@ data_transfer_init (int read_flag) g.seen_dollar = 0; g.first_item = 1; g.item_count = 0; + sf_seen_eor = 0; pre_position (); |