diff options
author | M. Scot Breitenfeld <brtnfld@hdfgroup.org> | 2020-02-18 22:59:04 (GMT) |
---|---|---|
committer | M. Scot Breitenfeld <brtnfld@hdfgroup.org> | 2020-02-18 23:01:05 (GMT) |
commit | 7d773877375c0d047a05836aceedbfc652783f1f (patch) | |
tree | 4591a1c30450fbbdb5c43f5b9150c46e05cd72ff /fortran | |
parent | 117383900cd4a2164d94f34ca1ff527d4b1cc7eb (diff) | |
download | hdf5-7d773877375c0d047a05836aceedbfc652783f1f.zip hdf5-7d773877375c0d047a05836aceedbfc652783f1f.tar.gz hdf5-7d773877375c0d047a05836aceedbfc652783f1f.tar.bz2 |
Corrected INTERFACE INTENT(IN) to INTENT(OUT) for buf_size
Diffstat (limited to 'fortran')
-rw-r--r-- | fortran/src/H5Fff.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Fff.F90 b/fortran/src/H5Fff.F90 index bf797b2..963c2e5 100644 --- a/fortran/src/H5Fff.F90 +++ b/fortran/src/H5Fff.F90 @@ -858,7 +858,7 @@ CONTAINS INTEGER(HID_T) , INTENT(IN) :: file_id TYPE(C_PTR) , VALUE :: buf_ptr INTEGER(SIZE_T), INTENT(IN) :: buf_len - INTEGER(SIZE_T), INTENT(IN) :: buf_size + INTEGER(SIZE_T), INTENT(OUT) :: buf_size END FUNCTION h5fget_file_image_c END INTERFACE |