Changeset 2260 for XIOS/dev/dev_ym/XIOS_COUPLING/src/manager/window_manager.hpp

Timestamp:

11/19/21 15:41:40 (3 years ago)

Author:

ymipsl

Message:

Improvment of one sided protocol

• removed latency
• solve dead-lock

YM

File:

• XIOS/dev/dev_ym/XIOS_COUPLING/src/manager/window_manager.hpp (modified) (2 diffs)

XIOS/dev/dev_ym/XIOS_COUPLING/src/manager/window_manager.hpp

@@ -61 +61 @@
         time=MPI_Wtime() ;
         while(time-lastTime < latency_) time=MPI_Wtime() ;
+        int flag ;
+        MPI_Iprobe(MPI_ANY_SOURCE, MPI_ANY_TAG, MPI_COMM_WORLD, &flag, MPI_STATUS_IGNORE);
         MPI_Win_lock(MPI_LOCK_EXCLUSIVE, rank, 0, window_) ;
         MPI_Compare_and_swap(&WINDOWS_LOCKED, &state, &lock, MPI_INT, rank, OFFSET_LOCK, window_) ;
@@ -86 +88 @@
         time=MPI_Wtime() ;
         while(time-lastTime < latency_) time=MPI_Wtime() ;
+        int flag ;
+        MPI_Iprobe(MPI_ANY_SOURCE, MPI_ANY_TAG, MPI_COMM_WORLD, &flag, MPI_STATUS_IGNORE);
         MPI_Win_lock(MPI_LOCK_EXCLUSIVE, rank, 0, window_) ;
         MPI_Compare_and_swap(&WINDOWS_LOCKED, &state, &lock, MPI_INT, rank, OFFSET_LOCK, window_) ;