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

Reply via email to