Searched refs:codimen (Results 1 - 9 of 9) sorted by relevance
/haiku-buildtools/gcc/gcc/fortran/ |
H A D | array.c | 70 i = ar->dimen + ar->codimen; 223 for (ar->codimen = 0; ar->codimen + ar->dimen < GFC_MAX_DIMENSIONS; ar->codimen++) 231 ar->codimen++; 232 if (ar->codimen < corank) 235 corank, ar->codimen); 238 if (ar->codimen > corank) 241 corank, ar->codimen); 251 ar->codimen [all...] |
H A D | trans-types.c | 1741 gfc_get_array_descriptor_base (int dimen, int codimen, bool restricted, 1752 idx = 2 * (codimen + dimen) + restricted; 1754 gcc_assert (codimen + dimen >= 0 && codimen + dimen <= GFC_MAX_DIMENSIONS); 1756 if (flag_coarray == GFC_FCOARRAY_LIB && codimen) 1767 sprintf (name, "array_descriptor" GFC_RANK_PRINTF_FORMAT, dimen + codimen); 1791 if (dimen + codimen > 0) 1797 gfc_rank_cst[codimen + dimen - 1])); 1804 if (flag_coarray == GFC_FCOARRAY_LIB && codimen 1817 if (flag_coarray == GFC_FCOARRAY_LIB && codimen 1734 gfc_get_array_descriptor_base(int dimen, int codimen, bool restricted, enum gfc_array_kind akind) argument 1823 gfc_get_array_type_bounds(tree etype, int dimen, int codimen, tree * lbound, tree * ubound, int packed, enum gfc_array_kind akind, bool restricted) argument [all...] |
H A D | expr.c | 3442 if (ref->type == REF_ARRAY && ref->u.ar.codimen) 3773 if (ref->type == REF_ARRAY && ref->u.ar.codimen) 4431 gcc_assert (ref->type == REF_ARRAY && ref->u.ar.codimen > 0); 4433 for (n = ref->u.ar.dimen; n < ref->u.ar.dimen + ref->u.ar.codimen; n++) 4447 if (ref->type == REF_ARRAY && ref->u.ar.codimen > 0) 4503 if (ref->u.ar.codimen > 0 && !gfc_ref_this_image (ref))
|
H A D | resolve.c | 4157 /* ar->codimen == 0 is a local array. */ 4158 if (as->corank != ar->codimen && ar->codimen != 0) 4161 &ar->where, ar->codimen, as->corank); 4170 if (ar->codimen != 0) 4341 for (i = 0; i < ar->dimen + ar->codimen; i++) 4446 if (ar->as->corank && ar->codimen == 0) 4449 ar->codimen = ar->as->corank; 4450 for (n = ar->dimen; n < ar->dimen + ar->codimen; n++) 4837 if (ref->type == REF_ARRAY && ref->u.ar.codimen > [all...] |
H A D | trans-expr.c | 1909 if (ref->type == REF_ARRAY && ref->u.ar.codimen > 0) 1916 for (i = ref->u.ar.dimen; i < ref->u.ar.dimen + ref->u.ar.codimen; i++) 1929 if (i < ref->u.ar.dimen + ref->u.ar.codimen - 1) 1939 for (i = ref->u.ar.dimen; i < ref->u.ar.dimen + ref->u.ar.codimen; i++) 1952 if (i < ref->u.ar.dimen + ref->u.ar.codimen - 1)
|
H A D | gfortran.h | 1767 int codimen; member in struct:gfc_array_ref
|
H A D | trans-array.c | 3218 gcc_assert (ar->codimen); 5253 || (ref->u.ar.dimen == 0 && ref->u.ar.codimen > 0)); 6481 && ref->u.ar.codimen > 0)
|
H A D | match.c | 5336 for (int i = 0; i < ref->u.ar.dimen + ref->u.ar.codimen; i++)
|
H A D | openmp.c | 3123 else if (n->expr->ref->u.ar.codimen)
|
Completed in 247 milliseconds