void ARMCI_AllFence() { armci_profile_start(ARMCI_PROF_ALLFENCE); PARMCI_AllFence(); armci_profile_stop(ARMCI_PROF_ALLFENCE); }
void ARMCI_AllFence() { static double stime, etime; stime = TIME(); PARMCI_AllFence(); etime = TIME(); ARMCI_AllFence_t += etime - stime; }
void PARMCI_Barrier() { if(armci_nproc==1)return; PARMCI_AllFence(); # ifdef MPI MPI_Barrier(ARMCI_COMM_WORLD); # else { long type=ARMCI_TAG; SYNCH_(&type); } # endif MEM_FENCE; }
void PARMCI_Barrier() { if (armci_nproc==1) return; #if defined(BGML) BGML_WaitAll(); bgml_barrier(3); #else PARMCI_AllFence(); # ifdef MPI MPI_Barrier(ARMCI_COMM_WORLD); # else { long type=ARMCI_TAG; tcg_synch(type); } # endif #endif MEM_FENCE; }
void ARMCI_AllFence(void) { PARMCI_AllFence(); return; }