Cosmetic: expunge some more old 2-space-indent code (re-indent with
"indent(1)"). This commit was SVN r20179.
Этот коммит содержится в:
родитель
e1f40c6a71
Коммит
611ebeab33
@ -48,17 +48,19 @@ int MPI_Init(int *argc, char ***argv)
|
||||
|
||||
if (ompi_mpi_finalized) {
|
||||
if (0 == ompi_comm_rank(MPI_COMM_WORLD)) {
|
||||
orte_show_help("help-mpi-api.txt", "mpi-function-after-finalize",
|
||||
true, FUNC_NAME);
|
||||
orte_show_help("help-mpi-api.txt",
|
||||
"mpi-function-after-finalize", true, FUNC_NAME);
|
||||
}
|
||||
return ompi_errhandler_invoke(NULL, NULL, OMPI_ERRHANDLER_TYPE_COMM,
|
||||
return ompi_errhandler_invoke(NULL, NULL,
|
||||
OMPI_ERRHANDLER_TYPE_COMM,
|
||||
MPI_ERR_OTHER, FUNC_NAME);
|
||||
} else if (ompi_mpi_initialized) {
|
||||
if (0 == ompi_comm_rank(MPI_COMM_WORLD)) {
|
||||
orte_show_help("help-mpi-api.txt", "mpi-initialize-twice",
|
||||
true, FUNC_NAME);
|
||||
}
|
||||
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_OTHER, FUNC_NAME);
|
||||
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_OTHER,
|
||||
FUNC_NAME);
|
||||
}
|
||||
|
||||
/* check for environment overrides for required thread level. If
|
||||
@ -88,8 +90,10 @@ int MPI_Init(int *argc, char ***argv)
|
||||
back-end function directly. */
|
||||
|
||||
if (MPI_SUCCESS != err) {
|
||||
return ompi_errhandler_invoke(NULL, NULL, OMPI_ERRHANDLER_TYPE_COMM,
|
||||
err < 0 ? ompi_errcode_get_mpi_code(err) :
|
||||
return ompi_errhandler_invoke(NULL, NULL,
|
||||
OMPI_ERRHANDLER_TYPE_COMM,
|
||||
err <
|
||||
0 ? ompi_errcode_get_mpi_code(err) :
|
||||
err, FUNC_NAME);
|
||||
}
|
||||
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user