Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
...
authordegomme <augustin.degomme@unibas.ch>
Wed, 7 Mar 2018 15:36:06 +0000 (16:36 +0100)
committerdegomme <augustin.degomme@unibas.ch>
Wed, 7 Mar 2018 15:36:19 +0000 (16:36 +0100)
src/smpi/mpi/smpi_request.cpp

index c408fab..aba390c 100644 (file)
@@ -310,7 +310,7 @@ void Request::sendrecv(void *sendbuf, int sendcount, MPI_Datatype sendtype,int d
   if ((comm->group()->actor(dst)->getPid() == myid) && (comm->group()->actor(src)->getPid() == myid)){
       Datatype::copy(sendbuf, sendcount, sendtype, recvbuf, recvcount, recvtype);
       if(status !=MPI_STATUS_IGNORE){
-          status->MPI_SOURCE = comm->group()->rank(src);
+          status->MPI_SOURCE = src;
           status->MPI_TAG = recvtag;
           status->MPI_ERROR = MPI_SUCCESS;
           status->count = sendcount*sendtype->size();