1
1

Merge pull request #3604 from rhc54/topic/test

Add minor test to ORTE test suite
Этот коммит содержится в:
Ralph Castain 2017-05-29 16:03:13 -07:00 коммит произвёл GitHub
родитель a8b34d975a e8759ca66b
Коммит 22631832ce
3 изменённых файлов: 25 добавлений и 1 удалений

1
.gitignore поставляемый
Просмотреть файл

@ -416,6 +416,7 @@ orte/test/mpi/coll_test
orte/test/mpi/badcoll
orte/test/mpi/iof
orte/test/mpi/no-disconnect
orte/test/mpi/nonzero
orte/test/system/radix
orte/test/system/sigusr_trap

Просмотреть файл

@ -5,7 +5,7 @@ PROGS = mpi_no_op mpi_barrier hello hello_nodename abort multi_abort simple_spaw
parallel_w8 parallel_w64 parallel_r8 parallel_r64 sio sendrecv_blaster early_abort \
debugger singleton_client_server intercomm_create spawn_tree init-exit77 mpi_info \
info_spawn server client paccept pconnect ring hello.sapp binding badcoll attach xlib \
no-disconnect
no-disconnect nonzero
all: $(PROGS)

23
orte/test/mpi/nonzero.c Обычный файл
Просмотреть файл

@ -0,0 +1,23 @@
#include <stdlib.h>
#include <unistd.h>
#include <mpi.h>
int main(int argc, char **argv)
{
int rank;
if(argc < 2) {
return 0;
}
MPI_Init(&argc, &argv);
MPI_Comm_rank(MPI_COMM_WORLD,&rank);
int i = atoi(argv[1]);
MPI_Finalize();
if (i != rank) {
sleep(1);
}
return i;
}