Shut down properly; ensure to call mca_base_close() to close out MCA
This commit was SVN r607.
Этот коммит содержится в:
родитель
38cc1daf72
Коммит
9958416dda
@ -8,8 +8,11 @@
|
||||
#include "lam/runtime/runtime.h"
|
||||
#include "mpi.h"
|
||||
#include "mpi/runtime/runtime.h"
|
||||
#include "mca/lam/base/base.h"
|
||||
#include "mca/mpi/ptl/ptl.h"
|
||||
#include "mca/mpi/ptl/base/base.h"
|
||||
#include "mca/mpi/pml/pml.h"
|
||||
#include "mca/mpi/pml/base/base.h"
|
||||
|
||||
|
||||
int lam_mpi_finalize(void)
|
||||
@ -34,6 +37,12 @@ int lam_mpi_finalize(void)
|
||||
return ret;
|
||||
}
|
||||
|
||||
/* Close down the MCA */
|
||||
|
||||
if (LAM_SUCCESS != (ret = mca_base_close())) {
|
||||
return ret;
|
||||
}
|
||||
|
||||
/* Leave LAM */
|
||||
|
||||
if (LAM_SUCCESS != (ret = lam_finalize())) {
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user