/** * Measurement wrapper for MPI_Close_port * @note Auto-generated by wrapgen from template: std.w * @note C interface * @note Introduced with MPI 2.0 * @ingroup spawn */ int MPI_Close_port(char* port_name) { int return_val; if (IS_EVENT_GEN_ON_FOR(SPAWN)) { EVENT_GEN_OFF(); esd_enter(epk_mpi_regid[EPK__MPI_CLOSE_PORT]); return_val = PMPI_Close_port(port_name); esd_exit(epk_mpi_regid[EPK__MPI_CLOSE_PORT]); EVENT_GEN_ON(); } else { return_val = PMPI_Close_port(port_name); } return return_val; }
int MPI_Close_port( char *port_name){ return PMPI_Close_port( port_name); }