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

commit a690d61759c946c6a7093023c6ef98b3fb7ddf23
Author: Mikael Morin <[email protected]>
Date:   Sun Oct 12 17:51:30 2025 +0200

    Correction partielle coindexed_1.f90

Diff:
---
 gcc/fortran/trans-types.cc | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/gcc/fortran/trans-types.cc b/gcc/fortran/trans-types.cc
index 05b8881cf004..f9c85bc8ba0f 100644
--- a/gcc/fortran/trans-types.cc
+++ b/gcc/fortran/trans-types.cc
@@ -2425,7 +2425,11 @@ contiguous_attr (const symbol_attribute & attr)
 static bool
 is_contiguous (gfc_symbol *sym)
 {
-  if (contiguous_attr (gfc_symbol_attr (sym)))
+  symbol_attribute sym_attr = gfc_symbol_attr (sym);
+  if (sym_attr.pointer)
+    return false;
+
+  if (contiguous_attr (sym_attr))
     return true;
 
   if (!(sym->assoc

Reply via email to