https://gcc.gnu.org/g:1061a31c832a71cb20dfec29a26fec20f7873bb1
commit 1061a31c832a71cb20dfec29a26fec20f7873bb1 Author: Mikael Morin <[email protected]> Date: Wed Oct 15 19:28:33 2025 +0200 Correction régression transpose_4.f90 Diff: --- gcc/fortran/trans-expr.cc | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/gcc/fortran/trans-expr.cc b/gcc/fortran/trans-expr.cc index 679e3e8fbc54..08176b84f2c7 100644 --- a/gcc/fortran/trans-expr.cc +++ b/gcc/fortran/trans-expr.cc @@ -6611,7 +6611,12 @@ contiguous_argument (gfc_actual_arglist *arg) { if (isym->id == GFC_ISYM_CAF_GET) return true; - return false; + + gfc_expr *noncopying_arg = gfc_get_noncopying_intrinsic_argument (expr); + if (noncopying_arg) + expr = noncopying_arg; + else + return false; } if (dummy == nullptr)
