Added rte_init call so info call does not segv anymore.
This commit was SVN r1992.
Этот коммит содержится в:
родитель
2271910f22
Коммит
63ad2ba8de
@ -36,6 +36,10 @@ int main(int argc, char *argv[])
|
|||||||
int ret = 0;
|
int ret = 0;
|
||||||
bool acted = false;
|
bool acted = false;
|
||||||
|
|
||||||
|
bool multi_thread = false;
|
||||||
|
bool hidden_thread = false;
|
||||||
|
|
||||||
|
|
||||||
/* Start OMPI process */
|
/* Start OMPI process */
|
||||||
|
|
||||||
if (OMPI_SUCCESS != ompi_init(argc, argv)) {
|
if (OMPI_SUCCESS != ompi_init(argc, argv)) {
|
||||||
@ -104,6 +108,14 @@ int main(int argc, char *argv[])
|
|||||||
/*ompid::show_ompi_version(ver_full);*/
|
/*ompid::show_ompi_version(ver_full);*/
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/* before calling anything (like proc_info) we to call rte init */
|
||||||
|
|
||||||
|
if (OMPI_SUCCESS != ompi_rte_init(&multi_thread, &hidden_thread)) {
|
||||||
|
printf("ompid: ompi_rte_init failed\n");
|
||||||
|
return ret;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
/* Set proc_info's seed to true. This is the seed daemon. */
|
/* Set proc_info's seed to true. This is the seed daemon. */
|
||||||
if ( ompi_proc_info () == MPI_SUCCESS ){
|
if ( ompi_proc_info () == MPI_SUCCESS ){
|
||||||
ompi_process_info.seed = true;
|
ompi_process_info.seed = true;
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user