X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/eb5b6b0c3c4d9a38bb205b2c8bc9aeeba8674a25..2bb3a0d042a8a1deb91c18dba0cbdf42237413d4:/teshsuite/smpi/mpich3-test/comm/dup_with_info.c

diff --git a/teshsuite/smpi/mpich3-test/comm/dup_with_info.c b/teshsuite/smpi/mpich3-test/comm/dup_with_info.c
index c0472c0b4c..f585a81727 100644
--- a/teshsuite/smpi/mpich3-test/comm/dup_with_info.c
+++ b/teshsuite/smpi/mpich3-test/comm/dup_with_info.c
@@ -7,8 +7,8 @@
 #include "mpi.h"
 #include <stdio.h>
 #include "mpitest.h"
-int run_tests(MPI_Comm comm);
-int run_tests(MPI_Comm comm)
+
+static int run_tests(MPI_Comm comm)
 {
     int rank, size, wrank, wsize, dest, a, b, errs = 0;
     MPI_Status status;
@@ -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;