https://gcc.gnu.org/g:9f2c0f21c1bd4393bec1981738552cb69a5197f1
commit 9f2c0f21c1bd4393bec1981738552cb69a5197f1 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 dd082901a658..b4ed4cf84899 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);
