diff options
Diffstat (limited to 'gcc/fortran/trans-openmp.c')
-rw-r--r-- | gcc/fortran/trans-openmp.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/trans-openmp.c b/gcc/fortran/trans-openmp.c index 32020cc433a..66abf3f6711 100644 --- a/gcc/fortran/trans-openmp.c +++ b/gcc/fortran/trans-openmp.c @@ -288,7 +288,7 @@ gfc_trans_omp_array_reduction (tree c, gfc_symbol *sym, locus where) tree decl, backend_decl, stmt; locus old_loc = gfc_current_locus; const char *iname; - try t; + check t; decl = OMP_CLAUSE_DECL (c); gfc_current_locus = where; @@ -737,7 +737,7 @@ gfc_trans_omp_atomic (gfc_code *code) if (expr2->expr_type == EXPR_OP) { gfc_expr *e; - switch (expr2->value.op.operator) + switch (expr2->value.op.foperator) { case INTRINSIC_PLUS: op = PLUS_EXPR; |