X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/9b73466ada27682d1729f394549479da83ef4a99..4d9b0b89d262961f5a594bfbcb7a1312bcbe43de:/teshsuite/smpi/mpich3-test/coll/scatter2.c

diff --git a/teshsuite/smpi/mpich3-test/coll/scatter2.c b/teshsuite/smpi/mpich3-test/coll/scatter2.c
index 5535a30956..feac832247 100644
--- a/teshsuite/smpi/mpich3-test/coll/scatter2.c
+++ b/teshsuite/smpi/mpich3-test/coll/scatter2.c
@@ -64,7 +64,14 @@ int main( int argc, char **argv )
 	    }
 	}
     }
+
+    MPI_Comm_set_errhandler(MPI_COMM_WORLD, MPI_ERRORS_RETURN);
+    if (rank == 0 && MPI_SUCCESS ==
+            MPI_Scatter(vecin, 1, MPI_DOUBLE, vecin, 1, MPI_DOUBLE, 0, MPI_COMM_WORLD))
+        err++;
     
+    free(vecin);
+    free(vecout);
     MTest_Finalize( err );
     MPI_Type_free( &vec );
     MPI_Finalize();