[gcc(refs/users/mikael/heads/pr127612_v01)] Correction compil'

[Mikael Morin via Gcc-cvs]

https://gcc.gnu.org/g:bc2a607f3c9473bbb043b72590c5c7d1c89af315

commit bc2a607f3c9473bbb043b72590c5c7d1c89af315
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Fri Oct 9 20:28:41 2026 +0200

    Correction compil'

Diff:
---
 gcc/fortran/trans-expr.cc | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gcc/fortran/trans-expr.cc b/gcc/fortran/trans-expr.cc
index fd1d44da5963..ec5e891e6a8a 100644
--- a/gcc/fortran/trans-expr.cc
+++ b/gcc/fortran/trans-expr.cc
@@ -11626,9 +11626,9 @@ get_array_span (gfc_expr * expr, gfc_se & array)
                  && expr->ts.u.cl->length->expr_type
                     == EXPR_CONSTANT)))
        {
-         tmp = TREE_TYPE (rse.expr);
+         tree tmp = TREE_TYPE (rse.expr);
          tmp = TYPE_SIZE_UNIT (gfc_get_element_type (tmp));
-         span = fold_convert (gfc_array_index_type, tmp);
+         tree span = fold_convert (gfc_array_index_type, tmp);
          gcc_checking_assert (CONSTANT_CLASS_P (span));
          return span;
        }
@@ -11648,7 +11648,7 @@ get_array_span (gfc_expr * expr, gfc_se & array)
        }
     }
 
-  return gfc_get_array_span (array, expr);
+  return gfc_get_array_span (array.expr, expr);
 }