if (local_size > 1) {
if ((local_rank == 0) && (root != rank) && (leader_root == global_rank)) {
- smpi_mpi_recv(buffer, count, datatype, root,
+ Request::recv(buffer, count, datatype, root,
COLL_TAG_BCAST, comm, MPI_STATUS_IGNORE);
}
if ((local_rank != 0) && (root == rank)) {
- smpi_mpi_send(buffer, count, datatype,
+ Request::send(buffer, count, datatype,
leader_of_root, COLL_TAG_BCAST, comm);
}
}
src -= local_size;
}
- smpi_mpi_recv(buffer, count, datatype, src,
+ Request::recv(buffer, count, datatype, src,
COLL_TAG_BCAST, comm,
MPI_STATUS_IGNORE);
break;
if (dst >= local_size) {
dst -= local_size;
}
- reqarray[reqs++]=smpi_mpi_isend(buffer, count, datatype, dst,
+ reqarray[reqs++]=Request::isend(buffer, count, datatype, dst,
COLL_TAG_BCAST, comm);
}
}
- smpi_mpi_waitall(reqs, reqarray, starray);
+ Request::waitall(reqs, reqarray, starray);
mask /= mv2_intra_node_knomial_factor;
}
* possible, and MPI_Pack_size() in other places.
*/
//if (is_homogeneous) {
- type_size=smpi_datatype_size(datatype);
+ type_size=datatype->size();
//}
/* else {*/
/* MPIR_Pack_size_impl(1, datatype, &type_size);*/