do not call smpi_bench_* from SMPI_MPI_Allreduce since it calls SMPI_MPI_* function...

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@6509 48e7efb5-ca39-0410-a469-dd3cf9ba447f

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 );
 }