Ejemplo n.º 1
0
/**
 * Measurement wrapper for MPI_Comm_get_errhandler
 * @note Auto-generated by wrapgen from template: std.w
 * @note C interface
 * @note Introduced with MPI 2.0
 * @ingroup cg_err
 */
int MPI_Comm_get_errhandler(MPI_Comm        comm,
                            MPI_Errhandler* errhandler)
{
  int return_val;

  if (IS_EVENT_GEN_ON_FOR(CG_ERR))
  {
    EVENT_GEN_OFF();
    esd_enter(epk_mpi_regid[EPK__MPI_COMM_GET_ERRHANDLER]);

    return_val = PMPI_Comm_get_errhandler(comm, errhandler);

    esd_exit(epk_mpi_regid[EPK__MPI_COMM_GET_ERRHANDLER]);
    EVENT_GEN_ON();
  }
  else
  {
    return_val = PMPI_Comm_get_errhandler(comm, errhandler);
  }

  return return_val;
}
Ejemplo n.º 2
0
int MPI_Comm_get_errhandler(MPI_Comm comm, MPI_Errhandler *eh)
{
  int rc = PMPI_Comm_get_errhandler(comm, eh); 
  Errhandler2Callpath.allocate(*eh, chop); 
  return rc; 
}