aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/arith.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/arith.c')
-rw-r--r--gcc/fortran/arith.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/fortran/arith.c b/gcc/fortran/arith.c
index aac3cb4..a65447a 100644
--- a/gcc/fortran/arith.c
+++ b/gcc/fortran/arith.c
@@ -1507,6 +1507,12 @@ eval_intrinsic (gfc_intrinsic_op operator,
unary = 1;
break;
+ case INTRINSIC_PARENTHESES:
+ temp.ts = op1->ts;
+
+ unary = 1;
+ break;
+
case INTRINSIC_GE:
case INTRINSIC_LT: /* Additional restrictions */
case INTRINSIC_LE: /* for ordering relations. */