- err = Datatype::copy(sbuf, totalcount, dtype, psend, totalcount, dtype);
- if (MPI_SUCCESS != err) { goto cleanup_and_return; }
+ err = Datatype::copy(sbuf, totalcount, dtype, psend, totalcount, dtype);
+ if (MPI_SUCCESS != err) { goto cleanup_and_return; }
- err = Datatype::copy(rbuf, totalcount, dtype, psend, totalcount, dtype);
+ err = Datatype::copy(rbuf, totalcount, dtype, psend, totalcount, dtype);
/* Odd process */
Request::recv(precv, totalcount, dtype, rank - 1,
COLL_TAG_REDUCE_SCATTER, comm, MPI_STATUS_IGNORE);
/* Odd process */
Request::recv(precv, totalcount, dtype, rank - 1,
COLL_TAG_REDUCE_SCATTER, comm, MPI_STATUS_IGNORE);
- op->apply(precv, psend, (int*)&totalcount, dtype);
+ op->apply(precv, psend, (int*)&totalcount, dtype);