X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/a882344bc908a258a991701e226556ec23fd7cd6..4c753f8d4cabd4104f3f7109823f16be2ebdcce3:/src/smpi/bindings/smpi_pmpi.cpp diff --git a/src/smpi/bindings/smpi_pmpi.cpp b/src/smpi/bindings/smpi_pmpi.cpp index 08705cd05a..684b283a86 100644 --- a/src/smpi/bindings/smpi_pmpi.cpp +++ b/src/smpi/bindings/smpi_pmpi.cpp @@ -54,10 +54,10 @@ int PMPI_Init(int*, char***) simgrid::smpi::ActorExt::init(); TRACE_smpi_init(simgrid::s4u::this_actor::get_pid(), __func__); + smpi_mpi_init(); smpi_bench_begin(); smpi_process()->mark_as_initialized(); - smpi_mpi_init(); CHECK_COLLECTIVE(smpi_process()->comm_world(), "MPI_Init") return MPI_SUCCESS; @@ -71,7 +71,7 @@ int PMPI_Finalize() smpi_process()->mark_as_finalizing(); TRACE_smpi_comm_in(rank_traced, __func__, new simgrid::instr::NoOpTIData("finalize")); - if(simgrid::config::get_value("smpi/finalization-barrier")) + if (simgrid::config::get_value("smpi/barrier-finalization")) simgrid::smpi::colls::barrier(MPI_COMM_WORLD); smpi_process()->finalize(); @@ -188,7 +188,7 @@ MPI_Aint PMPI_Aint_diff(MPI_Aint address, MPI_Aint disp) int PMPI_Get_processor_name(char *name, int *resultlen) { int len = std::min(static_cast(sg_host_self()->get_name().size()), MPI_MAX_PROCESSOR_NAME - 1); - std::string(sg_host_self()->get_name()).copy(name, len); + sg_host_self()->get_name().copy(name, len); name[len] = '\0'; *resultlen = len; @@ -202,10 +202,9 @@ int PMPI_Get_count(const MPI_Status * status, MPI_Datatype datatype, int *count) } else if (not datatype->is_valid()) { return MPI_ERR_TYPE; } else { - size_t size = datatype->size(); - if (size == 0) { + if (datatype->size() == 0) { *count = 0; - } else if (status->count % size != 0) { + } else if (status->count % datatype->size() != 0) { *count = MPI_UNDEFINED; } else { *count = simgrid::smpi::Status::get_count(status, datatype);