[gcc(refs/users/mikael/heads/refactor_descriptor_v05)] Correction initialisation saved_data

[Mikael Morin via Gcc-cvs]

https://gcc.gnu.org/g:560eacfafb8198e47e55b174bf38d9c25d2058bf

commit 560eacfafb8198e47e55b174bf38d9c25d2058bf
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Tue Jul 15 14:06:50 2025 +0200

    Correction initialisation saved_data

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 c7d30b3cfd51..76699e0e90b0 100644
--- a/gcc/fortran/trans-array.cc
+++ b/gcc/fortran/trans-array.cc
@@ -10253,7 +10253,7 @@ update_reallocated_descriptor (stmtblock_t *block, 
gfc_loopinfo *loop)
       if (save_descriptor_data (info->descriptor, info->data))
        SAVE_VALUE (info->data);
       SAVE_VALUE (info->offset);
-      info->saved_data = info->offset;
+      info->saved_data = info->data;
       for (int i = 0; i < s->dimen; i++)
        {
          int dim = s->dim[i];