X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/0e9c0448c6566825b170b98ecff716b098bda10e..88fad0aaff9eb463f048bfdfe4ad6218aba44ddb:/teshsuite/smpi/mpich3-test/pt2pt/waitany-null.c diff --git a/teshsuite/smpi/mpich3-test/pt2pt/waitany-null.c b/teshsuite/smpi/mpich3-test/pt2pt/waitany-null.c index 98df8ef8df..8976b75f30 100644 --- a/teshsuite/smpi/mpich3-test/pt2pt/waitany-null.c +++ b/teshsuite/smpi/mpich3-test/pt2pt/waitany-null.c @@ -11,54 +11,53 @@ #endif #include "mpi.h" -static int verbose = 0; - +int main(int argc, char *argv[]); int parse_args(int argc, char **argv); int main(int argc, char *argv[]) { int i, err, errs = 0, rank, toterrs; - int index; + int index; MPI_Request requests[10]; - MPI_Status statuses[10]; + MPI_Status statuses[10]; MPI_Init(&argc, &argv); parse_args(argc, argv); - for (i=0; i < 10; i++) { - requests[i] = MPI_REQUEST_NULL; + for (i = 0; i < 10; i++) { + requests[i] = MPI_REQUEST_NULL; } /* begin testing */ /* To improve reporting of problems about operations, we - change the error handler to errors return */ - MPI_Comm_set_errhandler( MPI_COMM_WORLD, MPI_ERRORS_RETURN ); + * change the error handler to errors return */ + MPI_Comm_set_errhandler(MPI_COMM_WORLD, MPI_ERRORS_RETURN); err = MPI_Waitany(10, requests, &index, statuses); if (err != MPI_SUCCESS) { - errs++; - fprintf(stderr, "MPI_Waitany did not return MPI_SUCCESS\n"); + errs++; + fprintf(stderr, "MPI_Waitany did not return MPI_SUCCESS\n"); } if (index != MPI_UNDEFINED) { - errs++; - fprintf(stderr, "MPI_Waitany did not set index to MPI_UNDEFINED\n"); + errs++; + fprintf(stderr, "MPI_Waitany did not set index to MPI_UNDEFINED\n"); } /* end testing */ - - MPI_Comm_set_errhandler( MPI_COMM_WORLD, MPI_ERRORS_ARE_FATAL ); - MPI_Comm_rank( MPI_COMM_WORLD, & rank ); - MPI_Allreduce( &errs, &toterrs, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD ); + + MPI_Comm_set_errhandler(MPI_COMM_WORLD, MPI_ERRORS_ARE_FATAL); + MPI_Comm_rank(MPI_COMM_WORLD, &rank); + MPI_Allreduce(&errs, &toterrs, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD); if (rank == 0) { - if (toterrs) { - fprintf(stderr, " Found %d errors\n", toterrs); - } - else { - printf(" No Errors\n"); - } + if (toterrs) { + fprintf(stderr, " Found %d errors\n", toterrs); + } + else { + printf(" No Errors\n"); + } } MPI_Finalize(); return 0; @@ -67,18 +66,16 @@ int main(int argc, char *argv[]) int parse_args(int argc, char **argv) { /* - int ret; - - while ((ret = getopt(argc, argv, "v")) >= 0) - { - switch (ret) { - case 'v': - verbose = 1; - break; - } - } - */ - if (argc > 1 && strcmp(argv[1], "-v") == 0) - verbose = 1; + * int ret; + * + * while ((ret = getopt(argc, argv, "v")) >= 0) + * { + * switch (ret) { + * case 'v': + * verbose = 1; <-- never used, thus removed + * break; + * } + * } + */ return 0; }