diff options
author | Elena Pourmal <epourmal@hdfgroup.org> | 2006-05-14 00:43:58 (GMT) |
---|---|---|
committer | Elena Pourmal <epourmal@hdfgroup.org> | 2006-05-14 00:43:58 (GMT) |
commit | 0742585e9aaacf513a5ab44da5e4755c9c0c5d60 (patch) | |
tree | 43caca4f46fcf3e434db97b376f265ee0f039a18 /fortran/test/t.h | |
parent | 916399d31ed063c0d7e8b7aba864841168a37b93 (diff) | |
download | hdf5-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.h | 2 |
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(); |