C++ (Cpp) PMPI_Errhandler_f2c Beispiele

Beispiel #1

Datei: file_set_errhandler_f.c Projekt: 00datman/ompi

void ompi_file_set_errhandler_f(MPI_Fint *fh, MPI_Fint *errhandler,
			       MPI_Fint *ierr)
{
    int c_ierr;
    MPI_File c_fh = PMPI_File_f2c(*fh);
    MPI_Errhandler c_err = PMPI_Errhandler_f2c(*errhandler);

    c_ierr = PMPI_File_set_errhandler(c_fh, c_err);
    if (NULL != ierr) *ierr = OMPI_INT_2_FINT(c_ierr);
}

Beispiel #2

Datei: smpi_mpi.c Projekt: FlorianPO/simgrid

MPI_Errhandler MPI_Errhandler_f2c(MPI_Fint errhandler){
  return PMPI_Errhandler_f2c(errhandler);
}