[patch, fortran] PR80333 Namelist dtio write of array of class does not traverse the array

Jerry DeLisle jvdelisle@charter.net
Fri May 19 15:52:00 GMT 2017


On 05/18/2017 07:06 PM, Steve Kargl wrote:
> On Thu, May 18, 2017 at 05:16:45PM -0700, Jerry DeLisle wrote:
>>
>> 2017-05-18  Paul Thomas  <pault@gcc.gnu.org>
>>
>> 	PR fortran/80333
>> 	* trans-io.c (nml_get_addr_expr): If we are dealing with class
>> 	type data set tmp tree to get that address.
>> 	(transfer_namelist_element): Set the array spec to point to the
>> 	the class data.
>>
>> 2017-05-18  Paul Thomas  <pault@gcc.gnu.org>
>> 	    Jerry DeLisle  <jvdelisle@gcc.gnu.org>
>>
>> 	PR fortran/80333
>> 	* list_read.c (nml_read_obj): Compute pointer into class/type
>> 	arrays from the nl->dim information. Update it for each iteration
>> 	of the loop for the given object.
> 
> Looks ok to me.  A few style comments below.
> 
> 

Agreed on style changes. Fixed those, recompiled, retested, and ...
Committed r248293
	A	gcc/testsuite/gfortran.dg/dtio_30.f03
	M	gcc/testsuite/ChangeLog
	M	gcc/fortran/ChangeLog
	M	gcc/fortran/trans-io.c
	M	libgfortran/ChangeLog
	M	libgfortran/io/list_read.c

Thanks for review.

Jerry



More information about the Fortran mailing list