diff options
| author | Quincey Koziol <koziol@hdfgroup.org> | 2003-12-11 18:29:25 (GMT) |
|---|---|---|
| committer | Quincey Koziol <koziol@hdfgroup.org> | 2003-12-11 18:29:25 (GMT) |
| commit | e865f21190c01363f03f4753fce66cac26f0409b (patch) | |
| tree | 2c6ccc8a4d6d1487d9b602c16582ad5163cd8d29 /fortran/src/H5f90proto.h | |
| parent | c44fd88805c4b342f80167e9237e5ecf7f71a158 (diff) | |
| download | hdf5-e865f21190c01363f03f4753fce66cac26f0409b.zip hdf5-e865f21190c01363f03f4753fce66cac26f0409b.tar.gz hdf5-e865f21190c01363f03f4753fce66cac26f0409b.tar.bz2 | |
[svn-r7934] Purpose:
Add new feature
Description:
Add FORTRAN wrappers for new H5I routines.
Platforms tested:
FreeBSD 4.9 (sleipnir)
h5committest
Diffstat (limited to 'fortran/src/H5f90proto.h')
| -rw-r--r-- | fortran/src/H5f90proto.h | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/fortran/src/H5f90proto.h b/fortran/src/H5f90proto.h index ab27ac7..5b7c180 100644 --- a/fortran/src/H5f90proto.h +++ b/fortran/src/H5f90proto.h @@ -1180,14 +1180,23 @@ nh5rget_object_type_obj_c (hid_t_f *dset_id, int_f *ref, int_f *obj_type); #ifdef DF_CAPFNAMES # define nh5iget_type_c FNAME(H5IGET_TYPE_C) # define nh5iget_name_c FNAME(H5IGET_NAME_C) +# define nh5iinc_ref_c FNAME(H5IINC_REF_C) +# define nh5idec_ref_c FNAME(H5IDEC_REF_C) +# define nh5iget_ref_c FNAME(H5IGET_REF_C) #else # define nh5iget_type_c FNAME(h5iget_type_c) # define nh5iget_name_c FNAME(h5iget_name_c) +# define nh5iinc_ref_c FNAME(h5iinc_ref_c) +# define nh5idec_ref_c FNAME(h5idec_ref_c) +# define nh5iget_ref_c FNAME(h5iget_ref_c) #endif #endif H5_DLL int_f nh5iget_type_c(hid_t_f *obj_id, int_f *type); H5_DLL int_f nh5iget_name_c(hid_t_f *obj_id, _fcd buf, size_t_f *buf_size, size_t_f *name_size); +H5_DLL int_f nh5iinc_ref_c(hid_t_f *obj_id, int_f *ref_count); +H5_DLL int_f nh5idec_ref_c(hid_t_f *obj_id, int_f *ref_count); +H5_DLL int_f nh5iget_ref_c(hid_t_f *obj_id, int_f *ref_count); #ifndef H5Ef90_FNAMES |