Exemplo n.º 1
0
void ompi_grequest_complete_f(MPI_Fint *request, MPI_Fint *ierr)
{
    int c_ierr;
    MPI_Request c_req = PMPI_Request_f2c(*request);

    c_ierr = PMPI_Grequest_complete(c_req);
    if (NULL != ierr) *ierr = OMPI_INT_2_FINT(c_ierr);
}
Exemplo n.º 2
0
int MPI_Grequest_complete( MPI_Request request){
  return PMPI_Grequest_complete( request);
}