/** * Measurement wrapper for MPI_Error_class * @note Auto-generated by wrapgen from template: std.w * @note C interface * @note Introduced with MPI 1.0 * @ingroup err */ int MPI_Error_class(int errorcode, int* errorclass) { int return_val; if (IS_EVENT_GEN_ON_FOR(ERR)) { EVENT_GEN_OFF(); esd_enter(epk_mpi_regid[EPK__MPI_ERROR_CLASS]); return_val = PMPI_Error_class(errorcode, errorclass); esd_exit(epk_mpi_regid[EPK__MPI_ERROR_CLASS]); EVENT_GEN_ON(); } else { return_val = PMPI_Error_class(errorcode, errorclass); } return return_val; }
void ompi_error_class_f(MPI_Fint *errorcode, MPI_Fint *errorclass, MPI_Fint *ierr) { int c_ierr; OMPI_SINGLE_NAME_DECL(errorclass); c_ierr = PMPI_Error_class(OMPI_FINT_2_INT(*errorcode), OMPI_SINGLE_NAME_CONVERT(errorclass)); if (NULL != ierr) *ierr = OMPI_INT_2_FINT(c_ierr); if (MPI_SUCCESS == c_ierr) { OMPI_SINGLE_INT_2_FINT(errorclass); } }
int MPI_Error_class(int errorcode, int* errorclass) { return PMPI_Error_class(errorcode, errorclass); }