Changeset 1500 for XIOS/dev/branch_openmp/extern/ep_dev/ep_rank.cpp

Timestamp:

05/28/18 09:54:32 (6 years ago)

Author:

yushan

Message:

save dev

File:

• XIOS/dev/branch_openmp/extern/ep_dev/ep_rank.cpp (modified) (2 diffs)

XIOS/dev/branch_openmp/extern/ep_dev/ep_rank.cpp

@@ -12 +12 @@
   {
 
-    if(comm.is_ep)
+    if(comm->is_ep)
     {
       Debug("Calling EP_Comm_rank\n");
 
-      if(comm.is_intercomm)
+      if(comm->is_intercomm)
       {
-        *rank = comm.ep_comm_ptr->intercomm->size_rank_info[0].first;
+        *rank = comm->ep_comm_ptr->intercomm->size_rank_info[0].first;
         return 0;
       }
       else
       {
-        *rank = comm.ep_comm_ptr->size_rank_info[0].first;
+        *rank = comm->ep_comm_ptr->size_rank_info[0].first;
         return 0;
       }
@@ -31 +31 @@
     if(comm != MPI_COMM_NULL)
     {
-      ::MPI_Comm mpi_comm = to_mpi_comm(comm.mpi_comm);
+      ::MPI_Comm mpi_comm = to_mpi_comm(comm->mpi_comm);
       ::MPI_Comm_rank(mpi_comm, rank);
       return 0;