From: mquinson <mquinson@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Date: Wed, 15 Jul 2009 16:38:32 +0000 (+0000)
Subject: do not call smpi_bench_* from SMPI_MPI_Allreduce since it calls SMPI_MPI_* function... 
X-Git-Tag: SVN~1139
X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/c901cc841ae6556dbee2375605fe927c18cd0d50?ds=sidebyside

do not call smpi_bench_* from SMPI_MPI_Allreduce since it calls SMPI_MPI_* function, breaking the parenthesing of smpi_bench_* functions

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 4934045cba..9cf5d01ddc 100644
--- 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
 
-  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);
 
+  DEBUG0("Reduce done, time to bcast");
   retval = SMPI_MPI_Bcast( sendbuf, count, datatype, root, comm);
-  smpi_bench_begin();
+//  smpi_bench_begin();
   return( retval );
 }