| commit | 96b2ddaaf118e002b001faadcdb93e8b9c3eb665 | |
| author | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Wed, 29 Mar 2017 21:37:45 +0000 (29 21:37 +0000) | ||
| committer | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Wed, 29 Mar 2017 21:37:45 +0000 (29 21:37 +0000) | ||
| tree | 44ff4cdae71ae2f346b8b68f7ba425b6743cf859 | treesnapshot (tar.gz zip) |
| parent | 1c6e7ba702b4f21fc647ff18e75c487b35dcf3fd | commitdiff |
2017-03-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/78670
* io/list_read.c (nml_get_obj_data): Delete code which calls the
child read procedure. (nml_read_obj): Insert the code which
calls the child procedure. Don't need to touch nodes if using
dtio since parent will not be traversing the components.
PR libgfortran/78670
* gfortran.dg/dtio_25.f90: Use 'a1' format when trying to read
a character of length 1. Update test for success.
* gfortran.dg/dtio_28.f03: New test.
* gfortran.dg/dtio_4.f90: Update to open test file with status =
'scratch' to delete the file when done.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@246576 138bc75d-0d04-0410-961f-82ee72b054a4
PR libgfortran/78670
* io/list_read.c (nml_get_obj_data): Delete code which calls the
child read procedure. (nml_read_obj): Insert the code which
calls the child procedure. Don't need to touch nodes if using
dtio since parent will not be traversing the components.
PR libgfortran/78670
* gfortran.dg/dtio_25.f90: Use 'a1' format when trying to read
a character of length 1. Update test for success.
* gfortran.dg/dtio_28.f03: New test.
* gfortran.dg/dtio_4.f90: Update to open test file with status =
'scratch' to delete the file when done.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@246576 138bc75d-0d04-0410-961f-82ee72b054a4