[gcc(refs/users/mikael/heads/refactor_descriptor_v01)] Correction régression modifiable_p

[Mikael Morin via Gcc-cvs]

https://gcc.gnu.org/g:492b272767db328ec8e44345f055dfae56f0b1ea

commit 492b272767db328ec8e44345f055dfae56f0b1ea
Author: Mikael Morin <mik...@gcc.gnu.org>
Date:   Wed Dec 18 21:38:06 2024 +0100

    Correction régression modifiable_p

Diff:
---
 gcc/fortran/trans-array.cc | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/gcc/fortran/trans-array.cc b/gcc/fortran/trans-array.cc
index f6eba3fc7789..5b5365a6905f 100644
--- a/gcc/fortran/trans-array.cc
+++ b/gcc/fortran/trans-array.cc
@@ -934,6 +934,9 @@ modifiable_p (tree data_ref)
 {
   switch (TREE_CODE (data_ref))
     {
+    case INDIRECT_REF:
+      return true;
+
     case CONST_DECL:
       return false;