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] | |
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?
MikaelPS: 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] |