From: genaud <genaud@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Date: Fri, 26 Jun 2009 09:50:53 +0000 (+0000)
Subject: added MPI_Wtime()
X-Git-Tag: SVN~1279
X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/28b96ce2e782890f1d8d9410ec192cd342f81b23

added MPI_Wtime()



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

diff --git a/include/smpi/smpi.h b/include/smpi/smpi.h
index bf11472441..bf5df23687 100644
--- a/include/smpi/smpi.h
+++ b/include/smpi/smpi.h
@@ -89,6 +89,7 @@ SG_BEGIN_DECL()
 #define MPI_Bcast(a, b, c, d, e) SMPI_MPI_Bcast(a, b, c, d, e)
 #define MPI_Wait(a, b) SMPI_MPI_Wait(a, b)
 #define MPI_Comm_split(a, b, c, d) SMPI_MPI_Comm_split(a, b, c, d)
+#define MPI_Wtime() SMPI_MPI_Wtime()
 
 // SMPI Functions
 XBT_PUBLIC(int) SMPI_MPI_Init(int *argc, char ***argv);
@@ -114,6 +115,7 @@ XBT_PUBLIC(int) SMPI_MPI_Bcast(void *buf, int count, MPI_Datatype datatype,
 XBT_PUBLIC(int) SMPI_MPI_Wait(MPI_Request * request, MPI_Status * status);
 XBT_PUBLIC(int) SMPI_MPI_Comm_split(MPI_Comm comm, int color, int key,
                                     MPI_Comm * comm_out);
+XBT_PUBLIC(double) SMPI_MPI_Wtime(void);
 
 // smpi functions
 XBT_IMPORT_NO_EXPORT(int) smpi_simulated_main(int argc, char **argv);
diff --git a/src/smpi/smpi_mpi.c b/src/smpi/smpi_mpi.c
index ca52f3fc11..08d3eba5f4 100644
--- a/src/smpi/smpi_mpi.c
+++ b/src/smpi/smpi_mpi.c
@@ -348,3 +348,8 @@ int SMPI_MPI_Comm_split(MPI_Comm comm, int color, int key,
 
   return retval;
 }
+
+double SMPI_MPI_Wtime( void ) 
+{ 
+	  return ( SIMIX_get_clock() );
+}