ports/openmpi
ports/openmpi
1
1
Форкнуть 0
Код Релизы Активность

orte mpi tests: don't use deprecated MPI functions

Просмотр исходного кода 
Change MPI_Errhandler_set -> MPI_Comm_set_errhandler
Этот коммит содержится в:
Jeff Squyres 2015-02-11 12:09:59 -05:00
родитель cc7f433c0f
Коммит 07179ef669
2 изменённых файлов: 2 добавлений и 2 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

2
orte/test/mpi/crisscross.c
Просмотреть файл

@ -71,7 +71,7 @@ int main(int argc, char *argv[])
MPI_Abort(MPI_COMM_WORLD, -1); MPI_Abort(MPI_COMM_WORLD, -1);
} }
MPI_Errhandler_set(MPI_COMM_WORLD, MPI_ERRORS_RETURN); MPI_Comm_set_errhandler(MPI_COMM_WORLD, MPI_ERRORS_RETURN);
mpierr = MPI_Comm_rank(MPI_COMM_WORLD, &rank); mpierr = MPI_Comm_rank(MPI_COMM_WORLD, &rank);
if (mpierr != MPI_SUCCESS || rank < 0) if (mpierr != MPI_SUCCESS || rank < 0)

2
orte/test/mpi/sendrecv_blaster.c
Просмотреть файл

@ -56,7 +56,7 @@ int main(int argc, char *argv[])
MPI_Abort(MPI_COMM_WORLD, -1); MPI_Abort(MPI_COMM_WORLD, -1);
} }
MPI_Errhandler_set(MPI_COMM_WORLD, MPI_ERRORS_RETURN); MPI_Comm_set_errhandler(MPI_COMM_WORLD, MPI_ERRORS_RETURN);
mpierr = MPI_Comm_rank(MPI_COMM_WORLD, &rank); mpierr = MPI_Comm_rank(MPI_COMM_WORLD, &rank);
if (mpierr != MPI_SUCCESS || rank < 0) if (mpierr != MPI_SUCCESS || rank < 0)