https://gcc.gnu.org/bugzilla/show_bug.cgi?id=116196

--- Comment #1 from Mikael Morin <mikael at gcc dot gnu.org> ---
Draft patch:

diff --git a/gcc/fortran/dependency.cc b/gcc/fortran/dependency.cc
index 15edf1af9df..348fd562ef6 100644
--- a/gcc/fortran/dependency.cc
+++ b/gcc/fortran/dependency.cc
@@ -1253,11 +1253,8 @@ check_data_pointer_types (gfc_expr *expr1, gfc_expr
*expr2)
   if (sym1->ts.type == BT_DERIVED && sym2->ts.type == BT_DERIVED)
     return false;

-  if (sym1->attr.pointer)
-    {
-      if (gfc_compare_types (&sym1->ts, &sym2->ts))
-       return false;
-    }
+  if (gfc_compare_types (&sym1->ts, &sym2->ts))
+    return false;

   /* This is a conservative check on the components of the derived type
      if no component references have been seen.  Since we will not dig

Reply via email to