Searched refs:src_dim (Results 1 – 3 of 3) sorted by relevance
| /netbsd-src/external/gpl3/gcc/dist/libgfortran/caf/ |
| H A D | single.c | 1203 int dst_kind, int src_kind, size_t dst_dim, size_t src_dim, in get_for_ref() argument
1239 if (ref->u.a.mode[src_dim] == CAF_ARR_REF_NONE) in get_for_ref()
1288 if (ref->u.a.mode[src_dim] == CAF_ARR_REF_NONE) in get_for_ref()
1297 if (src_dim == 0) in get_for_ref()
1299 switch (ref->u.a.mode[src_dim]) in get_for_ref()
1302 extent_src = GFC_DIMENSION_EXTENT (src->dim[src_dim]); in get_for_ref()
1305 for (size_t idx = 0; idx < ref->u.a.dim[src_dim].v.nvec; in get_for_ref()
1310 ((type *)ref->u.a.dim[src_dim].v.vector)[idx]) \ in get_for_ref()
1311 - GFC_DIMENSION_LBOUND (src->dim[src_dim])) \ in get_for_ref()
1312 * GFC_DIMENSION_STRIDE (src->dim[src_dim]); \ in get_for_ref()
[all …]
|
| /netbsd-src/external/gpl3/gcc.old/dist/libgfortran/caf/ |
| H A D | single.c | 1203 int dst_kind, int src_kind, size_t dst_dim, size_t src_dim, in get_for_ref() argument
1239 if (ref->u.a.mode[src_dim] == CAF_ARR_REF_NONE) in get_for_ref()
1288 if (ref->u.a.mode[src_dim] == CAF_ARR_REF_NONE) in get_for_ref()
1297 if (src_dim == 0) in get_for_ref()
1299 switch (ref->u.a.mode[src_dim]) in get_for_ref()
1302 extent_src = GFC_DIMENSION_EXTENT (src->dim[src_dim]); in get_for_ref()
1305 for (size_t idx = 0; idx < ref->u.a.dim[src_dim].v.nvec; in get_for_ref()
1310 ((type *)ref->u.a.dim[src_dim].v.vector)[idx]) \ in get_for_ref()
1311 - GFC_DIMENSION_LBOUND (src->dim[src_dim])) \ in get_for_ref()
1312 * GFC_DIMENSION_STRIDE (src->dim[src_dim]); \ in get_for_ref()
[all …]
|
| /netbsd-src/external/mit/isl/dist/ |
| H A D | isl_space.c | 3046 isl_size dst_dim, src_dim; in isl_space_replace_params() local
3059 src_dim = isl_space_dim(src, type); in isl_space_replace_params()
3060 if (dst_dim < 0 || src_dim < 0) in isl_space_replace_params()
3064 dst = isl_space_add_dims(dst, type, src_dim); in isl_space_replace_params()
|