Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
fix+activate rma test
[simgrid.git] / teshsuite / smpi / mpich3-test / init / finalized.c
index 32ac134..79acd8b 100644 (file)
@@ -9,13 +9,13 @@
 /* FIXME: This test program assumes that MPI_Error_string will work even
    if MPI is not initialized.  That is not guaranteed.  */
 
 /* FIXME: This test program assumes that MPI_Error_string will work even
    if MPI is not initialized.  That is not guaranteed.  */
 
-/* Normally, when checking for error returns from MPI calls, you must ensure 
+/* Normally, when checking for error returns from MPI calls, you must ensure
    that the error handler on the relevant object (communicator, file, or
    that the error handler on the relevant object (communicator, file, or
-   window) has been set to MPI_ERRORS_RETURN.  The tests in this 
+   window) has been set to MPI_ERRORS_RETURN.  The tests in this
    program are a special case, as either a failure or an abort will
    indicate a problem */
 
    program are a special case, as either a failure or an abort will
    indicate a problem */
 
-int main( int argc, char *argv[] )
+int main(int argc, char *argv[])
 {
     int error;
     int flag;
 {
     int error;
     int flag;
@@ -25,92 +25,81 @@ int main( int argc, char *argv[] )
 
     flag = 0;
     error = MPI_Finalized(&flag);
 
     flag = 0;
     error = MPI_Finalized(&flag);
-    if (error != MPI_SUCCESS)
-    {
-       MPI_Error_string(error, err_string, &length);
-       printf("MPI_Finalized failed: %s\n", err_string);
-       fflush(stdout);
-       return error;
+    if (error != MPI_SUCCESS) {
+        MPI_Error_string(error, err_string, &length);
+        printf("MPI_Finalized failed: %s\n", err_string);
+        fflush(stdout);
+        return error;
     }
     }
-    if (flag)
-    {
-       printf("MPI_Finalized returned true before MPI_Init.\n");
-       return -1;
+    if (flag) {
+        printf("MPI_Finalized returned true before MPI_Init.\n");
+        return -1;
     }
 
     error = MPI_Init(&argc, &argv);
     }
 
     error = MPI_Init(&argc, &argv);
-    if (error != MPI_SUCCESS)
-    {
-       MPI_Error_string(error, err_string, &length);
-       printf("MPI_Init failed: %s\n", err_string);
-       fflush(stdout);
-       return error;
+    if (error != MPI_SUCCESS) {
+        MPI_Error_string(error, err_string, &length);
+        printf("MPI_Init failed: %s\n", err_string);
+        fflush(stdout);
+        return error;
     }
 
     error = MPI_Comm_rank(MPI_COMM_WORLD, &rank);
     }
 
     error = MPI_Comm_rank(MPI_COMM_WORLD, &rank);
-    if (error != MPI_SUCCESS)
-    {
-       MPI_Error_string(error, err_string, &length);
-       printf("MPI_Comm_rank failed: %s\n", err_string);
-       fflush(stdout);
-       MPI_Abort(MPI_COMM_WORLD, error);
-       return error;
+    if (error != MPI_SUCCESS) {
+        MPI_Error_string(error, err_string, &length);
+        printf("MPI_Comm_rank failed: %s\n", err_string);
+        fflush(stdout);
+        MPI_Abort(MPI_COMM_WORLD, error);
+        return error;
     }
 
     flag = 0;
     error = MPI_Finalized(&flag);
     }
 
     flag = 0;
     error = MPI_Finalized(&flag);
-    if (error != MPI_SUCCESS)
-    {
-       MPI_Error_string(error, err_string, &length);
-       printf("MPI_Finalized failed: %s\n", err_string);
-       fflush(stdout);
-       MPI_Abort(MPI_COMM_WORLD, error);
-       return error;
+    if (error != MPI_SUCCESS) {
+        MPI_Error_string(error, err_string, &length);
+        printf("MPI_Finalized failed: %s\n", err_string);
+        fflush(stdout);
+        MPI_Abort(MPI_COMM_WORLD, error);
+        return error;
     }
     }
-    if (flag)
-    {
-       printf("MPI_Finalized returned true before MPI_Finalize.\n");
-       fflush(stdout);
-       MPI_Abort(MPI_COMM_WORLD, error);
-       return -1;
+    if (flag) {
+        printf("MPI_Finalized returned true before MPI_Finalize.\n");
+        fflush(stdout);
+        MPI_Abort(MPI_COMM_WORLD, error);
+        return -1;
     }
 
     error = MPI_Barrier(MPI_COMM_WORLD);
     }
 
     error = MPI_Barrier(MPI_COMM_WORLD);
-    if (error != MPI_SUCCESS)
-    {
-       MPI_Error_string(error, err_string, &length);
-       printf("MPI_Barrier failed: %s\n", err_string);
-       fflush(stdout);
-       MPI_Abort(MPI_COMM_WORLD, error);
-       return error;
+    if (error != MPI_SUCCESS) {
+        MPI_Error_string(error, err_string, &length);
+        printf("MPI_Barrier failed: %s\n", err_string);
+        fflush(stdout);
+        MPI_Abort(MPI_COMM_WORLD, error);
+        return error;
     }
 
     error = MPI_Finalize();
     }
 
     error = MPI_Finalize();
-    if (error != MPI_SUCCESS)
-    {
-       MPI_Error_string(error, err_string, &length);
-       printf("MPI_Finalize failed: %s\n", err_string);
-       fflush(stdout);
-       return error;
+    if (error != MPI_SUCCESS) {
+        MPI_Error_string(error, err_string, &length);
+        printf("MPI_Finalize failed: %s\n", err_string);
+        fflush(stdout);
+        return error;
     }
 
     flag = 0;
     error = MPI_Finalized(&flag);
     }
 
     flag = 0;
     error = MPI_Finalized(&flag);
-    if (error != MPI_SUCCESS)
-    {
-       MPI_Error_string(error, err_string, &length);
-       printf("MPI_Finalized failed: %s\n", err_string);
-       fflush(stdout);
-       return error;
+    if (error != MPI_SUCCESS) {
+        MPI_Error_string(error, err_string, &length);
+        printf("MPI_Finalized failed: %s\n", err_string);
+        fflush(stdout);
+        return error;
     }
     }
-    if (!flag)
-    {
-       printf("MPI_Finalized returned false after MPI_Finalize.\n");
-       return -1;
+    if (!flag) {
+        printf("MPI_Finalized returned false after MPI_Finalize.\n");
+        return -1;
     }
     }
-    if (rank == 0)
-    {
-       printf(" No Errors\n");
+    if (rank == 0) {
+        printf(" No Errors\n");
     }
     }
-    return 0;  
+    return 0;
 }
 }