Exemplo n.º 1
0
/**
 * Measurement wrapper for MPI_Group_intersection
 * @note Auto-generated by wrapgen from template: group_mgnt.w
 * @note C interface
 * @note Introduced with MPI 1.0
 * @ingroup cg
 */
int MPI_Group_intersection(MPI_Group  group1,
                           MPI_Group  group2,
                           MPI_Group* newgroup)
{
  const int event_gen_active = IS_EVENT_GEN_ON_FOR(CG);
  int       return_val;

  if (event_gen_active)
  {
    EVENT_GEN_OFF();
    esd_enter(epk_mpi_regid[EPK__MPI_GROUP_INTERSECTION]);
  }

  return_val = PMPI_Group_intersection(group1, group2, newgroup);
  if (*newgroup != MPI_GROUP_NULL)
  {
    epk_group_create(*newgroup);
  }

  if (event_gen_active)
  {
    esd_exit(epk_mpi_regid[EPK__MPI_GROUP_INTERSECTION]);
    EVENT_GEN_ON();
  }

  return return_val;
}
Exemplo n.º 2
0
int MPI_Group_intersection ( MPI_Group group1, MPI_Group group2, 
                           MPI_Group *group_out )
{
  return PMPI_Group_intersection (group1, group2, group_out);
}
Exemplo n.º 3
0
int MPI_Group_intersection(MPI_Group group1, MPI_Group group2, MPI_Group * newgroup)
{
  return PMPI_Group_intersection(group1, group2, newgroup);
}