diff options
| author | kmu <kmu@hdfgroup.org> | 2020-01-21 03:11:32 (GMT) |
|---|---|---|
| committer | kmu <kmu@hdfgroup.org> | 2020-01-21 03:11:32 (GMT) |
| commit | 9be5b2842e307f5f5b67c7e42217ddff67b0bf61 (patch) | |
| tree | b23156eec2d83f8755971dd5cc746c28ea7c338a /fortran/src/H5Af.c | |
| parent | 628d267162895adef5a73e1cd5810030cc98335a (diff) | |
| parent | a95b5b1e056e171702ad41b69cb796da0cbb91eb (diff) | |
| download | hdf5-9be5b2842e307f5f5b67c7e42217ddff67b0bf61.zip hdf5-9be5b2842e307f5f5b67c7e42217ddff67b0bf61.tar.gz hdf5-9be5b2842e307f5f5b67c7e42217ddff67b0bf61.tar.bz2 | |
merge and fix
Diffstat (limited to 'fortran/src/H5Af.c')
| -rw-r--r-- | fortran/src/H5Af.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Af.c b/fortran/src/H5Af.c index 31a18fc..5e5bcc0 100644 --- a/fortran/src/H5Af.c +++ b/fortran/src/H5Af.c @@ -137,13 +137,13 @@ int_f h5aget_num_attrs_c (hid_t_f *obj_id, int_f *attr_num) /******/ { - H5O_info_t oinfo; /* Object info */ + H5O_info2_t oinfo; /* Object info */ int_f ret_value = 0; /* Return value */ /* * Call H5Oget_info function. */ - if(H5Oget_info2((hid_t)*obj_id, &oinfo, H5O_INFO_NUM_ATTRS) < 0) + if(H5Oget_info3((hid_t)*obj_id, &oinfo, H5O_INFO_NUM_ATTRS) < 0) HGOTO_DONE(FAIL); /* Set number of attributes */ |