diff options
author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2016-04-19 19:24:28 +0000 |
---|---|---|
committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2016-04-19 19:24:28 +0000 |
commit | 90eeab20f7aec033494f554a7536954b3be63809 (patch) | |
tree | 69912d458025faceac8aac62606abc7afeff10c9 /libgfortran/io | |
parent | 218e9dde70559f520bc54c6b749acb2b678d861e (diff) | |
download | gcc-90eeab20f7aec033494f554a7536954b3be63809.zip gcc-90eeab20f7aec033494f554a7536954b3be63809.tar.gz gcc-90eeab20f7aec033494f554a7536954b3be63809.tar.bz2 |
re PR libfortran/70684 (incorrect reading of values from file on Windows)
2016-04-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/70684
* io/list_read (check_buffers): Add '\r' to check for end of line.
factor.
* gfortran.dg/list_read_14.f90: New test.
From-SVN: r235220
Diffstat (limited to 'libgfortran/io')
-rw-r--r-- | libgfortran/io/list_read.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/io/list_read.c b/libgfortran/io/list_read.c index e24b392..b8e174c 100644 --- a/libgfortran/io/list_read.c +++ b/libgfortran/io/list_read.c @@ -197,7 +197,7 @@ check_buffers (st_parameter_dt *dtp) } done: - dtp->u.p.at_eol = (c == '\n' || c == EOF); + dtp->u.p.at_eol = (c == '\n' || c == '\r' || c == EOF); return c; } |