aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThomas Koenig <tkoenig@gcc.gnu.org>2010-09-18 22:45:13 +0000
committerThomas Koenig <tkoenig@gcc.gnu.org>2010-09-18 22:45:13 +0000
commit1151446c17ede83ed30b2bfc68137e7573ed0d99 (patch)
tree9d0ff6aa5e622f0f1ab56c828e3fe4ca38298ae2
parent46f19baf762ff4140dcfd18a0f424d0cec0e4615 (diff)
downloadgcc-1151446c17ede83ed30b2bfc68137e7573ed0d99.zip
gcc-1151446c17ede83ed30b2bfc68137e7573ed0d99.tar.gz
gcc-1151446c17ede83ed30b2bfc68137e7573ed0d99.tar.bz2
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): Also handle EXPR_SUBSTRING. From-SVN: r164404
-rw-r--r--gcc/fortran/ChangeLog7
-rw-r--r--gcc/fortran/frontend-passes.c1
2 files changed, 7 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 268bccb..677902f 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,4 +1,9 @@
-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.
diff --git a/gcc/fortran/frontend-passes.c b/gcc/fortran/frontend-passes.c
index bfa7a99..b456f47 100644
--- a/gcc/fortran/frontend-passes.c
+++ b/gcc/fortran/frontend-passes.c
@@ -365,6 +365,7 @@ gfc_expr_walker (gfc_expr **e, walk_expr_fn_t exprfn, void *data)
/* 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)
{