diff options
Diffstat (limited to 'gcc/fortran/expr.c')
-rw-r--r-- | gcc/fortran/expr.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/fortran/expr.c b/gcc/fortran/expr.c index 7328898..6d0eb22 100644 --- a/gcc/fortran/expr.c +++ b/gcc/fortran/expr.c @@ -4437,9 +4437,9 @@ gfc_find_stat_co(gfc_expr *e) if (ref->type == REF_ARRAY && ref->u.ar.codimen > 0) return ref->u.ar.stat; - if(e->value.function.actual->expr) - for(ref = e->value.function.actual->expr->ref; ref; - ref = ref->next) + if (e->value.function.actual->expr) + for (ref = e->value.function.actual->expr->ref; ref; + ref = ref->next) if (ref->type == REF_ARRAY && ref->u.ar.codimen > 0) return ref->u.ar.stat; |