===================================================================
@@ -1,5 +1,10 @@
-2010-09-17 Thomas Koenig <tkoenig@gcc.gnu.org>
+2010-09-19 Thomas Koenig <tkoenig@gcc.gnu.org>
+ * frontend-passes.c (gfc_expr_walker): Also
+ handle EXPR_SUBSTRING.
+
+2010-09-19 Thomas Koenig <tkoenig@gcc.gnu.org>
+
* frontend-passes.c (gfc_expr_walker): Handle
constructors and references.
===================================================================
@@ -365,6 +365,7 @@
/* Fall through to the variable case in order to walk the
the reference. */
+ case EXPR_SUBSTRING:
case EXPR_VARIABLE:
for (r = (*e)->ref; r; r = r->next)
{