summaryrefslogtreecommitdiffstats
path: root/perform/perf.c
diff options
context:
space:
mode:
Diffstat (limited to 'perform/perf.c')
-rw-r--r--perform/perf.c6
1 files changed, 4 insertions, 2 deletions
diff --git a/perform/perf.c b/perform/perf.c
index d0c49f6..cebf50c 100644
--- a/perform/perf.c
+++ b/perform/perf.c
@@ -176,6 +176,8 @@ int main(int argc, char **argv)
VRFY((acc_tpl >= 0), "", H5FATAL);
ret = H5Pset_fapl_split(acc_tpl, meta_ext, mpio_pl, raw_ext, mpio_pl);
VRFY((ret >= 0), "H5Pset_fapl_split succeeded", H5FATAL);
+ ret = H5Pclose(mpio_pl);
+ VRFY((ret >= 0), "H5Pclose mpio_pl succeeded", H5FATAL);
}else{
/* setup file access template */
acc_tpl = H5Pcreate (H5P_FILE_ACCESS);
@@ -314,6 +316,8 @@ int main(int argc, char **argv)
VRFY((ret >= 0), "H5Dclose succeeded", H5FATAL);
ret=H5Fclose(fid);
VRFY((ret >= 0), "H5Fclose succeeded", H5FATAL);
+ ret=H5Pclose(acc_tpl);
+ VRFY((ret >= 0), "H5Pclose succeeded", H5FATAL);
/* compute the read and write times */
MPI_Allreduce(&read_tim, &max_read_tim, 1, MPI_DOUBLE, MPI_MAX,
@@ -372,8 +376,6 @@ die_jar_jar_die:
free(tmp);
if (opt_correct) free(tmp2);
- /* Close down the HDF5 library before MPI_Finalize. */
- H5close();
MPI_Finalize();
return(0);
}