[gcc(refs/users/mikael/heads/refactor_descriptor_v05)] Correction régression pointer_assign_14

[Mikael Morin via Gcc-cvs]

https://gcc.gnu.org/g:2d8f8aecb166cc6ecb8cf711281a2c2d3f717364

commit 2d8f8aecb166cc6ecb8cf711281a2c2d3f717364
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Tue Jun 3 17:24:15 2025 +0200

    Correction régression pointer_assign_14

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

diff --git a/gcc/fortran/expr.cc b/gcc/fortran/expr.cc
index cc55e019e071..67dde85a1e42 100644
--- a/gcc/fortran/expr.cc
+++ b/gcc/fortran/expr.cc
@@ -1183,9 +1183,6 @@ is_subref_array (gfc_expr * e)
 
   sym = e->symtree->n.sym;
 
-  if (sym->attr.subref_array_pointer)
-    return true;
-
   seen_array = false;
 
   for (ref = e->ref; ref; ref = ref->next)