Arrgh -- check the right argument for IN_PLACE.
This commit was SVN r7350.
Этот коммит содержится в:
родитель
7c09923751
Коммит
bd95f5d474
@ -35,7 +35,7 @@ int mca_coll_self_scatter_intra(void *sbuf, int scount,
|
||||
int root,
|
||||
struct ompi_communicator_t *comm)
|
||||
{
|
||||
if (MPI_IN_PLACE == sbuf) {
|
||||
if (MPI_IN_PLACE == rbuf) {
|
||||
return MPI_SUCCESS;
|
||||
} else {
|
||||
return ompi_ddt_sndrcv(sbuf, scount, sdtype,
|
||||
|
@ -34,7 +34,7 @@ int mca_coll_self_scatterv_intra(void *sbuf, int *scounts,
|
||||
struct ompi_datatype_t *rdtype, int root,
|
||||
struct ompi_communicator_t *comm)
|
||||
{
|
||||
if (MPI_IN_PLACE == sbuf) {
|
||||
if (MPI_IN_PLACE == rbuf) {
|
||||
return MPI_SUCCESS;
|
||||
} else {
|
||||
return ompi_ddt_sndrcv(((char *) sbuf) + disps[0], scounts[0], sdtype,
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user