diff options
Diffstat (limited to 'gcc/fortran/simplify.c')
| -rw-r--r-- | gcc/fortran/simplify.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c index 665ea82..b9c4039 100644 --- a/gcc/fortran/simplify.c +++ b/gcc/fortran/simplify.c @@ -1811,6 +1811,7 @@ gfc_simplify_cshift (gfc_expr *array, gfc_expr *shift, gfc_expr *dim) { case EXPR_VARIABLE: case EXPR_ARRAY: + case EXPR_OP: a = gfc_copy_expr (array); gfc_simplify_expr (a, 0); if (!is_constant_array_expr (a)) |