diff options
Diffstat (limited to 'gcc/fortran/trans-intrinsic.cc')
| -rw-r--r-- | gcc/fortran/trans-intrinsic.cc | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/fortran/trans-intrinsic.cc b/gcc/fortran/trans-intrinsic.cc index 20309aa..1a28bfa 100644 --- a/gcc/fortran/trans-intrinsic.cc +++ b/gcc/fortran/trans-intrinsic.cc @@ -1811,8 +1811,7 @@ gfc_conv_intrinsic_caf_get (gfc_se *se, gfc_expr *expr, tree lhs, gfc_namespace *ns; gfc_expr *get_fn_hash = expr->value.function.actual->next->expr, *get_fn_expr = expr->value.function.actual->next->next->expr; - gfc_symbol *add_data_sym - = get_fn_expr->symtree->n.sym->formal->next->next->next->sym; + gfc_symbol *add_data_sym = get_fn_expr->symtree->n.sym->formal->sym; gcc_assert (flag_coarray == GFC_FCOARRAY_LIB); |