X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/a63d9772e87d37847b7d634abe798c93934f56bb..7abffd12021a46a0ac1bd2b4ff48ca4b3cc8c71c:/examples/smpi/ttest01.c diff --git a/examples/smpi/ttest01.c b/examples/smpi/ttest01.c index 848cfe8a6d..ada55b9ea0 100644 --- a/examples/smpi/ttest01.c +++ b/examples/smpi/ttest01.c @@ -16,28 +16,33 @@ int main(int argc, char *argv[]) int rank, numprocs, tag = 0; int *r = malloc(sizeof(int) * DATATOSENT); - MPI_Init(&argc,&argv); + MPI_Init(&argc, &argv); MPI_Comm_size(MPI_COMM_WORLD, &numprocs); MPI_Comm_rank(MPI_COMM_WORLD, &rank); - TRACE_smpi_set_category ("A"); - if (rank == 0){ - MPI_Send(r, DATATOSENT, MPI_INT, 1, tag, MPI_COMM_WORLD); - }else if (rank == 1){ - MPI_Recv(r, DATATOSENT, MPI_INT, 0, tag, MPI_COMM_WORLD, &status); - }else{ - //do nothing - } - TRACE_smpi_set_category ("B"); - if (rank == 0){ - MPI_Recv(r, DATATOSENT, MPI_INT, 1, tag, MPI_COMM_WORLD, &status); - }else if (rank == 1){ - MPI_Send(r, DATATOSENT, MPI_INT, 0, tag, MPI_COMM_WORLD); - }else{ - //do nothing + + int i; + for (i = 0; i < 10; i++) { + TRACE_smpi_set_category("A"); + if (rank == 0) { + MPI_Send(r, DATATOSENT, MPI_INT, 1, tag, MPI_COMM_WORLD); + } else if (rank == 1) { + MPI_Recv(r, DATATOSENT, MPI_INT, 0, tag, MPI_COMM_WORLD, &status); + } else { + //do nothing + } + + TRACE_smpi_set_category("B"); + if (rank == 0) { + MPI_Recv(r, DATATOSENT, MPI_INT, 1, tag, MPI_COMM_WORLD, &status); + } else if (rank == 1) { + MPI_Send(r, DATATOSENT, MPI_INT, 0, tag, MPI_COMM_WORLD); + } else { + //do nothing + } } - TRACE_smpi_set_category ("C"); - MPI_Barrier (MPI_COMM_WORLD); + TRACE_smpi_set_category("C"); + MPI_Barrier(MPI_COMM_WORLD); MPI_Finalize(); return 0; }