[gcc(refs/users/mikael/heads/refactor_descriptor_v05)] Suppression mise à jour offset forall

[Mikael Morin]

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

commit ec2b25b14606ae24abd6d06ef74afa18fa608ac0
Author: Mikael Morin <mikael@gcc.gnu.org>
Date:   Mon Feb 17 17:28:01 2025 +0100

    Suppression mise à jour offset forall

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

diff --git a/gcc/fortran/trans-stmt.cc b/gcc/fortran/trans-stmt.cc
index 0876fe60359f..f058b415a863 100644
--- a/gcc/fortran/trans-stmt.cc
+++ b/gcc/fortran/trans-stmt.cc
@@ -4115,13 +4115,6 @@ forall_make_variable_temp (gfc_code *c, stmtblock_t *pre, stmtblock_t *post)
       gfc_add_block_to_block (pre, &tse.pre);
       gfc_add_block_to_block (post, &tse.post);
       tse.expr = build_fold_indirect_ref_loc (input_location, tse.expr);
-
-      if (c->expr1->ref->u.ar.type != AR_SECTION)
-	{
-	  /* Use the variable offset for the temporary.  */
-	  tmp = gfc_conv_array_offset (old_sym->backend_decl);
-	  gfc_conv_descriptor_offset_set (pre, tse.expr, tmp);
-	}
     }
   else
     {