Merge pull request #1211 from rhc54/topic/jsharpe
Port the changes from #782 to the master.
Этот коммит содержится в:
Коммит
de7b93d3fc
@ -12,6 +12,7 @@
|
|||||||
* Copyright (c) 2015 Research Organization for Information Science
|
* Copyright (c) 2015 Research Organization for Information Science
|
||||||
* and Technology (RIST). All rights reserved.
|
* and Technology (RIST). All rights reserved.
|
||||||
* Copyright (c) 2015 Cisco Systems, Inc. All rights reserved.
|
* Copyright (c) 2015 Cisco Systems, Inc. All rights reserved.
|
||||||
|
* Copyright (c) 2015 Intel, Inc. All rights reserved
|
||||||
* $COPYRIGHT$
|
* $COPYRIGHT$
|
||||||
*
|
*
|
||||||
* Additional copyrights may follow
|
* Additional copyrights may follow
|
||||||
@ -38,8 +39,6 @@ static const char FUNC_NAME[] = "MPI_Finalized";
|
|||||||
|
|
||||||
int MPI_Finalized(int *flag)
|
int MPI_Finalized(int *flag)
|
||||||
{
|
{
|
||||||
MPI_Comm null = NULL;
|
|
||||||
|
|
||||||
OPAL_CR_NOOP_PROGRESS();
|
OPAL_CR_NOOP_PROGRESS();
|
||||||
|
|
||||||
/* We must obtain the lock to guarnatee consistent values of
|
/* We must obtain the lock to guarnatee consistent values of
|
||||||
@ -63,7 +62,10 @@ int MPI_Finalized(int *flag)
|
|||||||
FUNC_NAME);
|
FUNC_NAME);
|
||||||
} else {
|
} else {
|
||||||
opal_mutex_unlock(&ompi_mpi_bootstrap_mutex);
|
opal_mutex_unlock(&ompi_mpi_bootstrap_mutex);
|
||||||
return OMPI_ERRHANDLER_INVOKE(null, MPI_ERR_ARG,
|
/* We have no MPI object here so call ompi_errhandle_invoke
|
||||||
|
* directly */
|
||||||
|
return ompi_errhandler_invoke(NULL, NULL, -1,
|
||||||
|
ompi_errcode_get_mpi_code(MPI_ERR_ARG),
|
||||||
FUNC_NAME);
|
FUNC_NAME);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
@ -12,6 +12,7 @@
|
|||||||
* Copyright (c) 2014-2015 Cisco Systems, Inc. All rights reserved.
|
* Copyright (c) 2014-2015 Cisco Systems, Inc. All rights reserved.
|
||||||
* Copyright (c) 2015 Research Organization for Information Science
|
* Copyright (c) 2015 Research Organization for Information Science
|
||||||
* and Technology (RIST). All rights reserved.
|
* and Technology (RIST). All rights reserved.
|
||||||
|
* Copyright (c) 2015 Intel, Inc. All rights reserved
|
||||||
* $COPYRIGHT$
|
* $COPYRIGHT$
|
||||||
*
|
*
|
||||||
* Additional copyrights may follow
|
* Additional copyrights may follow
|
||||||
@ -39,7 +40,6 @@ static const char FUNC_NAME[] = "MPI_Get_library_version";
|
|||||||
int MPI_Get_library_version(char *version, int *resultlen)
|
int MPI_Get_library_version(char *version, int *resultlen)
|
||||||
{
|
{
|
||||||
int len_left;
|
int len_left;
|
||||||
MPI_Comm null = MPI_COMM_NULL;
|
|
||||||
char *ptr, tmp[MPI_MAX_LIBRARY_VERSION_STRING];
|
char *ptr, tmp[MPI_MAX_LIBRARY_VERSION_STRING];
|
||||||
|
|
||||||
OPAL_CR_NOOP_PROGRESS();
|
OPAL_CR_NOOP_PROGRESS();
|
||||||
@ -62,7 +62,10 @@ int MPI_Get_library_version(char *version, int *resultlen)
|
|||||||
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_ARG,
|
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_ARG,
|
||||||
FUNC_NAME);
|
FUNC_NAME);
|
||||||
} else {
|
} else {
|
||||||
return OMPI_ERRHANDLER_INVOKE(null, MPI_ERR_ARG,
|
/* We have no MPI object here so call ompi_errhandle_invoke
|
||||||
|
* directly */
|
||||||
|
return ompi_errhandler_invoke(NULL, NULL, -1,
|
||||||
|
ompi_errcode_get_mpi_code(MPI_ERR_ARG),
|
||||||
FUNC_NAME);
|
FUNC_NAME);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
@ -11,6 +11,7 @@
|
|||||||
* All rights reserved.
|
* All rights reserved.
|
||||||
* Copyright (c) 2015 Research Organization for Information Science
|
* Copyright (c) 2015 Research Organization for Information Science
|
||||||
* and Technology (RIST). All rights reserved.
|
* and Technology (RIST). All rights reserved.
|
||||||
|
* Copyright (c) 2015 Intel, Inc. All rights reserved
|
||||||
* $COPYRIGHT$
|
* $COPYRIGHT$
|
||||||
*
|
*
|
||||||
* Additional copyrights may follow
|
* Additional copyrights may follow
|
||||||
@ -37,8 +38,6 @@ static const char FUNC_NAME[] = "MPI_Get_version";
|
|||||||
|
|
||||||
int MPI_Get_version(int *version, int *subversion)
|
int MPI_Get_version(int *version, int *subversion)
|
||||||
{
|
{
|
||||||
MPI_Comm null = NULL;
|
|
||||||
|
|
||||||
OPAL_CR_NOOP_PROGRESS();
|
OPAL_CR_NOOP_PROGRESS();
|
||||||
|
|
||||||
if (MPI_PARAM_CHECK) {
|
if (MPI_PARAM_CHECK) {
|
||||||
@ -59,7 +58,10 @@ int MPI_Get_version(int *version, int *subversion)
|
|||||||
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_ARG,
|
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_ARG,
|
||||||
FUNC_NAME);
|
FUNC_NAME);
|
||||||
} else {
|
} else {
|
||||||
return OMPI_ERRHANDLER_INVOKE(null, MPI_ERR_ARG,
|
/* We have no MPI object here so call ompi_errhandle_invoke
|
||||||
|
* directly */
|
||||||
|
return ompi_errhandler_invoke(NULL, NULL, -1,
|
||||||
|
ompi_errcode_get_mpi_code(MPI_ERR_ARG),
|
||||||
FUNC_NAME);
|
FUNC_NAME);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
@ -12,6 +12,7 @@
|
|||||||
* Copyright (c) 2015 Research Organization for Information Science
|
* Copyright (c) 2015 Research Organization for Information Science
|
||||||
* and Technology (RIST). All rights reserved.
|
* and Technology (RIST). All rights reserved.
|
||||||
* Copyright (c) 2015 Cisco Systems, Inc. All rights reserved.
|
* Copyright (c) 2015 Cisco Systems, Inc. All rights reserved.
|
||||||
|
* Copyright (c) 2015 Intel, Inc. All rights reserved
|
||||||
* $COPYRIGHT$
|
* $COPYRIGHT$
|
||||||
*
|
*
|
||||||
* Additional copyrights may follow
|
* Additional copyrights may follow
|
||||||
@ -38,8 +39,6 @@ static const char FUNC_NAME[] = "MPI_Initialized";
|
|||||||
|
|
||||||
int MPI_Initialized(int *flag)
|
int MPI_Initialized(int *flag)
|
||||||
{
|
{
|
||||||
MPI_Comm null = NULL;
|
|
||||||
|
|
||||||
OPAL_CR_NOOP_PROGRESS();
|
OPAL_CR_NOOP_PROGRESS();
|
||||||
|
|
||||||
/* We must obtain the lock to guarnatee consistent values of
|
/* We must obtain the lock to guarnatee consistent values of
|
||||||
@ -63,7 +62,10 @@ int MPI_Initialized(int *flag)
|
|||||||
FUNC_NAME);
|
FUNC_NAME);
|
||||||
} else {
|
} else {
|
||||||
opal_mutex_unlock(&ompi_mpi_bootstrap_mutex);
|
opal_mutex_unlock(&ompi_mpi_bootstrap_mutex);
|
||||||
return OMPI_ERRHANDLER_INVOKE(null, MPI_ERR_ARG,
|
/* We have no MPI object here so call ompi_errhandle_invoke
|
||||||
|
* directly */
|
||||||
|
return ompi_errhandler_invoke(NULL, NULL, -1,
|
||||||
|
ompi_errcode_get_mpi_code(MPI_ERR_ARG),
|
||||||
FUNC_NAME);
|
FUNC_NAME);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
@ -123,7 +123,7 @@ const opal_event_component_t mca_event_libevent2022_component = {
|
|||||||
static int libevent2022_register (void)
|
static int libevent2022_register (void)
|
||||||
{
|
{
|
||||||
const struct eventop** _eventop = eventops;
|
const struct eventop** _eventop = eventops;
|
||||||
char available_eventops[1024] = "none";
|
char available_eventops[BUFSIZ] = "none";
|
||||||
char *help_msg = NULL;
|
char *help_msg = NULL;
|
||||||
int ret;
|
int ret;
|
||||||
|
|
||||||
|
@ -2120,7 +2120,6 @@ static int process(char *orig_line, char *basename, opal_cmd_line_t *cmd_line,
|
|||||||
else {
|
else {
|
||||||
goto out;
|
goto out;
|
||||||
}
|
}
|
||||||
free(tmp);
|
|
||||||
}
|
}
|
||||||
|
|
||||||
/* All done -- didn't find it */
|
/* All done -- didn't find it */
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user