Cleanup a variable that isn't used if pmi2 support is available
Refs trac:3683 This commit was SVN r28841. The following Trac tickets were found above: Ticket 3683 --> https://svn.open-mpi.org/trac/ompi/ticket/3683
Этот коммит содержится в:
родитель
93cef82873
Коммит
fc3b777ef5
@ -79,7 +79,6 @@ orte_ess_base_module_t orte_ess_pmi_module = {
|
|||||||
};
|
};
|
||||||
|
|
||||||
static bool app_init_complete=false;
|
static bool app_init_complete=false;
|
||||||
static int pmi_maxlen=0;
|
|
||||||
|
|
||||||
/**** MODULE FUNCTIONS ****/
|
/**** MODULE FUNCTIONS ****/
|
||||||
|
|
||||||
@ -160,16 +159,20 @@ static int rte_init(void)
|
|||||||
goto error;
|
goto error;
|
||||||
}
|
}
|
||||||
#else
|
#else
|
||||||
/* get our PMI id length */
|
{
|
||||||
if (PMI_SUCCESS != (ret = PMI_Get_id_length_max(&pmi_maxlen))) {
|
int pmi_maxlen;
|
||||||
error = "PMI_Get_id_length_max";
|
|
||||||
goto error;
|
/* get our PMI id length */
|
||||||
}
|
if (PMI_SUCCESS != (ret = PMI_Get_id_length_max(&pmi_maxlen))) {
|
||||||
pmi_id = (char*)malloc(pmi_maxlen);
|
error = "PMI_Get_id_length_max";
|
||||||
if (PMI_SUCCESS != (ret = PMI_Get_kvs_domain_id(pmi_id, pmi_maxlen))) {
|
goto error;
|
||||||
free(pmi_id);
|
}
|
||||||
error = "PMI_Get_kvs_domain_id";
|
pmi_id = (char*)malloc(pmi_maxlen);
|
||||||
goto error;
|
if (PMI_SUCCESS != (ret = PMI_Get_kvs_domain_id(pmi_id, pmi_maxlen))) {
|
||||||
|
free(pmi_id);
|
||||||
|
error = "PMI_Get_kvs_domain_id";
|
||||||
|
goto error;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
/* PMI is very nice to us - the domain id is an integer followed
|
/* PMI is very nice to us - the domain id is an integer followed
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user