X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/fff5fbf696a8eaf8a7f230c4e15c763db690bcc3..6d18783f24e4c8477a9d331336580b8679471660:/teshsuite/smpi/isp/umpire/no-error-persistent.c diff --git a/teshsuite/smpi/isp/umpire/no-error-persistent.c b/teshsuite/smpi/isp/umpire/no-error-persistent.c index 10f502d1cf..e9fe2a6d57 100644 --- a/teshsuite/smpi/isp/umpire/no-error-persistent.c +++ b/teshsuite/smpi/isp/umpire/no-error-persistent.c @@ -19,7 +19,7 @@ main (int argc, char **argv) { int nprocs = -1; int rank = -1; - int comm = MPI_COMM_WORLD; + MPI_Comm comm = MPI_COMM_WORLD; char processor_name[128]; int namelen = 128; int buf[BUF_SIZE * 2]; @@ -66,20 +66,20 @@ main (int argc, char **argv) MPI_Start (&aReq[j]); } } - + /* complete the sends */ if (k < 2) /* use MPI_Wait */ for (j = 0; j < 2; j++) MPI_Wait (&aReq[j], &aStatus[j]); - else + else /* use MPI_Waitall */ MPI_Waitall (2, aReq, aStatus); } else if (rank == 1) { /* set up receives for all of the sends */ for (j = 0; j < 2; j++) { - MPI_Irecv (&buf[j * BUF_SIZE], BUF_SIZE, + MPI_Irecv (&buf[j * BUF_SIZE], BUF_SIZE, MPI_INT, 0, j, comm, &aReq[j]); } /* complete all of the receives... */