int MPI_Test_cancelled(const MPI_Status *status, int *flag)
{
int rc = MPI_SUCCESS;
MEMCHECKER (
if(status != MPI_STATUSES_IGNORE)
memchecker_status(status);
);
int MPI_Status_c2f(MPI_Status *c_status, MPI_Fint *f_status)
{
int i, *c_ints;
MEMCHECKER(
if(c_status != MPI_STATUSES_IGNORE) {
/*
* Before checking the complete status, we need to reset the definedness
* of the MPI_ERROR-field (single-completion calls wait/test).
*/
opal_memchecker_base_mem_defined(&c_status->MPI_ERROR, sizeof(int));
memchecker_status(c_status);
}
);
int MPI_Status_set_elements_x(MPI_Status *status, MPI_Datatype datatype, MPI_Count count)
{
int rc = MPI_SUCCESS;
size_t size;
MEMCHECKER(
if(status != MPI_STATUSES_IGNORE) {
/*
* Before checking the complete status, we need to reset the definedness
* of the MPI_ERROR-field (single-completion calls wait/test).
*/
opal_memchecker_base_mem_defined(&status->MPI_ERROR, sizeof(int));
memchecker_status (status);
memchecker_datatype(datatype);
}
);
int MPI_Get_count(const MPI_Status *status, MPI_Datatype datatype, int *count)
{
size_t size = 0, internal_count;
int rc = MPI_SUCCESS;
OPAL_CR_NOOP_PROGRESS();
MEMCHECKER(
if (status != MPI_STATUSES_IGNORE) {
/*
* Before checking the complete status, we need to reset the definedness
* of the MPI_ERROR-field (single-completion calls wait/test).
*/
opal_memchecker_base_mem_defined((void*)&status->MPI_ERROR, sizeof(int));
memchecker_status(status);
memchecker_datatype(datatype);
}
);
