2017-10-30 Paul Thomas <pault@gcc.gnu.org>
commit42648dab8cefa452bd45bff83beef6e08cc75fd0
authorpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 30 Oct 2017 22:07:25 +0000 (30 22:07 +0000)
committerpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 30 Oct 2017 22:07:25 +0000 (30 22:07 +0000)
tree287560dcf2ccf6975fc74b2fe5662da3698f6094
parent750ce69025a80e7b885fae39af3ce9aeeaaa99d3
2017-10-30  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/80850
* trans_expr.c (gfc_conv_procedure_call): When passing a class
argument to an unlimited polymorphic dummy, it is wrong to cast
the passed expression as unlimited, unless it is unlimited. The
correct way is to assign to each of the fields and set the _len
field to zero.

2017-10-30  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/80850
* gfortran.dg/class_64_f90 : New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@254244 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/trans-expr.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/class_64.f90 [new file with mode: 0644]