call MPI_Recv directly to remove redundant contiguous check

cwpearson · cwpearson · commit 9b4942146975 · 2025-02-19T17:03:19.000-07:00
Signed-off-by: Carl Pearson &lt;cwpears@sandia.gov&gt;
diff --git a/src/KokkosComm/mpi/recv.hpp b/src/KokkosComm/mpi/recv.hpp
@@ -57,7 +57,8 @@ void recv(const ExecSpace &space, RecvView &rv, int src, int tag, MPI_Comm comm)
   } else {
     using RecvScalar = typename RecvView::value_type;
     space.fence("Fence before MPI_Recv");  // prevent work in `space` from writing to recv buffer
-    recv(rv, src, tag, comm, MPI_STATUS_IGNORE);
+    MPI_Recv(KokkosComm::data_handle(rv), KokkosComm::span(rv), KokkosComm::Impl::mpi_type_v<RecvScalar>, src, tag,
+             comm, MPI_STATUS_IGNORE);
   }
 
   Kokkos::Tools::popRegion();

Original file line number	Diff line number	Diff line change
`@@ -57,7 +57,8 @@ void recv(const ExecSpace &space, RecvView &rv, int src, int tag, MPI_Comm comm)`
`57`	`57`	`} else {`
`58`	`58`	`using RecvScalar = typename RecvView::value_type;`
`59`	`59`	space.fence("Fence before MPI_Recv"); // prevent work in `space` from writing to recv buffer
`60`		`- recv(rv, src, tag, comm, MPI_STATUS_IGNORE);`
	`60`	`+ MPI_Recv(KokkosComm::data_handle(rv), KokkosComm::span(rv), KokkosComm::Impl::mpi_type_v<RecvScalar>, src, tag,`
	`61`	`+ comm, MPI_STATUS_IGNORE);`
`61`	`62`	`}`
`62`	`63`
`63`	`64`	`Kokkos::Tools::popRegion();`