summaryrefslogtreecommitdiffstats
path: root/fortran/test/t.h
diff options
context:
space:
mode:
authorElena Pourmal <epourmal@hdfgroup.org>2006-05-14 00:43:58 (GMT)
committerElena Pourmal <epourmal@hdfgroup.org>2006-05-14 00:43:58 (GMT)
commit0742585e9aaacf513a5ab44da5e4755c9c0c5d60 (patch)
tree43caca4f46fcf3e434db97b376f265ee0f039a18 /fortran/test/t.h
parent916399d31ed063c0d7e8b7aba864841168a37b93 (diff)
downloadhdf5-0742585e9aaacf513a5ab44da5e4755c9c0c5d60.zip
hdf5-0742585e9aaacf513a5ab44da5e4755c9c0c5d60.tar.gz
hdf5-0742585e9aaacf513a5ab44da5e4755c9c0c5d60.tar.bz2
[svn-r12347] Purpose: Maintenance/bug fix
Description: When --enable-group-revision flag was used, h5fget_filesize_f function returned different value from expected one. Test failed with false negative result. Solution: Added Fortran function h5_group_revision_f and its C stub to check if macro H5_GROUP_REVISION is defined. Expected value from h5fget_filesize_f is set up accordingly. Platforms tested: copper, shanti and heping with and without --enable-group-revision configuration flag Misc. update:
Diffstat (limited to 'fortran/test/t.h')
-rw-r--r--fortran/test/t.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/fortran/test/t.h b/fortran/test/t.h
index 79c6d4b..47062ac 100644
--- a/fortran/test/t.h
+++ b/fortran/test/t.h
@@ -25,6 +25,7 @@ char *h5_fixname(const char *base_name, hid_t fapl, char *fullname, size_t size)
# define nh5_fixname_c H5_FC_FUNC_(h5_fixname_c, H5_FIXNAME_C)
# define nh5_cleanup_c H5_FC_FUNC_(h5_cleanup_c, H5_CLEANUP_C)
# define nh5_exit_c H5_FC_FUNC_(h5_exit_c, H5_EXIT_C)
+# define nh5_group_revision_c H5_FC_FUNC_(h5_group_revision_c, H5_GROUP_REVISION_C)
H5_FCTESTDLL int_f nh5_fixname_c
(_fcd base_name, size_t_f *base_namelen, hid_t_f *fapl, _fcd full_name, size_t_f *full_namelen);
@@ -35,3 +36,4 @@ H5_FCTESTDLL int_f nh5_cleanup_c
H5_FCTESTDLL void nh5_exit_c
(int_f *status);
+H5_FCTESTDLL int_f nh5_group_revision_c();