static int getPid(MPI_Comm comm, int id)
{
simgrid::s4u::ActorPtr actor = comm->group()->actor(id);
- return (actor == nullptr) ? MPI_UNDEFINED : actor->getPid() - 1;
+ return (actor == nullptr) ? MPI_UNDEFINED : actor->getPid();
}
/* PMPI User level calls */
retval = MPI_ERR_TAG;
} else {
- int my_proc_id = simgrid::s4u::Actor::self()->getPid() - 1;
- int src_traced = getPid(comm, src);
+ int my_proc_id = simgrid::s4u::Actor::self()->getPid();
TRACE_smpi_comm_in(my_proc_id, __FUNCTION__,
new simgrid::instr::Pt2PtTIData("Irecv", src_traced,
} else if(tag<0 && tag != MPI_ANY_TAG){
retval = MPI_ERR_TAG;
} else {
- int my_proc_id = simgrid::s4u::Actor::self()->getPid() - 1;
+ int my_proc_id = simgrid::s4u::Actor::self()->getPid();
int trace_dst = getPid(comm, dst);
TRACE_smpi_comm_in(my_proc_id, __FUNCTION__,
new simgrid::instr::Pt2PtTIData("Isend", trace_dst,
} else if(tag<0 && tag != MPI_ANY_TAG){
retval = MPI_ERR_TAG;
} else {
- int my_proc_id = simgrid::s4u::Actor::self()->getPid() - 1;
+ int my_proc_id = simgrid::s4u::Actor::self()->getPid();
int trace_dst = getPid(comm, dst);
TRACE_smpi_comm_in(my_proc_id, __FUNCTION__,
new simgrid::instr::Pt2PtTIData("ISsend", trace_dst,
} else if(tag<0 && tag != MPI_ANY_TAG){
retval = MPI_ERR_TAG;
} else {
- int my_proc_id = simgrid::s4u::Actor::self()->getPid() - 1;
+ int my_proc_id = simgrid::s4u::Actor::self()->getPid();
int src_traced = getPid(comm, src);
TRACE_smpi_comm_in(my_proc_id, __FUNCTION__,
new simgrid::instr::Pt2PtTIData("recv", src_traced,
} else if(tag < 0 && tag != MPI_ANY_TAG){
retval = MPI_ERR_TAG;
} else {
- int my_proc_id = simgrid::s4u::Actor::self()->getPid() - 1;
+ int my_proc_id = simgrid::s4u::Actor::self()->getPid();
int dst_traced = getPid(comm, dst);
TRACE_smpi_comm_in(my_proc_id, __FUNCTION__,
new simgrid::instr::Pt2PtTIData("send", dst_traced,
} else if(tag<0 && tag != MPI_ANY_TAG){
retval = MPI_ERR_TAG;
} else {
- int my_proc_id = simgrid::s4u::Actor::self()->getPid() - 1;
+ int my_proc_id = simgrid::s4u::Actor::self()->getPid();
int dst_traced = getPid(comm, dst);
TRACE_smpi_comm_in(my_proc_id, __FUNCTION__,
new simgrid::instr::Pt2PtTIData("Ssend", dst_traced,
} else if((sendtag<0 && sendtag != MPI_ANY_TAG)||(recvtag<0 && recvtag != MPI_ANY_TAG)){
retval = MPI_ERR_TAG;
} else {
- int my_proc_id = simgrid::s4u::Actor::self()->getPid() - 1;
+ int my_proc_id = simgrid::s4u::Actor::self()->getPid();
int dst_traced = getPid(comm, dst);
int src_traced = getPid(comm, src);
retval = MPI_SUCCESS;
} else {
int my_proc_id = (*request)->comm() != MPI_COMM_NULL
- ? simgrid::s4u::Actor::self()->getPid() - 1
+ ? simgrid::s4u::Actor::self()->getPid()
: -1; // TODO: cheinrich: Check if this correct or if it should be MPI_UNDEFINED
TRACE_smpi_comm_in(my_proc_id, __FUNCTION__, new simgrid::instr::NoOpTIData("wait"));