diff options
| author | ghazi <ghazi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-07-18 17:54:46 +0000 |
|---|---|---|
| committer | ghazi <ghazi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-07-18 17:54:46 +0000 |
| commit | 63321a266a51456a62dd0b49c8a31d7d5318388f (patch) | |
| tree | 5f65a0132f3a210fdb23e24fea9fb6b3d802707a /gcc/fortran/arith.c | |
| parent | 607a5d68db3923154f4a6d2ffe6389740a791455 (diff) | |
| download | gcc-63321a266a51456a62dd0b49c8a31d7d5318388f.tar.gz | |
* arith.c (eval_type_intrinsic0): Avoid C++ keywords.
* gfortran.h (try, protected, operator, new): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@137960 138bc75d-0d04-0410-961f-82ee72b054a4
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 bd3214584dd..ca6de639db4 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: |