Changeset 1395 for XIOS/dev/branch_openmp

Timestamp:

01/10/18 15:33:27 (6 years ago)

Author:

yushan

Message:

dev EP-RMA : MPI_Compare_and_swap

Location:

XIOS/dev/branch_openmp/extern/ep_dev

Files:

• ep_compare.cpp (added)
• ep_lib_win.hpp (modified) (1 diff)
• main.cpp (modified) (1 diff)

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

@@ -28 +28 @@
   int MPI_Fetch_and_op(const void *origin_addr, void *result_addr, MPI_Datatype datatype, int target_rank, 
                       MPI_Aint target_disp, MPI_Op op, MPI_Win win);
+
+  int MPI_Compare_and_swap(const void *origin_addr, const void *compare_addr, void *result_addr, MPI_Datatype datatype, 
+                           int target_rank, MPI_Aint target_disp, MPI_Win win);
+
 }
 

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

@@ -742 +742 @@
     MPI_Win_fence(0, ep_win);
 
+    if(rank == 7)
+    {
+      MPI_Aint displs = 0;
+      MPI_Compare_and_swap(&local_buf, &buf, &result_buf, MPI_INT, size-1, displs, ep_win);
+    }
+
+    MPI_Win_fence(0, ep_win);
+
+    //::MPI_Compare_and_swap(origin_addr, compare_addr, result_addr, to_mpi_type(datatype), target_mpi_rank, to_mpi_aint(target_disp), to_mpi_win(win.server_win[target_local_rank]));
+
     MPI_Win ep_win_allocated;
     int* baseptr = new int[10];