https://gcc.gnu.org/g:f197e8e4368ff21896d92bc57c0d583f878ba154
commit f197e8e4368ff21896d92bc57c0d583f878ba154 Author: Mikael Morin <mik...@gcc.gnu.org> Date: Wed Dec 11 17:09:19 2024 +0100 essai suppression Diff: --- gcc/fortran/trans-expr.cc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/fortran/trans-expr.cc b/gcc/fortran/trans-expr.cc index d07c3e12a4e4..03175aff881e 100644 --- a/gcc/fortran/trans-expr.cc +++ b/gcc/fortran/trans-expr.cc @@ -7535,7 +7535,7 @@ gfc_conv_procedure_call (gfc_se * se, gfc_symbol * sym, /* Unallocated allocatable arrays and unassociated pointer arrays need their dtype setting if they are argument associated with assumed rank dummies to set the rank. */ - set_dtype_for_unallocated (&parmse, e); + //set_dtype_for_unallocated (&parmse, e); } else if (e->expr_type == EXPR_VARIABLE && e->symtree->n.sym->attr.dummy