Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Update mpich comm tests
[simgrid.git] / teshsuite / smpi / mpich3-test / comm / dup_with_info.c
index c0472c0b4c57ad96c77cafc6f6ed64dd21e1a05d..bda2214fc7320fa12e5b36d80076211d2082b63b 100644 (file)
@@ -7,7 +7,7 @@
 #include "mpi.h"
 #include <stdio.h>
 #include "mpitest.h"
-int run_tests(MPI_Comm comm);
+
 int run_tests(MPI_Comm comm)
 {
     int rank, size, wrank, wsize, dest, a, b, errs = 0;
@@ -28,6 +28,7 @@ int run_tests(MPI_Comm comm)
     MPI_Barrier(comm);
 
     /* Can we communicate with this new communicator? */
+    dest = MPI_PROC_NULL;
     if (rank == 0) {
         dest = size - 1;
         a = rank;