1
1
This commit was SVN r2920.
Этот коммит содержится в:
Jeff Squyres 2004-10-04 18:03:33 +00:00
родитель 8edfb7e9d8
Коммит a5a5655d3a

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

@ -36,6 +36,13 @@ int mca_coll_basic_gatherv_intra(void *sbuf, int scount,
size = ompi_comm_size(comm);
rank = ompi_comm_rank(comm);
/* Need this test here because this function is invoked by
allgatherv in addition to the top-level MPI_Gatherv */
if (0 == scount && rank != root) {
return MPI_SUCCESS;
}
/* Everyone but root sends data and returns. Note that we will only
get here if scount > 0 or rank == root. */