| commit | 8c32e08987e340d28650788c8817f4aecd01b65a | |
| author | pault <pault@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Mon, 20 Nov 2017 19:09:34 +0000 (20 19:09 +0000) | ||
| committer | pault <pault@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Mon, 20 Nov 2017 19:09:34 +0000 (20 19:09 +0000) | ||
| tree | 8f3c208186072440d44271d3cd80eb69ade5e1bf | treesnapshot (tar.gz zip) |
| parent | f46fa4e9e17849f9e5dbf150f9d488ee49a8352c | commitdiff |
2017-11-20 Paul Thomas <pault@gcc.gnu.org>
PR fortran/79072
* trans-expr.c (trans_class_vptr_len_assignment): Set from_len
if the temporary is unlimited polymorphic.
* trans-stmt.c (trans_associate_var): Use the fake result decl
to obtain the 'len' field from an explicit function result when
in that function scope.
2017-11-20 Paul Thomas <pault@gcc.gnu.org>
PR fortran/79072
* gfortran.dg/class_result_5.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@254966 138bc75d-0d04-0410-961f-82ee72b054a4
PR fortran/79072
* trans-expr.c (trans_class_vptr_len_assignment): Set from_len
if the temporary is unlimited polymorphic.
* trans-stmt.c (trans_associate_var): Use the fake result decl
to obtain the 'len' field from an explicit function result when
in that function scope.
2017-11-20 Paul Thomas <pault@gcc.gnu.org>
PR fortran/79072
* gfortran.dg/class_result_5.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@254966 138bc75d-0d04-0410-961f-82ee72b054a4