X-Git-Url: http://bilbo.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/dccf1b41e9c7b5a696f01abceaa2779fe65f154f..a0ddbc995a91f65df31157e6310c578e46884cab:/teshsuite/smpi/bug-17132/bug-17132.c diff --git a/teshsuite/smpi/bug-17132/bug-17132.c b/teshsuite/smpi/bug-17132/bug-17132.c index 469066b747..d260080644 100644 --- a/teshsuite/smpi/bug-17132/bug-17132.c +++ b/teshsuite/smpi/bug-17132/bug-17132.c @@ -14,7 +14,6 @@ XBT_LOG_NEW_DEFAULT_CATEGORY(MM_mpi, "Messages for this SMPI test"); int main(int argc, char ** argv) { - size_t err; size_t M = 8*1024; size_t N = 32*1024; @@ -27,9 +26,11 @@ int main(int argc, char ** argv) double *b = malloc(sizeof(double) * N); // A broadcast - err = MPI_Bcast(a, M, MPI_DOUBLE, 0, MPI_COMM_WORLD); + size_t err = MPI_Bcast(a, M, MPI_DOUBLE, 0, MPI_COMM_WORLD); if (err != MPI_SUCCESS) { - perror("Error Bcast A\n"); MPI_Finalize(); exit(-1); + perror("Error Bcast A\n"); + MPI_Finalize(); + exit(-1); } // Uncommenting this barrier fixes it! @@ -38,7 +39,9 @@ int main(int argc, char ** argv) // Another broadcast err = MPI_Bcast(b, N, MPI_DOUBLE, 0, MPI_COMM_WORLD ); if (err != MPI_SUCCESS) { - perror("Error Bcast B\n"); MPI_Finalize(); exit(-1); + perror("Error Bcast B\n"); + MPI_Finalize(); + exit(-1); } // Commenting out this barrier fixes it!!