Changeset 1384

Timestamp:

12/19/17 17:29:21 (6 years ago)

Author:

yushan

Message:

dev EP-RMA : MPI_Accumulate

Location:

XIOS/dev/branch_openmp/extern/ep_dev

Files:

• ep_accumulate.cpp (added)
• ep_get.cpp (added)
• ep_lib_win.hpp (modified) (1 diff)
• ep_put.cpp (added)
• main.cpp (modified) (1 diff)

XIOS/dev/branch_openmp/extern/ep_dev/ep_lib_win.hpp

@@ -16 +16 @@
   int MPI_Get(void *origin_addr, int origin_count, MPI_Datatype origin_datatype, 
                   int target_rank, MPI_Aint target_disp, int target_count, MPI_Datatype target_datatype, MPI_Win win);
+
+  int MPI_Accumulate(const void *origin_addr, int origin_count, MPI_Datatype origin_datatype, 
+                         int target_rank, MPI_Aint target_disp, int target_count, MPI_Datatype target_datatype, MPI_Op op, MPI_Win win);
 }
 

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

@@ -709 +709 @@
     }
 
+    MPI_Win_fence(0, ep_win);
+
+    if(rank == 0)
+    {
+      MPI_Aint displs(0);
+      MPI_Accumulate(&local_buf, 1, MPI_INT, size-1, displs, 1, MPI_INT, MPI_SUM, ep_win);
+    }
+
 
     MPI_Barrier(comm);