fix non-orte builds of PSM
This commit was SVN r28893.
Этот коммит содержится в:
родитель
05ab9cbaa6
Коммит
704f1ecc18
@ -198,11 +198,11 @@ get_num_local_procs(int *out_nlp)
|
||||
static int
|
||||
get_local_rank(int *out_rank)
|
||||
{
|
||||
orte_node_rank_t my_node_rank;
|
||||
ompi_node_rank_t my_node_rank;
|
||||
|
||||
*out_rank = 0;
|
||||
|
||||
if (ORTE_NODE_RANK_INVALID == (my_node_rank =
|
||||
if (OMPI_NODE_RANK_INVALID == (my_node_rank =
|
||||
ompi_process_info.my_node_rank)) {
|
||||
return OMPI_ERROR;
|
||||
}
|
||||
|
@ -95,6 +95,7 @@ struct ompi_process_info_t {
|
||||
};
|
||||
typedef struct ompi_process_info_t ompi_process_info_t;
|
||||
#define OMPI_LOCAL_RANK_INVALID (-1)
|
||||
#define OMPI_NODE_RANK_INVALID (-1)
|
||||
|
||||
|
||||
OMPI_DECLSPEC extern ompi_process_info_t ompi_process_info;
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user