https://gcc.gnu.org/g:6f09819583bf8f197c5ac367cfd118dfea41af81
commit 6f09819583bf8f197c5ac367cfd118dfea41af81 Author: Mikael Morin <[email protected]> Date: Sat Feb 15 18:29:16 2025 +0100 Correction régression class_assign_4.f90 Diff: --- gcc/fortran/trans-array.cc | 6 ------ 1 file changed, 6 deletions(-) diff --git a/gcc/fortran/trans-array.cc b/gcc/fortran/trans-array.cc index 008829140eb7..04965132c4f7 100644 --- a/gcc/fortran/trans-array.cc +++ b/gcc/fortran/trans-array.cc @@ -3630,12 +3630,6 @@ get_class_info_from_ss (stmtblock_t * pre, gfc_ss *ss, tree *eltype, tmp2 = gfc_class_len_get (class_expr); gfc_add_modify (pre, tmp, tmp2); } - - if (rhs_function) - { - tmp = gfc_class_data_get (class_expr); - gfc_conv_descriptor_offset_set (pre, tmp, gfc_index_zero_node); - } } else if (rhs_ss->info->data.array.descriptor) {
