C++ (Cpp) PMPI_Comm_get_attrの例

コード例 #1

ファイル: epk_mpiwrap_cg.c プロジェクト: linearregression/scalasca

/**
 * Measurement wrapper for MPI_Comm_get_attr
 * @note Auto-generated by wrapgen from template: std.w
 * @note C interface
 * @note Introduced with MPI 2.0
 * @ingroup cg_ext
 */
int MPI_Comm_get_attr(MPI_Comm comm,
                      int      comm_keyval,
                      void*    attribute_val,
                      int*     flag)
{
  int return_val;

  if (IS_EVENT_GEN_ON_FOR(CG_EXT))
  {
    EVENT_GEN_OFF();
    esd_enter(epk_mpi_regid[EPK__MPI_COMM_GET_ATTR]);

    return_val = PMPI_Comm_get_attr(comm, comm_keyval, attribute_val, flag);

    esd_exit(epk_mpi_regid[EPK__MPI_COMM_GET_ATTR]);
    EVENT_GEN_ON();
  }
  else
  {
    return_val = PMPI_Comm_get_attr(comm, comm_keyval, attribute_val, flag);
  }

  return return_val;
}

コード例 #2

ファイル: smpi_mpi.c プロジェクト: FlorianPO/simgrid

int MPI_Comm_get_attr (MPI_Comm comm, int comm_keyval, void *attribute_val, int *flag)
{
  return PMPI_Comm_get_attr (comm, comm_keyval, attribute_val, flag);
}