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
Fix [#17799] : have mpi_group_range_incl and mpi_group_range_excl better test some...
[simgrid.git]
/
teshsuite
/
smpi
/
mpich3-test
/
datatype
/
tfree.c
diff --git
a/teshsuite/smpi/mpich3-test/datatype/tfree.c
b/teshsuite/smpi/mpich3-test/datatype/tfree.c
index
d38fb7f
..
95bf73d
100644
(file)
--- a/
teshsuite/smpi/mpich3-test/datatype/tfree.c
+++ b/
teshsuite/smpi/mpich3-test/datatype/tfree.c
@@
-37,6
+37,7
@@
int main( int argc, char *argv[] )
if (size < 2) {
fprintf( stderr, "This test requires at least two processes." );
MPI_Abort( MPI_COMM_WORLD, 1 );
if (size < 2) {
fprintf( stderr, "This test requires at least two processes." );
MPI_Abort( MPI_COMM_WORLD, 1 );
+ exit(1);
}
source = 0;
}
source = 0;
@@
-65,8
+66,8
@@
int main( int argc, char *argv[] )
MPI_Type_commit( &tmpType[i] );
}
MPI_Type_commit( &tmpType[i] );
}
- MPI_Sendrecv(
0, 0, MPI_INT, source, 1,
-
0
, 0, MPI_INT, source, 1, comm, &status );
+ MPI_Sendrecv(
NULL, 0, MPI_INT, source, 1,
+
NULL
, 0, MPI_INT, source, 1, comm, &status );
MPI_Wait( &req, &status );
for (i=0; i<VEC_NELM; i++) {
MPI_Wait( &req, &status );
for (i=0; i<VEC_NELM; i++) {
@@
-87,8
+88,8
@@
int main( int argc, char *argv[] )
buf = (int *)malloc( VEC_NELM * sizeof(int) );
for (i=0; i<VEC_NELM; i++) buf[i] = i;
/* Synchronize with the receiver */
buf = (int *)malloc( VEC_NELM * sizeof(int) );
for (i=0; i<VEC_NELM; i++) buf[i] = i;
/* Synchronize with the receiver */
- MPI_Sendrecv(
0, 0, MPI_INT, dest, 1,
-
0
, 0, MPI_INT, dest, 1, comm, &status );
+ MPI_Sendrecv(
NULL, 0, MPI_INT, dest, 1,
+
NULL
, 0, MPI_INT, dest, 1, comm, &status );
MPI_Send( buf, VEC_NELM, MPI_INT, dest, 0, comm );
free( buf );
}
MPI_Send( buf, VEC_NELM, MPI_INT, dest, 0, comm );
free( buf );
}