Beispiel #1
0
void ompi_info_dup_f(MPI_Fint *info, MPI_Fint *newinfo, MPI_Fint *ierr)
{
    int c_ierr;
    MPI_Info c_info, c_new_info;

    c_info = PMPI_Info_f2c(*info);

    c_ierr = PMPI_Info_dup(c_info, &c_new_info);
    if (NULL != ierr) *ierr = OMPI_INT_2_FINT(c_ierr);

    if (MPI_SUCCESS == c_ierr) {
        *newinfo = PMPI_Info_c2f(c_new_info);
    }
}
Beispiel #2
0
int MPI_Info_dup(MPI_Info info, MPI_Info *newinfo)
{
  _MPI_COVERAGE();
  return PMPI_Info_dup (info, newinfo);
}
Beispiel #3
0
int MPI_Info_dup(MPI_Info info, MPI_Info *newinfo){
  return PMPI_Info_dup(info, newinfo);
}