A
lgorithmique
N
umérique
D
istribuée
Public GIT Repository
projects
/
simgrid.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
update collectives teshsuite from mpich git (only minor changes)
[simgrid.git]
/
teshsuite
/
smpi
/
mpich3-test
/
coll
/
scantst.c
diff --git
a/teshsuite/smpi/mpich3-test/coll/scantst.c
b/teshsuite/smpi/mpich3-test/coll/scantst.c
index
2690644
..
1359acc
100644
(file)
--- a/
teshsuite/smpi/mpich3-test/coll/scantst.c
+++ b/
teshsuite/smpi/mpich3-test/coll/scantst.c
@@
-5,6
+5,7
@@
*/
#include "mpi.h"
#include <stdio.h>
*/
#include "mpi.h"
#include <stdio.h>
+#include "mpitest.h"
void addem ( int *, int *, int *, MPI_Datatype * );
void assoc ( int *, int *, int *, MPI_Datatype * );
void addem ( int *, int *, int *, MPI_Datatype * );
void assoc ( int *, int *, int *, MPI_Datatype * );
@@
-102,6
+103,12
@@
int main( int argc, char **argv )
errors++;
}
errors++;
}
+#if MTEST_HAVE_MIN_MPI_VERSION(2,2)
+ MPI_Comm_set_errhandler(MPI_COMM_WORLD, MPI_ERRORS_RETURN);
+ if (MPI_SUCCESS == MPI_Scan( &data, &data, 1, MPI_INT, op_assoc, comm))
+ errors++;
+#endif
+
MPI_Op_free( &op_assoc );
MPI_Op_free( &op_addem );
MPI_Op_free( &op_assoc );
MPI_Op_free( &op_addem );