https://gcc.gnu.org/g:ec1af32c85ac46a547dd72d276d55f5cf4eb5117
commit ec1af32c85ac46a547dd72d276d55f5cf4eb5117 Author: Mikael Morin <[email protected]> Date: Wed Oct 1 14:29:41 2025 +0200 Correction régression char_initialiser_actual.f90 Diff: --- gcc/fortran/trans-array.cc | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/gcc/fortran/trans-array.cc b/gcc/fortran/trans-array.cc index 8bed900f6b84..5e3343d7cfa2 100644 --- a/gcc/fortran/trans-array.cc +++ b/gcc/fortran/trans-array.cc @@ -8176,7 +8176,8 @@ gfc_conv_expr_descriptor (gfc_se *se, gfc_expr *expr) bool contiguous = !GFC_BYTES_STRIDES_ARRAY_TYPE_P (TREE_TYPE (desc)) && info->ref && info->ref->u.ar.type == AR_FULL - && !info->ref->next; + && !info->ref->next + && !se->bytes_strided; parmtype = gfc_get_array_type_bounds (parmtype, loop.dimen, codim, loop.from, loop.to, contiguous, GFC_ARRAY_UNKNOWN, false);
