X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/d9c9e08948a8387e9e8ecb0fe67ab6b94ec2a66f..HEAD:/teshsuite/smpi/mpich3-test/coll/iallred.c?ds=sidebyside diff --git a/teshsuite/smpi/mpich3-test/coll/iallred.c b/teshsuite/smpi/mpich3-test/coll/iallred.c index 684fd507e7..455c22dbc9 100644 --- a/teshsuite/smpi/mpich3-test/coll/iallred.c +++ b/teshsuite/smpi/mpich3-test/coll/iallred.c @@ -15,27 +15,20 @@ int main(int argc, char *argv[]) MPI_Request request; int size, rank; int one = 1, two = 2, isum, sum; - int errs = 0; - MPI_Init(&argc,&argv); + MPI_Init(&argc, &argv); MPI_Comm_size(MPI_COMM_WORLD, &size); MPI_Comm_rank(MPI_COMM_WORLD, &rank); assert(size == 2); - MPI_Iallreduce(&one,&isum,1,MPI_INT,MPI_SUM,MPI_COMM_WORLD,&request); - MPI_Allreduce(&two,&sum,1,MPI_INT,MPI_SUM,MPI_COMM_WORLD); - MPI_Wait(&request,MPI_STATUS_IGNORE); + MPI_Iallreduce(&one, &isum, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD, &request); + MPI_Allreduce(&two, &sum, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD); + MPI_Wait(&request, MPI_STATUS_IGNORE); assert(isum == 2); assert(sum == 4); - - MPI_Comm_set_errhandler(MPI_COMM_WORLD, MPI_ERRORS_RETURN); - if (MPI_SUCCESS == MPI_Iallreduce(&one, &one, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD, &request)) - errs++; - - if (rank == 0 && errs == 0) + if (rank == 0) printf(" No errors\n"); MPI_Finalize(); return 0; } -