Changeset 1134 for XIOS/dev/branch_yushan_merged/src/event_scheduler.cpp
- Timestamp:
- 05/16/17 17:54:30 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/dev/branch_yushan_merged/src/event_scheduler.cpp
r591 r1134 132 132 while(received) 133 133 { 134 #ifdef _usingEP 135 MPI_Iprobe(-1,1,communicator,&received, &status) ; 136 #else 134 137 MPI_Iprobe(MPI_ANY_SOURCE,1,communicator,&received, &status) ; 138 #endif 135 139 if (received) 136 140 { 137 141 recvRequest=new SPendingRequest ; 142 #ifdef _usingEP 143 MPI_Irecv(recvRequest->buffer, 3, MPI_UNSIGNED_LONG, -1, 1, communicator, &(recvRequest->request)) ; 144 #else 138 145 MPI_Irecv(recvRequest->buffer, 3, MPI_UNSIGNED_LONG, MPI_ANY_SOURCE, 1, communicator, &(recvRequest->request)) ; 146 #endif 139 147 pendingRecvParentRequest.push(recvRequest) ; 140 148 } … … 174 182 while(received) 175 183 { 184 #ifdef _usingEP 185 MPI_Iprobe(-1,0,communicator,&received, &status) ; 186 #else 176 187 MPI_Iprobe(MPI_ANY_SOURCE,0,communicator,&received, &status) ; 188 #endif 177 189 if (received) 178 190 { 179 191 recvRequest=new SPendingRequest ; 192 #ifdef _usingEP 193 MPI_Irecv(recvRequest->buffer, 3, MPI_UNSIGNED_LONG, -1, 0, communicator, &recvRequest->request) ; 194 #else 180 195 MPI_Irecv(recvRequest->buffer, 3, MPI_UNSIGNED_LONG, MPI_ANY_SOURCE, 0, communicator, &recvRequest->request) ; 196 #endif 181 197 pendingRecvChildRequest.push_back(recvRequest) ; 182 198 }
Note: See TracChangeset
for help on using the changeset viewer.