Skip to content

Commit 70bfcb3

Browse files
committed
MPI_Info_toint/fromint allow to be calleable
prior to MPI_Init or MPI_Session_init Signed-off-by: Howard Pritchard <howardp@lanl.gov>
1 parent ae7c854 commit 70bfcb3

File tree

4 files changed

+2
-11
lines changed

4 files changed

+2
-11
lines changed

ompi/mpi/c/info_fromint_abi.c

Lines changed: 1 addition & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -38,17 +38,13 @@
3838
#define MPI_Info_fromint PMPI_Info_fromint
3939
#endif
4040

41-
static const char FUNC_NAME[] = "MPI_Info_fromint";
41+
static const char __opal_attribute_unused__ FUNC_NAME[] = "MPI_Info_fromint";
4242

4343
MPI_Info_ABI_INTERNAL MPI_Info_fromint(int info)
4444
{
4545
int o_index;
4646
intptr_t info_tmp;
4747

48-
if ( MPI_PARAM_CHECK ) {
49-
OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
50-
}
51-
5248
if (OMPI_ABI_HANDLE_BASE_OFFSET > (intptr_t)info) {
5349
info_tmp = (intptr_t)info;
5450
return (MPI_Info_ABI_INTERNAL)info_tmp;

ompi/mpi/c/info_fromint_ompi.c

Lines changed: 1 addition & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -34,14 +34,11 @@
3434
#define MPI_Info_fromint PMPI_Info_fromint
3535
#endif
3636

37-
static const char FUNC_NAME[] = "MPI_Info_fromint";
37+
static const char __opal_attribute_unused__ FUNC_NAME[] = "MPI_Info_fromint";
3838

3939
MPI_Info MPI_Info_fromint(int info)
4040
{
4141
int o_index;
42-
if ( MPI_PARAM_CHECK ) {
43-
OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
44-
}
4542

4643
if (info == 0) {
4744
return MPI_INFO_NULL;

ompi/mpi/c/info_toint_abi.c

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -46,7 +46,6 @@ int MPI_Info_toint(MPI_Info_ABI_INTERNAL info)
4646
MPI_Info info_tmp;
4747

4848
if ( MPI_PARAM_CHECK ) {
49-
OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
5049
info_tmp = ompi_convert_abi_info_intern_info(info);
5150
if ((NULL != info) && ompi_info_is_freed(info_tmp)) {
5251
return OMPI_ERRHANDLER_NOHANDLE_INVOKE(MPI_ERR_INFO, FUNC_NAME);

ompi/mpi/c/info_toint_ompi.c

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -41,7 +41,6 @@ int MPI_Info_toint(MPI_Info info)
4141
int o_index;
4242

4343
if ( MPI_PARAM_CHECK ) {
44-
OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
4544
if (NULL == info || ompi_info_is_freed(info)) {
4645
return OMPI_ERRHANDLER_NOHANDLE_INVOKE(MPI_ERR_INFO, FUNC_NAME);
4746
}

0 commit comments

Comments
 (0)