X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/826897d361add5db3272a9810e70371a40ba1660..5ca17dc381bb7fba4f2689143e2080f7549ee0ab:/teshsuite/smpi/mpich3-test/rma/attrorderwin.c

diff --git a/teshsuite/smpi/mpich3-test/rma/attrorderwin.c b/teshsuite/smpi/mpich3-test/rma/attrorderwin.c
index 972dda719b..9d6ef8721d 100644
--- a/teshsuite/smpi/mpich3-test/rma/attrorderwin.c
+++ b/teshsuite/smpi/mpich3-test/rma/attrorderwin.c
@@ -13,117 +13,113 @@ static char MTestDescrip[] = "Test creating and inserting attributes in \
 different orders to ensure that the list management code handles all cases.";
 */
 
-int checkAttrs( MPI_Win win, int n, int key[], int attrval[] );
-int checkNoAttrs( MPI_Win win, int n, int key[] );
+int checkAttrs(MPI_Win win, int n, int key[], int attrval[]);
+int checkNoAttrs(MPI_Win win, int n, int key[]);
 
-int main( int argc, char *argv[] )
+int main(int argc, char *argv[])
 {
     int errs = 0;
     int key[3], attrval[3];
     int i;
     int buf[1];
     MPI_Comm comm;
-    MPI_Win  win;
+    MPI_Win win;
 
-    MTest_Init( &argc, &argv );
+    MTest_Init(&argc, &argv);
 
     {
-	comm = MPI_COMM_WORLD;
-	MPI_Win_create( buf, sizeof(int), sizeof(int), MPI_INFO_NULL,
-			comm, &win );
-
-	/* Create key values */
-	for (i=0; i<3; i++) {
-	    MPI_Win_create_keyval( MPI_NULL_COPY_FN, MPI_NULL_DELETE_FN,
-			       &key[i], (void *)0 );
-	    attrval[i] = 1024 * i;
-	}
-	
-	/* Insert attribute in several orders.  Test after put with get,
-	 then delete, then confirm delete with get. */
-
-	MPI_Win_set_attr( win, key[2], &attrval[2] );
-	MPI_Win_set_attr( win, key[1], &attrval[1] );
-	MPI_Win_set_attr( win, key[0], &attrval[0] );
-
-	errs += checkAttrs( win, 3, key, attrval );
-	
-	MPI_Win_delete_attr( win, key[0] );
-	MPI_Win_delete_attr( win, key[1] );
-	MPI_Win_delete_attr( win, key[2] );
-
-	errs += checkNoAttrs( win, 3, key );
-	
-	MPI_Win_set_attr( win, key[1], &attrval[1] );
-	MPI_Win_set_attr( win, key[2], &attrval[2] );
-	MPI_Win_set_attr( win, key[0], &attrval[0] );
-
-	errs += checkAttrs( win, 3, key, attrval );
-	
-	MPI_Win_delete_attr( win, key[2] );
-	MPI_Win_delete_attr( win, key[1] );
-	MPI_Win_delete_attr( win, key[0] );
-
-	errs += checkNoAttrs( win, 3, key );
-
-	MPI_Win_set_attr( win, key[0], &attrval[0] );
-	MPI_Win_set_attr( win, key[1], &attrval[1] );
-	MPI_Win_set_attr( win, key[2], &attrval[2] );
-
-	errs += checkAttrs( win, 3, key, attrval );
-	
-	MPI_Win_delete_attr( win, key[1] );
-	MPI_Win_delete_attr( win, key[2] );
-	MPI_Win_delete_attr( win, key[0] );
-
-	errs += checkNoAttrs( win, 3, key );
-	
-	for (i=0; i<3; i++) {
-	    MPI_Win_free_keyval( &key[i] );
-	}
-	MPI_Win_free( &win );
+        comm = MPI_COMM_WORLD;
+        MPI_Win_create(buf, sizeof(int), sizeof(int), MPI_INFO_NULL, comm, &win);
+
+        /* Create key values */
+        for (i = 0; i < 3; i++) {
+            MPI_Win_create_keyval(MPI_NULL_COPY_FN, MPI_NULL_DELETE_FN, &key[i], (void *) 0);
+            attrval[i] = 1024 * i;
+        }
+
+        /* Insert attribute in several orders.  Test after put with get,
+         * then delete, then confirm delete with get. */
+
+        MPI_Win_set_attr(win, key[2], &attrval[2]);
+        MPI_Win_set_attr(win, key[1], &attrval[1]);
+        MPI_Win_set_attr(win, key[0], &attrval[0]);
+
+        errs += checkAttrs(win, 3, key, attrval);
+
+        MPI_Win_delete_attr(win, key[0]);
+        MPI_Win_delete_attr(win, key[1]);
+        MPI_Win_delete_attr(win, key[2]);
+
+        errs += checkNoAttrs(win, 3, key);
+
+        MPI_Win_set_attr(win, key[1], &attrval[1]);
+        MPI_Win_set_attr(win, key[2], &attrval[2]);
+        MPI_Win_set_attr(win, key[0], &attrval[0]);
+
+        errs += checkAttrs(win, 3, key, attrval);
+
+        MPI_Win_delete_attr(win, key[2]);
+        MPI_Win_delete_attr(win, key[1]);
+        MPI_Win_delete_attr(win, key[0]);
+
+        errs += checkNoAttrs(win, 3, key);
+
+        MPI_Win_set_attr(win, key[0], &attrval[0]);
+        MPI_Win_set_attr(win, key[1], &attrval[1]);
+        MPI_Win_set_attr(win, key[2], &attrval[2]);
+
+        errs += checkAttrs(win, 3, key, attrval);
+
+        MPI_Win_delete_attr(win, key[1]);
+        MPI_Win_delete_attr(win, key[2]);
+        MPI_Win_delete_attr(win, key[0]);
+
+        errs += checkNoAttrs(win, 3, key);
+
+        for (i = 0; i < 3; i++) {
+            MPI_Win_free_keyval(&key[i]);
+        }
+        MPI_Win_free(&win);
     }
-    
-    MTest_Finalize( errs );
+
+    MTest_Finalize(errs);
     MPI_Finalize();
     return 0;
-  
+
 }
 
