aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/arith.c
diff options
context:
space:
mode:
authorKaveh R. Ghazi <ghazi@caip.rutgers.edu>2008-07-18 17:54:46 +0000
committerKaveh Ghazi <ghazi@gcc.gnu.org>2008-07-18 17:54:46 +0000
commit8b11b59f739d3c38efb356e8d1a0a1282ada3657 (patch)
tree5f65a0132f3a210fdb23e24fea9fb6b3d802707a /gcc/fortran/arith.c
parentbe93747e8b27f86a1df8b30b050daae5c63206d0 (diff)
downloadgcc-8b11b59f739d3c38efb356e8d1a0a1282ada3657.zip
gcc-8b11b59f739d3c38efb356e8d1a0a1282ada3657.tar.gz
gcc-8b11b59f739d3c38efb356e8d1a0a1282ada3657.tar.bz2
arith.c (eval_type_intrinsic0): Avoid C++ keywords.
* arith.c (eval_type_intrinsic0): Avoid C++ keywords. * gfortran.h (try, protected, operator, new): Likewise. From-SVN: r137960
Diffstat (limited to 'gcc/fortran/arith.c')
-rw-r--r--gcc/fortran/arith.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/arith.c b/gcc/fortran/arith.c
index bd32145..ca6de63 100644
--- a/gcc/fortran/arith.c
+++ b/gcc/fortran/arith.c
@@ -1739,12 +1739,12 @@ runtime:
/* Modify type of expression for zero size array. */
static gfc_expr *
-eval_type_intrinsic0 (gfc_intrinsic_op operator, gfc_expr *op)
+eval_type_intrinsic0 (gfc_intrinsic_op iop, gfc_expr *op)
{
if (op == NULL)
gfc_internal_error ("eval_type_intrinsic0(): op NULL");
- switch (operator)
+ switch (iop)
{
case INTRINSIC_GE:
case INTRINSIC_GE_OS: