On Fri, Feb 01, 2019 at 06:15:21PM +0000, Paul Richard Thomas wrote: > 2019-02-01 Paul Thomas <pa...@gcc.gnu.org> > > PR fortran/88393 > * trans-expr.c (gfc_conv_procedure_call): For derived entities, > passed in parentheses to class formals, invert the order of > copying allocatable components to taking taking the _data of > the class expression.
taking taking > Index: gcc/fortran/trans-expr.c > =================================================================== > *** gcc/fortran/trans-expr.c (revision 268231) > --- gcc/fortran/trans-expr.c (working copy) > *************** gfc_conv_procedure_call (gfc_se * se, gf > *** 6042,6047 **** > --- 6042,6057 ---- > break; > } > > + if (e->ts.type == BT_DERIVED && fsym && fsym->ts.type == BT_CLASS) > + { > + /* The derived type is passed to gfc_deallocate_alloc_comp. > + Therefore, class actuals can handled correctly but derived s/can handled/can be handled/ -- Steve