diff options
Diffstat (limited to 'gcc/fortran/matchexp.c')
| -rw-r--r-- | gcc/fortran/matchexp.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/fortran/matchexp.c b/gcc/fortran/matchexp.c index a9e90c9..433f4d2 100644 --- a/gcc/fortran/matchexp.c +++ b/gcc/fortran/matchexp.c @@ -142,7 +142,7 @@ gfc_get_parentheses (gfc_expr *e) e2->ts = e->ts; e2->rank = e->rank; e2->where = e->where; - e2->value.op.operator = INTRINSIC_PARENTHESES; + e2->value.op.op = INTRINSIC_PARENTHESES; e2->value.op.op1 = e; e2->value.op.op2 = NULL; return e2; @@ -208,14 +208,14 @@ syntax: /* Build an operator expression node. */ static gfc_expr * -build_node (gfc_intrinsic_op operator, locus *where, +build_node (gfc_intrinsic_op op, locus *where, gfc_expr *op1, gfc_expr *op2) { gfc_expr *new; new = gfc_get_expr (); new->expr_type = EXPR_OP; - new->value.op.operator = operator; + new->value.op.op = op; new->where = *where; new->value.op.op1 = op1; |