diff options
Diffstat (limited to 'testpar/t_file.c')
-rw-r--r-- | testpar/t_file.c | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/testpar/t_file.c b/testpar/t_file.c index 99ad13c..90ae22d 100644 --- a/testpar/t_file.c +++ b/testpar/t_file.c @@ -95,19 +95,21 @@ test_split_comm_access(void) fid = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, acc_tpl); VRFY((fid >= 0), "H5Fcreate succeeded"); - /* Release file-access template */ - ret = H5Pclose(acc_tpl); - VRFY((ret >= 0), ""); - /* close the file */ ret = H5Fclose(fid); VRFY((ret >= 0), ""); /* delete the test file */ - if (sub_mpi_rank == 0) { - mrc = MPI_File_delete(filename, info); - /*VRFY((mrc==MPI_SUCCESS), ""); */ + H5E_BEGIN_TRY + { + ret = H5Fdelete(filename, acc_tpl); } + H5E_END_TRY; + VRFY((ret >= 0), "H5Fdelete succeeded"); + + /* Release file-access template */ + ret = H5Pclose(acc_tpl); + VRFY((ret >= 0), ""); } mrc = MPI_Comm_free(&comm); VRFY((mrc == MPI_SUCCESS), "MPI_Comm_free succeeded"); |