Minor update to r30430: put the variables at the top of the function
instead of making an inner block. Refs trac:4185 This commit was SVN r30588. The following SVN revision numbers were found above: r30430 --> open-mpi/ompi@ea3cb1e110 The following Trac tickets were found above: Ticket 4185 --> https://svn.open-mpi.org/trac/ompi/ticket/4185
Этот коммит содержится в:
родитель
fad3cbf639
Коммит
12a4d1a27f
@ -94,6 +94,8 @@ int ompi_mpi_finalize(void)
|
|||||||
opal_list_item_t *item;
|
opal_list_item_t *item;
|
||||||
struct timeval ompistart, ompistop;
|
struct timeval ompistart, ompistop;
|
||||||
ompi_rte_collective_t *coll;
|
ompi_rte_collective_t *coll;
|
||||||
|
ompi_proc_t** procs;
|
||||||
|
size_t nprocs;
|
||||||
|
|
||||||
/* Be a bit social if an erroneous program calls MPI_FINALIZE in
|
/* Be a bit social if an erroneous program calls MPI_FINALIZE in
|
||||||
two different threads, otherwise we may deadlock in
|
two different threads, otherwise we may deadlock in
|
||||||
@ -136,12 +138,11 @@ int ompi_mpi_finalize(void)
|
|||||||
*/
|
*/
|
||||||
(void)mca_pml_base_bsend_detach(NULL, NULL);
|
(void)mca_pml_base_bsend_detach(NULL, NULL);
|
||||||
|
|
||||||
{
|
nprocs = 0;
|
||||||
size_t nprocs = 0;
|
procs = ompi_proc_all(&nprocs);
|
||||||
ompi_proc_t** procs = ompi_proc_all(&nprocs);
|
|
||||||
MCA_PML_CALL(del_procs(procs, nprocs));
|
MCA_PML_CALL(del_procs(procs, nprocs));
|
||||||
free(procs);
|
free(procs);
|
||||||
}
|
|
||||||
#if OMPI_ENABLE_PROGRESS_THREADS == 0
|
#if OMPI_ENABLE_PROGRESS_THREADS == 0
|
||||||
opal_progress_set_event_flag(OPAL_EVLOOP_ONCE | OPAL_EVLOOP_NONBLOCK);
|
opal_progress_set_event_flag(OPAL_EVLOOP_ONCE | OPAL_EVLOOP_NONBLOCK);
|
||||||
#endif
|
#endif
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user