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
do not call smpi_bench_* from SMPI_MPI_Allreduce since it calls SMPI_MPI_* function...
[simgrid.git]
/
src
/
smpi
/
smpi_mpi.c
diff --git
a/src/smpi/smpi_mpi.c
b/src/smpi/smpi_mpi.c
index
4934045
..
9cf5d01
100644
(file)
--- a/
src/smpi/smpi_mpi.c
+++ b/
src/smpi/smpi_mpi.c
@@
-438,14
+438,16
@@
int SMPI_MPI_Allreduce( void *sendbuf, void *recvbuf, int count, MPI_Datatype da
int retval = MPI_SUCCESS;
int root=1; // arbitrary choice
int retval = MPI_SUCCESS;
int root=1; // arbitrary choice
- smpi_bench_end();
+ //smpi_bench_end(); //FIXME: restaure after calling smpi_mpi_reduce instead
+ DEBUG0("Reduce");
retval = SMPI_MPI_Reduce( sendbuf, recvbuf, count, datatype, op, root, comm);
if (MPI_SUCCESS != retval)
return(retval);
retval = SMPI_MPI_Reduce( sendbuf, recvbuf, count, datatype, op, root, comm);
if (MPI_SUCCESS != retval)
return(retval);
+ DEBUG0("Reduce done, time to bcast");
retval = SMPI_MPI_Bcast( sendbuf, count, datatype, root, comm);
retval = SMPI_MPI_Bcast( sendbuf, count, datatype, root, comm);
- smpi_bench_begin();
+
//
smpi_bench_begin();
return( retval );
}
return( retval );
}