#include <stdio.h>
#include <unistd.h>
-#if !defined(USE_STRICT_MPI) && defined(MPICH)
-#define TEST_NBC_ROUTINES 1
-#endif
-
int main(int argc, char *argv[])
{
-#if defined(TEST_NBC_ROUTINES)
MPI_Request barrier;
- int i,done;
-#endif
- int rank;
+ int rank, i, done;
- MPI_Init(&argc,&argv);
- MPI_Comm_rank(MPI_COMM_WORLD,&rank);
-#if defined(TEST_NBC_ROUTINES)
- MPI_Ibarrier(MPI_COMM_WORLD,&barrier);
- for (i=0,done=0; !done; i++) {
+ MPI_Init(&argc, &argv);
+ MPI_Comm_rank(MPI_COMM_WORLD, &rank);
+ MPI_Ibarrier(MPI_COMM_WORLD, &barrier);
+ for (i = 0, done = 0; !done; i++) {
usleep(1000);
- /*printf("[%d] MPI_Test: %d\n",rank,i);*/
- MPI_Test(&barrier,&done,MPI_STATUS_IGNORE);
+ /*printf("[%d] MPI_Test: %d\n",rank,i); */
+ MPI_Test(&barrier, &done, MPI_STATUS_IGNORE);
}
-#endif
+
if (rank == 0)
printf(" No Errors\n");