Move h5_test_init() calls after MPI_Init (HDFGroup#4988)

qkoziol · Oct 21, 2024 · 877c6d8 · 877c6d8
1 parent 680cdd0
commit 877c6d8
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/testpar/t_pmulti_dset.c b/testpar/t_pmulti_dset.c
@@ -650,13 +650,13 @@ main(int argc, char *argv[])
     unsigned i;
     int      ret;
 
-    h5_test_init();
-
     /* Initialize MPI */
     MPI_Init(&argc, &argv);
     MPI_Comm_size(MPI_COMM_WORLD, &mpi_size);
     MPI_Comm_rank(MPI_COMM_WORLD, &mpi_rank);
 
+    h5_test_init();
+
     /* Generate random number seed, if rank 0 */
     if (MAINPROCESS)
         seed = (unsigned)time(NULL);

diff --git a/testpar/t_select_io_dset.c b/testpar/t_select_io_dset.c
@@ -4086,13 +4086,13 @@ main(int argc, char *argv[])
     unsigned select;
     unsigned mwbuf;
 
-    h5_test_init();
-
     /* Initialize MPI */
     MPI_Init(&argc, &argv);
     MPI_Comm_size(MPI_COMM_WORLD, &mpi_size);
     MPI_Comm_rank(MPI_COMM_WORLD, &mpi_rank);
 
+    h5_test_init();
+
     if ((fapl = H5Pcreate(H5P_FILE_ACCESS)) < 0)
         P_TEST_ERROR;