diff options
author | Kaveh R. Ghazi <ghazi@caip.rutgers.edu> | 2008-07-18 17:54:46 +0000 |
---|---|---|
committer | Kaveh Ghazi <ghazi@gcc.gnu.org> | 2008-07-18 17:54:46 +0000 |
commit | 8b11b59f739d3c38efb356e8d1a0a1282ada3657 (patch) | |
tree | 5f65a0132f3a210fdb23e24fea9fb6b3d802707a /gcc/fortran/arith.c | |
parent | be93747e8b27f86a1df8b30b050daae5c63206d0 (diff) | |
download | gcc-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.c | 4 |
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: |