@@ -126,6 +126,7 @@ static ompi_mpi_errcode_t ompi_err_proc_fail_pending;
126
126
static ompi_mpi_errcode_t ompi_err_revoked ;
127
127
#endif
128
128
static ompi_mpi_errcode_t ompi_err_session ;
129
+ static ompi_mpi_errcode_t ompi_err_value_too_large ;
129
130
130
131
static void ompi_mpi_errcode_construct (ompi_mpi_errcode_t * errcode );
131
132
static void ompi_mpi_errcode_destruct (ompi_mpi_errcode_t * errcode );
@@ -243,6 +244,7 @@ int ompi_mpi_errcode_init (void)
243
244
CONSTRUCT_ERRCODE ( ompi_err_revoked , MPI_ERR_REVOKED , "MPI_ERR_REVOKED: Communication Object Revoked" );
244
245
#endif
245
246
CONSTRUCT_ERRCODE ( ompi_err_session , MPI_ERR_SESSION , "MPI_ERR_SESSION: Invalid session handle" );
247
+ CONSTRUCT_ERRCODE ( ompi_err_value_too_large , MPI_ERR_VALUE_TOO_LARGE , "MPI_ERR_VALUE_TOO_LARGE: Value is too large to store" );
246
248
247
249
/* Per MPI-3 p353:27-32, MPI_LASTUSEDCODE must be >=
248
250
MPI_ERR_LASTCODE. So just start it as == MPI_ERR_LASTCODE. */
@@ -359,6 +361,7 @@ int ompi_mpi_errcode_finalize (void)
359
361
OBJ_DESTRUCT (& ompi_err_revoked );
360
362
#endif
361
363
OBJ_DESTRUCT (& ompi_err_session );
364
+ OBJ_DESTRUCT (& ompi_err_value_too_large );
362
365
OBJ_DESTRUCT (& ompi_mpi_errcodes );
363
366
ompi_mpi_errcode_lastpredefined = 0 ;
364
367
opal_mutex_unlock (& errcode_lock );
0 commit comments