X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/0c56e9ba0d24d9c85d33a22556f10b5c097a6f28..fcd4e90d40b0162b583075c5645aacf40392dfc9:/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!!