https://gcc.gnu.org/g:8d2e44fa19959e8452d500f264f4c96e13ec3617

commit r16-3019-g8d2e44fa19959e8452d500f264f4c96e13ec3617
Author: Mikael Morin <morin-mik...@orange.fr>
Date:   Tue Aug 5 14:58:01 2025 +0200

    fortran: Remove premature initialization of a function result's span
    
    Setting just the span in an otherwise uninitialized array descriptor to
    pass to a function that will use the descriptor for its result (thus do
    the initialization) doesn't seem to be useful.
    
    gcc/fortran/ChangeLog:
    
            * trans-array.cc (gfc_conv_expr_descriptor): Remove
            isolated initialization of the span field before passing to
            the function that will do the initialization.

Diff:
---
 gcc/fortran/trans-array.cc | 8 --------
 1 file changed, 8 deletions(-)

diff --git a/gcc/fortran/trans-array.cc b/gcc/fortran/trans-array.cc
index 45980d656572..f4a7a0c065cb 100644
--- a/gcc/fortran/trans-array.cc
+++ b/gcc/fortran/trans-array.cc
@@ -8499,14 +8499,6 @@ gfc_conv_expr_descriptor (gfc_se *se, gfc_expr *expr)
          else
            gcc_assert (se->ss == ss);
 
-         if (!is_pointer_array (se->expr))
-           {
-             tmp = gfc_get_element_type (TREE_TYPE (se->expr));
-             tmp = fold_convert (gfc_array_index_type,
-                                 size_in_bytes (tmp));
-             gfc_conv_descriptor_span_set (&se->pre, se->expr, tmp);
-           }
-
          se->expr = gfc_build_addr_expr (NULL_TREE, se->expr);
          gfc_conv_expr (se, expr);

Reply via email to