Changeset 1328 for XIOS/dev/branch_openmp/extern/src_ep_dev/ep_intercomm.cpp

Timestamp:

11/15/17 12:14:34 (6 years ago)

Author:

yushan

Message:

dev_omp

File:

• XIOS/dev/branch_openmp/extern/src_ep_dev/ep_intercomm.cpp (modified) (1 diff)

XIOS/dev/branch_openmp/extern/src_ep_dev/ep_intercomm.cpp

@@ -47 +47 @@
 
       MPI_Waitall(2, request, status);
+
+      //MPI_Send(&leader_ranks[0], 3, static_cast< ::MPI_Datatype>(MPI_INT), remote_leader, tag, peer_comm);
+      //MPI_Recv(&leader_ranks[3], 3, static_cast< ::MPI_Datatype>(MPI_INT), remote_leader, tag, peer_comm, &status[1]);
     }