Do the wait on a temporary status and then copy it at the position index.
This commit was SVN r3083.
Этот коммит содержится в:
родитель
ce03565c4f
Коммит
b1459954eb
@ -40,7 +40,7 @@ int MPI_Waitsome(int incount, MPI_Request *requests,
|
|||||||
}
|
}
|
||||||
|
|
||||||
/* optimize this in the future */
|
/* optimize this in the future */
|
||||||
rc = ompi_request_wait_any(incount, requests, &index, statuses);
|
rc = ompi_request_wait_any( incount, requests, &index, &status );
|
||||||
OMPI_ERRHANDLER_CHECK(rc, MPI_COMM_WORLD, rc, FUNC_NAME);
|
OMPI_ERRHANDLER_CHECK(rc, MPI_COMM_WORLD, rc, FUNC_NAME);
|
||||||
if( MPI_UNDEFINED ==index ) {
|
if( MPI_UNDEFINED ==index ) {
|
||||||
*outcount = MPI_UNDEFINED;
|
*outcount = MPI_UNDEFINED;
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user