diff options
author | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-03-22 18:42:52 +0000 |
---|---|---|
committer | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-03-22 18:42:52 +0000 |
commit | 20fe784c3b92d3a86092b77ce97c7d026776230b (patch) | |
tree | 4549632a36310121f7f91f684f59d39540d29c23 /libgfortran | |
parent | 19402f571a690a9981c90011a7c01f966bb13dd3 (diff) | |
download | linaro-gcc-20fe784c3b92d3a86092b77ce97c7d026776230b.tar.gz linaro-gcc-20fe784c3b92d3a86092b77ce97c7d026776230b.tar.bz2 linaro-gcc-20fe784c3b92d3a86092b77ce97c7d026776230b.zip |
2015-03-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/59513
* io/transfer.c (data_transfer_init): Do not error for
-std=legacy.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@221572 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran')
-rw-r--r-- | libgfortran/ChangeLog | 6 | ||||
-rw-r--r-- | libgfortran/io/transfer.c | 3 |
2 files changed, 8 insertions, 1 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 031b2ba3c37..d66fc4b6bec 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,9 @@ +2015-03-22 Jerry DeLisle <jvdelisle@gcc.gnu.org> + + PR libgfortran/59513 + * io/transfer.c (data_transfer_init): Do not error for + -std=legacy. + 2015-03-16 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/64432 diff --git a/libgfortran/io/transfer.c b/libgfortran/io/transfer.c index 1dc3fd1fd7b..3005a1f07b0 100644 --- a/libgfortran/io/transfer.c +++ b/libgfortran/io/transfer.c @@ -2533,7 +2533,8 @@ data_transfer_init (st_parameter_dt *dtp, int read_flag) return; } - if (dtp->u.p.current_unit->endfile == AFTER_ENDFILE) + if (compile_options.warn_std && + dtp->u.p.current_unit->endfile == AFTER_ENDFILE) { generate_error (&dtp->common, LIBERROR_OPTION_CONFLICT, "Sequential READ or WRITE not allowed after " |