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

commit fd1e6c1e54efe882c464e470b557e11ea1eb3ba7
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Fri May 2 14:40:25 2025 +0200

    Correction régressions realloc_on_assign_{10,11}

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

diff --git a/gcc/fortran/trans-descriptor.cc b/gcc/fortran/trans-descriptor.cc
index b01618dae58e..39a5cceccdf3 100644
--- a/gcc/fortran/trans-descriptor.cc
+++ b/gcc/fortran/trans-descriptor.cc
@@ -2445,7 +2445,7 @@ gfc_conv_shift_descriptor (stmtblock_t *block, tree dest, 
tree src,
                           int rank, tree zero_cond)
 {
   conv_shift_descriptor (block, src, dest, rank,
-                        cond_descr_lb (src, zero_cond));
+                        cond_descr_lb (dest, zero_cond));
 }

Reply via email to