/**
 * Measurement wrapper for MPI_Open_port
 * @note Auto-generated by wrapgen from template: std.w
 * @note C interface
 * @note Introduced with MPI 2.0
 * @ingroup spawn
 */
int MPI_Open_port(MPI_Info info,
                  char*    port_name)
{
  int return_val;

  if (IS_EVENT_GEN_ON_FOR(SPAWN))
  {
    EVENT_GEN_OFF();
    esd_enter(epk_mpi_regid[EPK__MPI_OPEN_PORT]);

    return_val = PMPI_Open_port(info, port_name);

    esd_exit(epk_mpi_regid[EPK__MPI_OPEN_PORT]);
    EVENT_GEN_ON();
  }
  else
  {
    return_val = PMPI_Open_port(info, port_name);
  }

  return return_val;
}
Esempio n. 2
0
int MPI_Open_port( MPI_Info info, char *port_name){
  return PMPI_Open_port( info,port_name);
}