diff options
author | Vailin Choi <vchoi@jam.ad.hdfgroup.org> | 2018-06-01 00:05:58 (GMT) |
---|---|---|
committer | Vailin Choi <vchoi@jam.ad.hdfgroup.org> | 2018-06-01 00:05:58 (GMT) |
commit | 7a5fa418e3edf1f85f3e1462a119c3f5aa41a3d1 (patch) | |
tree | 609e0a368dad743146d2efe47ec7ed8f3cf745af /fortran | |
parent | dec2f588acad45eaa02061d7d28774e5c6915f70 (diff) | |
download | hdf5-7a5fa418e3edf1f85f3e1462a119c3f5aa41a3d1.zip hdf5-7a5fa418e3edf1f85f3e1462a119c3f5aa41a3d1.tar.gz hdf5-7a5fa418e3edf1f85f3e1462a119c3f5aa41a3d1.tar.bz2 |
Fix the error found after earlier checkin.
Diffstat (limited to 'fortran')
-rw-r--r-- | fortran/src/H5Of.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Of.c b/fortran/src/H5Of.c index 1c32861..45b7f09 100644 --- a/fortran/src/H5Of.c +++ b/fortran/src/H5Of.c @@ -248,9 +248,9 @@ h5ovisit_c(hid_t_f *group_id, int_f *index_type, int_f *order, H5O_iterate_t op, herr_t func_ret_value; /* H5Linterate return value */ /* - * Call H5Ovisit + * Call H5Ovisit2 */ - func_ret_value = H5Ovisit( (hid_t)*group_id, (H5_index_t)*index_type, (H5_iter_order_t)*order, op, op_data, H5O_INFO_ALL); + func_ret_value = H5Ovisit2( (hid_t)*group_id, (H5_index_t)*index_type, (H5_iter_order_t)*order, op, op_data, H5O_INFO_ALL); ret_value = (int_f)func_ret_value; |