aboutsummaryrefslogtreecommitdiff
path: root/libgfortran/io
diff options
context:
space:
mode:
authorJerry DeLisle <jvdelisle@gcc.gnu.org>2016-04-19 19:24:28 +0000
committerJerry DeLisle <jvdelisle@gcc.gnu.org>2016-04-19 19:24:28 +0000
commit90eeab20f7aec033494f554a7536954b3be63809 (patch)
tree69912d458025faceac8aac62606abc7afeff10c9 /libgfortran/io
parent218e9dde70559f520bc54c6b749acb2b678d861e (diff)
downloadgcc-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.c2
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;
}