Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Revert "[TESTS] SMPI/MPICH3: Fix failing rma test"
[simgrid.git] / teshsuite / smpi / mpich3-test / rma / wincall.c
index c29b796..06a8823 100644 (file)
@@ -15,51 +15,51 @@ static char MTEST_Descrip[] = "Test win_call_errhandler";
 static int calls = 0;
 static int errs = 0;
 static MPI_Win mywin;
-void eh( MPI_Win *win, int *err, ... );
-void eh( MPI_Win *win, int *err, ... )
+void eh(MPI_Win * win, int *err, ...);
+void eh(MPI_Win * win, int *err, ...)
 {
     if (*err != MPI_ERR_OTHER) {
-       errs++;
-       printf( "Unexpected error code\n" );
+        errs++;
+        printf("Unexpected error code\n");
     }
     if (*win != mywin) {
-       errs++;
-       printf( "Unexpected window\n" );
+        errs++;
+        printf("Unexpected window\n");
     }
     calls++;
     return;
 }
-int main( int argc, char *argv[] )
+
+int main(int argc, char *argv[])
 {
     int buf[2];
-    MPI_Win        win;
+    MPI_Win win;
     MPI_Errhandler newerr;
-    int            i;
+    int i;
 
-    MTest_Init( &argc, &argv );
+    MTest_Init(&argc, &argv);
 
     /* Run this test multiple times to expose storage leaks (we found a leak
-       of error handlers with this test) */
-    for (i=0;i<1000; i++)  {
-       calls = 0;
-       
-       MPI_Win_create( buf, 2*sizeof(int), sizeof(int), 
-                       MPI_INFO_NULL, MPI_COMM_WORLD, &win );
-       mywin = win;
-       
-       MPI_Win_create_errhandler( eh, &newerr );
-       
-       MPI_Win_set_errhandler( win, newerr );
-       MPI_Win_call_errhandler( win, MPI_ERR_OTHER );
-       MPI_Errhandler_free( &newerr );
-       if (calls != 1) {
-           errs++;
-           printf( "Error handler not called\n" );
-       }
-       MPI_Win_free( &win );
+     * of error handlers with this test) */
+    for (i = 0; i < 1000; i++) {
+        calls = 0;
+
+        MPI_Win_create(buf, 2 * sizeof(int), sizeof(int), MPI_INFO_NULL, MPI_COMM_WORLD, &win);
+        mywin = win;
+
+        MPI_Win_create_errhandler(eh, &newerr);
+
+        MPI_Win_set_errhandler(win, newerr);
+        MPI_Win_call_errhandler(win, MPI_ERR_OTHER);
+        MPI_Errhandler_free(&newerr);
+        if (calls != 1) {
+            errs++;
+            printf("Error handler not called\n");
+        }
+        MPI_Win_free(&win);
     }
 
-    MTest_Finalize( errs );
+    MTest_Finalize(errs);
     MPI_Finalize();
     return 0;
 }