A
lgorithmique
N
umérique
D
istribuée
Public GIT Repository
projects
/
simgrid.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[SMPI] Search/Replace of smpi_process()->index() in src/smpi/
[simgrid.git]
/
src
/
smpi
/
bindings
/
smpi_pmpi.cpp
diff --git
a/src/smpi/bindings/smpi_pmpi.cpp
b/src/smpi/bindings/smpi_pmpi.cpp
index c8129b9195357c38d2e00f095e9cb28d9900540f..6e635fa59422b3e8cff0eaa7ec5ecf726e61bbdc 100644
(file)
--- a/
src/smpi/bindings/smpi_pmpi.cpp
+++ b/
src/smpi/bindings/smpi_pmpi.cpp
@@
-37,7
+37,7
@@
int PMPI_Init(int *argc, char ***argv)
if(already_init == 0){
simgrid::smpi::Process::init(argc, argv);
smpi_process()->mark_as_initialized();
if(already_init == 0){
simgrid::smpi::Process::init(argc, argv);
smpi_process()->mark_as_initialized();
- int rank = s
mpi_process()->index
();
+ int rank = s
imgrid::s4u::Actor::self()->getPid
();
TRACE_smpi_init(rank);
TRACE_smpi_comm_in(rank, __FUNCTION__, new simgrid::instr::NoOpTIData("init"));
TRACE_smpi_comm_out(rank);
TRACE_smpi_init(rank);
TRACE_smpi_comm_in(rank, __FUNCTION__, new simgrid::instr::NoOpTIData("init"));
TRACE_smpi_comm_out(rank);
@@
-53,7
+53,7
@@
int PMPI_Init(int *argc, char ***argv)
int PMPI_Finalize()
{
smpi_bench_end();
int PMPI_Finalize()
{
smpi_bench_end();
- int rank = s
mpi_process()->index
();
+ int rank = s
imgrid::s4u::Actor::self()->getPid
();
TRACE_smpi_comm_in(rank, __FUNCTION__, new simgrid::instr::NoOpTIData("finalize"));
smpi_process()->finalize();
TRACE_smpi_comm_in(rank, __FUNCTION__, new simgrid::instr::NoOpTIData("finalize"));
smpi_process()->finalize();
@@
-109,7
+109,7
@@
int PMPI_Is_thread_main(int *flag)
if (flag == nullptr) {
return MPI_ERR_ARG;
} else {
if (flag == nullptr) {
return MPI_ERR_ARG;
} else {
- *flag = s
mpi_process()->index() == 0
; // FIXME: I don't think this is correct: This just returns true if the process ID is 1,
+ *flag = s
imgrid::s4u::Actor::self()->getPid() == 1
; // FIXME: I don't think this is correct: This just returns true if the process ID is 1,
// regardless of whether this process called MPI_Thread_Init() or not.
return MPI_SUCCESS;
}
// regardless of whether this process called MPI_Thread_Init() or not.
return MPI_SUCCESS;
}