diff options
| author | dfranke <dfranke@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-05-29 21:10:48 +0000 |
|---|---|---|
| committer | dfranke <dfranke@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-05-29 21:10:48 +0000 |
| commit | 55cb441751477d3a0cfba330de34109fe9b07ec7 (patch) | |
| tree | a073a1400b9461ba32692af86f7f2c527a3cad86 /gcc/fortran/openmp.c | |
| parent | 2764a3f44987acc095807badcb8007cf28fe8633 (diff) | |
| download | gcc-55cb441751477d3a0cfba330de34109fe9b07ec7.tar.gz | |
2007-05-29 Daniel Franke <franke.daniel@gmail.com>
* gfortran.h: Renamed 'enum gfc_generic_isym_id' to 'enum gfc_isym_id',
added missing GFC_ISYM_* enumerators, ordered alphabetically.
(struct gfc_intrinsic_sym): Renamed 'generic_id' to 'id'.
(gfc_find_subroutine): New prototype.
* intrinsic.c (add_sym, add_sym_*): Added argument 'id' and changed all callers.
(find_subroutine): Renamed to 'gfc_find_subroutine', removed static.
* dependency.c: Changed usage of isym->generic_id to isym->id.
* openmp.c: Likewise.
* resolve.c: Likewise.
* trans-array.c: Likewise.
* trans-expr.c: Likewise.
* trans-intrinsic.c: Likewise.
* trans-openmp.c: Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@125168 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/openmp.c')
| -rw-r--r-- | gcc/fortran/openmp.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c index 42b5aa15dba..9c5c03335ea 100644 --- a/gcc/fortran/openmp.c +++ b/gcc/fortran/openmp.c @@ -942,7 +942,7 @@ is_conversion (gfc_expr *expr, bool widening) if (expr->expr_type != EXPR_FUNCTION || expr->value.function.isym == NULL || expr->value.function.esym != NULL - || expr->value.function.isym->generic_id != GFC_ISYM_CONVERSION) + || expr->value.function.isym->id != GFC_ISYM_CONVERSION) return NULL; if (widening) @@ -1130,7 +1130,7 @@ resolve_omp_atomic (gfc_code *code) { gfc_actual_arglist *arg, *var_arg; - switch (expr2->value.function.isym->generic_id) + switch (expr2->value.function.isym->id) { case GFC_ISYM_MIN: case GFC_ISYM_MAX: |