1
1

Merge pull request #1202 from artpol84/alltoall_fix

Fix MPI_Alltoall to support inter-communicators.
Этот коммит содержится в:
Nathan Hjelm 2015-12-14 14:33:23 -08:00
родитель b7ba301310 25077fc5d9
Коммит 139799f3c4

Просмотреть файл

@ -92,12 +92,10 @@ int MPI_Alltoall(const void *sendbuf, int sendcount, MPI_Datatype sendtype,
}
}
/* Do we need to do anything? Per MPI standard the (v3.1 page 168 line 48)
* the amount of data sent must be equal to the amount of data received.
*/
ompi_datatype_type_size(recvtype, &recvtype_size);
if( (0 == recvcount) || (0 == recvtype_size) ) {
return MPI_SUCCESS;
if( !OMPI_COMM_IS_INTER(comm) ){
if( (0 == recvcount) || (0 == recvtype_size) ) {
return MPI_SUCCESS;
}
}
OPAL_CR_ENTER_LIBRARY();