[gcc(refs/users/mikael/heads/refactor_descriptor_v05)] Correction régression pr19928-2

[Mikael Morin via Gcc-cvs]

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

commit bcc8260a409633d0f648c4d92044434092b9db69
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Wed Aug 20 20:24:15 2025 +0200

    Correction régression pr19928-2

Diff:
---
 gcc/fortran/trans-array.cc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/fortran/trans-array.cc b/gcc/fortran/trans-array.cc
index 683b09481dde..0e4b2ca0ba72 100644
--- a/gcc/fortran/trans-array.cc
+++ b/gcc/fortran/trans-array.cc
@@ -3177,7 +3177,7 @@ gfc_conv_ss_descriptor (stmtblock_t * block, gfc_ss * ss, 
int base)
         analysis by pulling the expressions for elemental array indices
         inside the loop.  */
       if (save_descriptor_data (se.expr, data) && !ss->is_alloc_lhs)
-       tmp = gfc_evaluate_now (data, block);
+       data = gfc_evaluate_now (data, block);
       info->data = data;
 
       tmp = gfc_conv_array_offset (se.expr);