X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/c81c99a491282f76757c2673961e3cdee6853539..2884c8be7d35ddd7060926a3db3367542e39099f:/teshsuite/smpi/mpich3-test/coll/allgather3.c?ds=sidebyside diff --git a/teshsuite/smpi/mpich3-test/coll/allgather3.c b/teshsuite/smpi/mpich3-test/coll/allgather3.c index 66389b5e13..408ac2ed30 100644 --- a/teshsuite/smpi/mpich3-test/coll/allgather3.c +++ b/teshsuite/smpi/mpich3-test/coll/allgather3.c @@ -12,53 +12,50 @@ /* Gather data from a vector to contiguous. */ -int main( int argc, char **argv ) +int main(int argc, char **argv) { double *vecout, *invec; MPI_Comm comm; - int count, minsize = 2; - int i, errs = 0; - int rank, size; + int count, minsize = 2; + int i, errs = 0; + int rank, size; - MTest_Init( &argc, &argv ); + MTest_Init(&argc, &argv); + + while (MTestGetIntracommGeneral(&comm, minsize, 1)) { + if (comm == MPI_COMM_NULL) + continue; + /* Determine the sender and receiver */ + MPI_Comm_rank(comm, &rank); + MPI_Comm_size(comm, &size); - while (MTestGetIntracommGeneral( &comm, minsize, 1 )) { - if (comm == MPI_COMM_NULL) continue; - /* Determine the sender and receiver */ - MPI_Comm_rank( comm, &rank ); - MPI_Comm_size( comm, &size ); - for (count = 1; count < 9000; count = count * 2) { - invec = (double *)malloc( count * sizeof(double) ); - vecout = (double *)malloc( size * count * sizeof(double) ); - - for (i=0; i