https://gcc.gnu.org/g:ce4a2a81067f7c153a29b6b888db34f7954247a0
commit ce4a2a81067f7c153a29b6b888db34f7954247a0 Author: Mikael Morin <[email protected]> Date: Sat Sep 27 21:44:20 2025 +0200 Correction régression dependency_1.f90 Diff: --- gcc/fortran/trans-array.cc | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/gcc/fortran/trans-array.cc b/gcc/fortran/trans-array.cc index bcb8f6bc93c4..751f4fd96e03 100644 --- a/gcc/fortran/trans-array.cc +++ b/gcc/fortran/trans-array.cc @@ -7017,7 +7017,12 @@ gfc_trans_dummy_array_bias (gfc_symbol * sym, tree tmpdesc, stride, gfc_index_zero_node); tree default_stride; if (GFC_BYTES_STRIDES_ARRAY_TYPE_P (TREE_TYPE (dumdesc))) - default_stride = gfc_conv_descriptor_elem_len_get (dumdesc); + { + default_stride = gfc_conv_descriptor_elem_len_get (dumdesc); + default_stride = fold_convert_loc (input_location, + gfc_array_index_type, + default_stride); + } else default_stride = gfc_index_one_node; tmp = fold_build3_loc (input_location, COND_EXPR, gfc_array_index_type,
