Fixed bug in MPI_Sendrecv (thanks to Alexander)

c31312f2 · Philipp Samfaß · a128c87d · c31312f2
Commit c31312f2 authored Mar 31, 2020 by Philipp Samfaß
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lib/Wrapper.cpp lib/Wrapper.cpp +1 -1

No files found.
--- a/lib/Wrapper.cpp
+++ b/lib/Wrapper.cpp
@@ -210,7 +210,7 @@ int MPI_Sendrecv(const void *sendbuf, int sendcount, MPI_Datatype sendtype,
    }
  } else {
    //assert(comm == MPI_COMM_WORLD);
-    MPI_Sendrecv(sendbuf, sendcount, sendtype,dest,sendtag,recvbuf,recvcount,recvtype,source,recvtag, getTeamComm(comm),status);
+    PMPI_Sendrecv(sendbuf, sendcount, sendtype,dest,sendtag,recvbuf,recvcount,recvtype,source,recvtag, getTeamComm(comm),status);
  }
  return MPI_SUCCESS;
 }