X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/e8f8350f07c1b13dd8628f56d5a5050da18264d3..f54458a7bb43175fc8e22322bf8b36dd5af06969:/src/smpi/smpi_mpi.c diff --git a/src/smpi/smpi_mpi.c b/src/smpi/smpi_mpi.c index c709e0aaec..46f1abddfc 100644 --- a/src/smpi/smpi_mpi.c +++ b/src/smpi/smpi_mpi.c @@ -46,6 +46,11 @@ double MPI_Wtime(void) return PMPI_Wtime(); } +double MPI_Wtick(void) +{ + return PMPI_Wtick(); +} + int MPI_Address(void *location, MPI_Aint * address) { return PMPI_Address(location, address); @@ -56,6 +61,11 @@ int MPI_Type_free(MPI_Datatype * datatype) return PMPI_Type_free(datatype); } +int MPI_Pcontrol(const int level ) +{ + return PMPI_Pcontrol(level); +} + int MPI_Type_size(MPI_Datatype datatype, int *size) { return PMPI_Type_size(datatype, size); @@ -164,6 +174,11 @@ int MPI_Comm_size(MPI_Comm comm, int *size) return PMPI_Comm_size(comm, size); } +int MPI_Comm_get_attr (MPI_Comm comm, int comm_keyval, void *attribute_val, int *flag) +{ + return PMPI_Comm_get_attr (comm, comm_keyval, attribute_val, flag); +} + int MPI_Comm_get_name (MPI_Comm comm, char* name, int* len) { return PMPI_Comm_get_name(comm, name, len); @@ -194,6 +209,11 @@ int MPI_Comm_free(MPI_Comm * comm) return PMPI_Comm_free(comm); } +int MPI_Comm_disconnect(MPI_Comm * comm) +{ + return PMPI_Comm_disconnect(comm); +} + int MPI_Comm_split(MPI_Comm comm, int color, int key, MPI_Comm* comm_out) { return PMPI_Comm_split(comm, color, key, comm_out);