X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/88fad0aaff9eb463f048bfdfe4ad6218aba44ddb..fbcf6ab31cae1988be858f9f894dafe529c575d7:/src/smpi/bindings/smpi_pmpi_group.cpp diff --git a/src/smpi/bindings/smpi_pmpi_group.cpp b/src/smpi/bindings/smpi_pmpi_group.cpp index 6ada95691f..4155bf6e6f 100644 --- a/src/smpi/bindings/smpi_pmpi_group.cpp +++ b/src/smpi/bindings/smpi_pmpi_group.cpp @@ -1,4 +1,4 @@ -/* Copyright (c) 2007-2018. The SimGrid Team. All rights reserved. */ +/* Copyright (c) 2007-2019. The SimGrid Team. All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it * under the terms of the license (GNU LGPL) which comes with this package. */ @@ -8,11 +8,10 @@ #include "smpi_comm.hpp" #include "smpi_datatype_derived.hpp" #include "smpi_op.hpp" -#include "smpi_process.hpp" +#include "src/smpi/include/smpi_actor.hpp" XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(smpi_pmpi); - /* PMPI User level calls */ int PMPI_Group_free(MPI_Group * group) @@ -46,12 +45,12 @@ int PMPI_Group_rank(MPI_Group group, int *rank) } else if (rank == nullptr) { return MPI_ERR_ARG; } else { - *rank = group->rank(simgrid::s4u::this_actor::getPid()); + *rank = group->rank(simgrid::s4u::this_actor::get_pid()); return MPI_SUCCESS; } } -int PMPI_Group_translate_ranks(MPI_Group group1, int n, int *ranks1, MPI_Group group2, int *ranks2) +int PMPI_Group_translate_ranks(MPI_Group group1, int n, const int *ranks1, MPI_Group group2, int *ranks2) { if (group1 == MPI_GROUP_NULL || group2 == MPI_GROUP_NULL) { return MPI_ERR_GROUP; @@ -115,7 +114,7 @@ int PMPI_Group_difference(MPI_Group group1, MPI_Group group2, MPI_Group * newgro } } -int PMPI_Group_incl(MPI_Group group, int n, int *ranks, MPI_Group * newgroup) +int PMPI_Group_incl(MPI_Group group, int n, const int *ranks, MPI_Group * newgroup) { if (group == MPI_GROUP_NULL) { return MPI_ERR_GROUP; @@ -126,7 +125,7 @@ int PMPI_Group_incl(MPI_Group group, int n, int *ranks, MPI_Group * newgroup) } } -int PMPI_Group_excl(MPI_Group group, int n, int *ranks, MPI_Group * newgroup) +int PMPI_Group_excl(MPI_Group group, int n, const int *ranks, MPI_Group * newgroup) { if (group == MPI_GROUP_NULL) { return MPI_ERR_GROUP;