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
Merge pull request #2 from mquinson/master
[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 d38fb7ff095fc389ce8db989b728c5038c7c8767..95bf73d7f16f3bc49b7b99c162568b5782b6652a 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 );
}