r246070 - in /trunk: gcc/testsuite/ChangeLog gc...

[jvdelisle@gcc.gnu.org]

Author: jvdelisle
Date: Sat Mar 11 14:49:57 2017
New Revision: 246070

URL: https://gcc.gnu.org/viewcvs?rev=246070&root=gcc&view=rev
Log:
2017-03-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libgfortran/78854
	* io/list_read.c (nml_get_obj_data): Stash internal unit for
	later use by child procedures.
	* io/write.c (nml_write_obj): Likewise.
	* io/tranfer.c (data_transfer_init): Minor whitespace.
	* io/unit.c (set_internal_uit): Look for the stashed internal
	unit and use it if found.

	* gfortran.dg/dtio_25.f90: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/dtio_25.f90
Modified:
    trunk/gcc/testsuite/ChangeLog
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/io/list_read.c
    trunk/libgfortran/io/transfer.c
    trunk/libgfortran/io/unit.c
    trunk/libgfortran/io/write.c