1
1

Need to set MPI_ERROR in the status before calling ompi_request_complete.

This commit was SVN r26757.
Этот коммит содержится в:
Brian Barrett 2012-07-06 01:14:35 +00:00
родитель 27d45ad550
Коммит e0ceabd486
2 изменённых файлов: 1 добавлений и 2 удалений

Просмотреть файл

@ -234,9 +234,7 @@ libnbc_progress(void)
item = opal_list_get_next(item)) {
ompi_coll_libnbc_request_t* request = (ompi_coll_libnbc_request_t*) item;
if (NBC_OK == NBC_Progress(request)) {
request->super.req_status.MPI_ERROR = OMPI_SUCCESS;
/* done, remove */
fprintf(stderr, "why am i here?\n");
item = opal_list_remove_item(&mca_coll_libnbc_component.active_requests,
&request->super.super.super);
}

Просмотреть файл

@ -274,6 +274,7 @@ static inline int NBC_Free(NBC_Handle* handle) {
handle->tmpbuf = NULL;
}
handle->super.req_status.MPI_ERROR = OMPI_SUCCESS;
OPAL_THREAD_LOCK(&ompi_request_lock);
ompi_request_complete(&handle->super, true);
OPAL_THREAD_UNLOCK(&ompi_request_lock);