Searched refs:ntags (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/sys/utils/ |
| H A D | mpits.c | 289 … PetscMPIInt *nfrom, PetscMPIInt **fromranks, void *fromdata, PetscMPIInt ntags, MPI_Request **tor… in PetscCommBuildTwoSidedFReq_Reference() argument
296 PetscCall(PetscMalloc1(ntags, &tag)); in PetscCommBuildTwoSidedFReq_Reference()
297 if (ntags > 0) PetscCall(PetscCommDuplicate(comm, &comm, &tag[0])); in PetscCommBuildTwoSidedFReq_Reference()
298 for (i = 1; i < ntags; i++) PetscCall(PetscCommGetNewTag(comm, &tag[i])); in PetscCommBuildTwoSidedFReq_Reference()
303 PetscCall(PetscMalloc1(nto * ntags, &sendreq)); in PetscCommBuildTwoSidedFReq_Reference()
304 PetscCall(PetscMalloc1(*nfrom * ntags, &recvreq)); in PetscCommBuildTwoSidedFReq_Reference()
310 for (k = 0; k < ntags; k++) sendreq[i * ntags + k] = MPI_REQUEST_NULL; in PetscCommBuildTwoSidedFReq_Reference()
311 …nd)(comm, tag, i, toranks[i], ((char *)todata) + count * unitbytes * i, sendreq + i * ntags, ctx)); in PetscCommBuildTwoSidedFReq_Reference()
316 for (k = 0; k < ntags; k++) recvreq[i * ntags + k] = MPI_REQUEST_NULL; in PetscCommBuildTwoSidedFReq_Reference()
317 PetscCall((*recv)(comm, tag, (*fromranks)[i], header, recvreq + i * ntags, ctx)); in PetscCommBuildTwoSidedFReq_Reference()
[all …]
|