-int checkAttrs( MPI_Win win, int n, int key[], int attrval[] )
+int checkAttrs(MPI_Win win, int n, int key[], int attrval[])
 {
     int errs = 0;
     int i, flag, *val_p;
 
-    for (i=0; i<n; i++) {
-	MPI_Win_get_attr( win, key[i], &val_p, &flag );
-	if (!flag) {
-	    errs++;
-	    fprintf( stderr, "Attribute for key %d not set\n", i );
-	}
-	else if (val_p != &attrval[i]) {
-	    errs++;
-	    fprintf( stderr, "Atribute value for key %d not correct\n",
-		     i );
-	}
+    for (i = 0; i < n; i++) {
+        MPI_Win_get_attr(win, key[i], &val_p, &flag);
+        if (!flag) {
+            errs++;
+            fprintf(stderr, "Attribute for key %d not set\n", i);
+        }
+        else if (val_p != &attrval[i]) {
+            errs++;
+            fprintf(stderr, "Atribute value for key %d not correct\n", i);
+        }
     }
 
     return errs;
 }
 
-int checkNoAttrs( MPI_Win win, int n, int key[] )
+int checkNoAttrs(MPI_Win win, int n, int key[])
 {
     int errs = 0;
     int i, flag, *val_p;
 
-    for (i=0; i<n; i++) {
-	MPI_Win_get_attr( win, key[i], &val_p, &flag );
-	if (flag) {
-	    errs++;
-	    fprintf( stderr, "Attribute for key %d set but should be deleted\n", i );
-	}
+    for (i = 0; i < n; i++) {
+        MPI_Win_get_attr(win, key[i], &val_p, &flag);
+        if (flag) {
+            errs++;
+            fprintf(stderr, "Attribute for key %d set but should be deleted\n", i);
+        }
     }
 
     return errs;
 }
-