summaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>2002-10-14 19:48:01 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>2002-10-14 19:48:01 (GMT)
commit4629204d864aa936baca552d742e5d1c2bd1f15c (patch)
tree281dfcdb4cce615c193c746fa3d36ed991fb95b7 /test
parentcc1502af9c304cd5f51eedeedf1e190f771cd556 (diff)
downloadhdf5-4629204d864aa936baca552d742e5d1c2bd1f15c.zip
hdf5-4629204d864aa936baca552d742e5d1c2bd1f15c.tar.gz
hdf5-4629204d864aa936baca552d742e5d1c2bd1f15c.tar.bz2
[svn-r5991] Purpose:
New feature Description: If backing store for a core VFD file is turned on, remove the file created. Platforms tested: FreeBSD 4.6 (sleipnir) w and w/o parallel Linux 2.2.x (eirene) w/FORTRAN & C++ Solaris 2.7 (arabica) w/FORTRAN IRIX64 6.5 (modi4) w/FORTRAN & parallel
Diffstat (limited to 'test')
-rw-r--r--test/h5test.c9
1 files changed, 8 insertions, 1 deletions
diff --git a/test/h5test.c b/test/h5test.c
index 21dbb96..724a0ac 100644
--- a/test/h5test.c
+++ b/test/h5test.c
@@ -149,7 +149,14 @@ h5_cleanup(const char *base_name[], hid_t fapl)
HDremove(temp);
}
} else if (driver == H5FD_CORE) {
- /*void*/
+ hbool_t backing; /* Whether the core file has backing store */
+
+ H5Pget_fapl_core(fapl,NULL,&backing);
+
+ /* If the file was stored to disk with bacing store, remove it */
+ if(backing)
+ HDremove(filename);
+
} else if (driver == H5FD_MULTI) {
H5FD_mem_t mt;
assert(strlen(multi_letters)==H5FD_MEM_NTYPES);