This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [patch, Fortran] Fix PR 71902


Hello,

Le 14/08/2016 à 15:05, Thomas Koenig a écrit :
Index: frontend-passes.c
===================================================================
--- frontend-passes.c	(Revision 239218)
+++ frontend-passes.c	(Arbeitskopie)
@@ -177,6 +178,13 @@ realloc_string_callback (gfc_code **c, int *walk_s
   if (expr2->expr_type != EXPR_VARIABLE)
     return 0;

+  /* Only substring expressions can be affected; substrings are always the
+   last reference.  */
+
+  for (ref = expr2->ref; ref; ref = ref->next)
+    if (ref->type != REF_SUBSTRING)
+      return 0;
+
   if (!gfc_check_dependency (expr1, expr2, true))
     return 0;

This doesn't look correct, what about substrings following component or array references?

Mikael

PS: What about the original fix, wasn't it a dependency problem/inaccuracy after all?


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]