X-Git-Url: http://bilbo.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/bb1ec3ebdc8aad0b788cfded0ca9bf7b071a6721..004b932fe967a47a2ded3795af9dc069c3de9671:/src/smpi/colls/allreduce-smp-rdb.cpp diff --git a/src/smpi/colls/allreduce-smp-rdb.cpp b/src/smpi/colls/allreduce-smp-rdb.cpp index b95bf7f443..a330eef93d 100644 --- a/src/smpi/colls/allreduce-smp-rdb.cpp +++ b/src/smpi/colls/allreduce-smp-rdb.cpp @@ -68,7 +68,7 @@ int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count, int inter_comm_size = (comm_size + num_core - 1) / num_core; /* copy input buffer to output buffer */ - smpi_mpi_sendrecv(send_buf, count, dtype, rank, tag, + Request::sendrecv(send_buf, count, dtype, rank, tag, recv_buf, count, dtype, rank, tag, comm, &status); /* start binomial reduce intra communication inside each SMP node */ @@ -77,12 +77,12 @@ int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count, if ((mask & intra_rank) == 0) { src = (inter_rank * num_core) + (intra_rank | mask); if (src < comm_size) { - smpi_mpi_recv(tmp_buf, count, dtype, src, tag, comm, &status); + Request::recv(tmp_buf, count, dtype, src, tag, comm, &status); smpi_op_apply(op, tmp_buf, recv_buf, &count, &dtype); } } else { dst = (inter_rank * num_core) + (intra_rank & (~mask)); - smpi_mpi_send(recv_buf, count, dtype, dst, tag, comm); + Request::send(recv_buf, count, dtype, dst, tag, comm); break; } mask <<= 1; @@ -110,11 +110,11 @@ int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count, if (inter_rank < 2 * rem) { if (inter_rank % 2 == 0) { dst = rank + num_core; - smpi_mpi_send(recv_buf, count, dtype, dst, tag, comm); + Request::send(recv_buf, count, dtype, dst, tag, comm); newrank = -1; } else { src = rank - num_core; - smpi_mpi_recv(tmp_buf, count, dtype, src, tag, comm, &status); + Request::recv(tmp_buf, count, dtype, src, tag, comm, &status); smpi_op_apply(op, tmp_buf, recv_buf, &count, &dtype); newrank = inter_rank / 2; } @@ -139,7 +139,7 @@ int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count, dst *= num_core; /* exchange data in rdb manner */ - smpi_mpi_sendrecv(recv_buf, count, dtype, dst, tag, tmp_buf, count, dtype, + Request::sendrecv(recv_buf, count, dtype, dst, tag, tmp_buf, count, dtype, dst, tag, comm, &status); smpi_op_apply(op, tmp_buf, recv_buf, &count, &dtype); mask <<= 1; @@ -151,9 +151,9 @@ int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count, */ if (inter_rank < 2 * rem) { if (inter_rank % 2) { - smpi_mpi_send(recv_buf, count, dtype, rank - num_core, tag, comm); + Request::send(recv_buf, count, dtype, rank - num_core, tag, comm); } else { - smpi_mpi_recv(recv_buf, count, dtype, rank + num_core, tag, comm, &status); + Request::recv(recv_buf, count, dtype, rank + num_core, tag, comm, &status); } } } @@ -167,7 +167,7 @@ int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count, while (mask < num_core_in_current_smp) { if (intra_rank & mask) { src = (inter_rank * num_core) + (intra_rank - mask); - smpi_mpi_recv(recv_buf, count, dtype, src, tag, comm, &status); + Request::recv(recv_buf, count, dtype, src, tag, comm, &status); break; } mask <<= 1; @@ -177,7 +177,7 @@ int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count, while (mask > 0) { dst = (inter_rank * num_core) + (intra_rank + mask); if (dst < comm_size) { - smpi_mpi_send(recv_buf, count, dtype, dst, tag, comm); + Request::send(recv_buf, count, dtype, dst, tag, comm); } mask >>= 1; }