diff options
Diffstat (limited to 'testpar/t_pflush2.c')
-rw-r--r-- | testpar/t_pflush2.c | 20 |
1 files changed, 8 insertions, 12 deletions
diff --git a/testpar/t_pflush2.c b/testpar/t_pflush2.c index a570d4c..743a3d3 100644 --- a/testpar/t_pflush2.c +++ b/testpar/t_pflush2.c @@ -133,9 +133,7 @@ error: int main(int argc, char* argv[]) { - hid_t fapl1, fapl2; H5E_auto2_t func; - char name[1024]; const char *envval = NULL; @@ -147,13 +145,6 @@ main(int argc, char* argv[]) MPI_Comm_size(comm, &mpi_size); MPI_Comm_rank(comm, &mpi_rank); - fapl1 = H5Pcreate(H5P_FILE_ACCESS); - H5Pset_fapl_mpio(fapl1, comm, info); - - fapl2 = H5Pcreate(H5P_FILE_ACCESS); - H5Pset_fapl_mpio(fapl2, comm, info); - - if(mpi_rank == 0) TESTING("H5Fflush (part2 with flush)"); @@ -162,6 +153,14 @@ main(int argc, char* argv[]) if (envval == NULL) envval = "nomatch"; if (HDstrcmp(envval, "core") && HDstrcmp(envval, "split")) { + hid_t fapl1, fapl2; + + fapl1 = H5Pcreate(H5P_FILE_ACCESS); + H5Pset_fapl_mpio(fapl1, comm, info); + + fapl2 = H5Pcreate(H5P_FILE_ACCESS); + H5Pset_fapl_mpio(fapl2, comm, info); + /* Check the case where the file was flushed */ h5_fixname(FILENAME[0], fapl1, name, sizeof name); if(check_file(name, fapl1)) @@ -213,6 +212,3 @@ main(int argc, char* argv[]) return 1; } - - - |