diff options
Diffstat (limited to 'fortran')
| -rw-r--r-- | fortran/src/H5Rf.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Rf.c b/fortran/src/H5Rf.c index c0d02e6..0988918 100644 --- a/fortran/src/H5Rf.c +++ b/fortran/src/H5Rf.c @@ -121,7 +121,7 @@ nh5rdereference_region_c(hid_t_f *dset_id, int_f *ref, hid_t_f *obj_id) /* * Call H5Rdereference function. */ - if((c_obj_id = H5Rdereference2((hid_t)*dset_id, H5P_DATASET_ACCESS_DEFAULT, H5R_DATASET_REGION, &ref_c)) < 0) + if((c_obj_id = H5Rdereference2((hid_t)*dset_id, H5P_DEFAULT, H5R_DATASET_REGION, &ref_c)) < 0) HGOTO_DONE(FAIL) /* Copy the object's ID */ @@ -151,7 +151,7 @@ nh5rdereference_object_c(hid_t_f *dset_id, haddr_t_f *ref, hid_t_f *obj_id) /* * Call H5Rdereference function. */ - if((c_obj_id = H5Rdereference2((hid_t)*dset_id, H5P_DATASET_ACCESS_DEFAULT, H5R_OBJECT, &ref_c)) < 0) + if((c_obj_id = H5Rdereference2((hid_t)*dset_id, H5P_DEFAULT, H5R_OBJECT, &ref_c)) < 0) HGOTO_DONE(FAIL) /* Copy the object's ID */ |