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

diff --git a/teshsuite/smpi/mpich3-test/coll/reduce.c b/teshsuite/smpi/mpich3-test/coll/reduce.c
index 61067826f2..ad09c9bf8f 100644
--- a/teshsuite/smpi/mpich3-test/coll/reduce.c
+++ b/teshsuite/smpi/mpich3-test/coll/reduce.c
@@ -48,6 +48,15 @@ int main( int argc, char *argv[] )
 	    free( sendbuf );
 	    free( recvbuf );
 	}
+
+#if MTEST_HAVE_MIN_MPI_VERSION(2,2)
+        if (0 == rank) {
+            MPI_Comm_set_errhandler(MPI_COMM_WORLD, MPI_ERRORS_RETURN);
+            if (MPI_SUCCESS == MPI_Reduce(&rank, &rank, 1, MPI_INT, MPI_SUM, 0, comm))
+                errs++;
+        }
+#endif
+
 	MTestFreeComm( &comm );
     }