Actually, invoke the error on MPI_COMM_WORLD if you have an invalid
communicator. :-) This commit was SVN r21942.
Этот коммит содержится в:
родитель
a211c55cce
Коммит
c879170c9e
@ -51,7 +51,8 @@ int MPI_Comm_get_attr(MPI_Comm comm, int comm_keyval,
|
||||
if ((NULL == attribute_val) || (NULL == flag)) {
|
||||
return OMPI_ERRHANDLER_INVOKE(comm, MPI_ERR_ARG, FUNC_NAME);
|
||||
} else if (ompi_comm_invalid(comm)) {
|
||||
return OMPI_ERRHANDLER_INVOKE(comm, MPI_ERR_COMM, FUNC_NAME);
|
||||
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_COMM,
|
||||
FUNC_NAME);
|
||||
} else if (MPI_KEYVAL_INVALID == comm_keyval) {
|
||||
return OMPI_ERRHANDLER_INVOKE(comm, MPI_ERR_KEYVAL, FUNC_NAME);
|
||||
}
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user