Changeset 1110 for XIOS/dev/branch_yushan/extern/src_ep_dev/ep_recv.cpp

Timestamp:

05/02/17 17:03:25 (7 years ago)

Author:

yushan

Message:

redefinition of mpi_any_source and mpi_any_tag

File:

• XIOS/dev/branch_yushan/extern/src_ep_dev/ep_recv.cpp (modified) (2 diffs)

XIOS/dev/branch_yushan/extern/src_ep_dev/ep_recv.cpp

@@ -25 +25 @@
       ::MPI_Comm mpi_comm = static_cast< ::MPI_Comm >(comm.mpi_comm);
       ::MPI_Status mpi_status;
-      ::MPI_Recv(buf, count, static_cast< ::MPI_Datatype >(datatype), src, tag, mpi_comm, &mpi_status);
+      ::MPI_Recv(buf, count, static_cast< ::MPI_Datatype >(datatype), src<0? MPI_ANY_SOURCE : src, tag<0? MPI_ANY_TAG: tag, mpi_comm, &mpi_status);
 
       status->ep_src = src;
@@ -57 +57 @@
                   ::MPI_Request mpi_request;
                   ::MPI_Comm mpi_comm = static_cast< ::MPI_Comm > (comm.mpi_comm);
-                  ::MPI_Irecv(buf, count, static_cast< ::MPI_Datatype> (datatype), src, tag, mpi_comm, &mpi_request);
+                  ::MPI_Irecv(buf, count, static_cast< ::MPI_Datatype> (datatype), src<0? MPI_ANY_SOURCE : src, tag<0? MPI_ANY_TAG: tag, mpi_comm, &mpi_request);
 
                   request->mpi_request = mpi_request;