The last commit wans't supposed to bring this function in. It's not yet
ready for primetime... This commit was SVN r9840.
Этот коммит содержится в:
родитель
33aa65f894
Коммит
e63c1dc242
@ -36,39 +36,3 @@ opal_class_t mca_pml_base_request_t_class = {
|
||||
(opal_destruct_t) mca_pml_base_request_destruct
|
||||
};
|
||||
|
||||
typedef struct {
|
||||
opal_list_item_t* last_memory;
|
||||
opal_list_item_t* last_request;
|
||||
} ompi_debug_request_pos_t;
|
||||
|
||||
int mca_pml_base_get_next_request( ompi_free_list_t* list,
|
||||
struct ompi_free_list_pos_t* position,
|
||||
ompi_request_state_t req_state,
|
||||
mca_pml_base_request_t** base_req )
|
||||
{
|
||||
opal_list_item_t* item;
|
||||
|
||||
dig_for_the_requests:
|
||||
(void)ompi_free_list_parse( list, position, &item );
|
||||
if( item == NULL ) {
|
||||
*base_req = NULL;
|
||||
return 0;
|
||||
}
|
||||
*base_req = (mca_pml_base_request_t*)item;
|
||||
/* Now that we have a pointer to a request, let's find if the request
|
||||
* match the user requirements.
|
||||
*/
|
||||
if( (*base_req)->req_ompi.req_state == OMPI_REQUEST_INVALID )
|
||||
goto dig_for_the_requests;
|
||||
|
||||
/* If the req_state is set to INVALID, then the user does not care about
|
||||
* the status of the request (except it should be valid !!!)
|
||||
*/
|
||||
if( req_state == OMPI_REQUEST_INVALID )
|
||||
return 0;
|
||||
|
||||
if( (*base_req)->req_ompi.req_state != req_state )
|
||||
goto dig_for_the_requests;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user