diff options
author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2009-01-05 16:40:59 (GMT) |
---|---|---|
committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2009-01-05 16:40:59 (GMT) |
commit | e99b7dec145d59311cc9f3af0ead6bf04ca2ed74 (patch) | |
tree | 480f8a4620cac2f244bed4770fca2b479056d017 | |
parent | 9a38a8965c387417444407b149ef63a69cba985b (diff) | |
download | hdf5-e99b7dec145d59311cc9f3af0ead6bf04ca2ed74.zip hdf5-e99b7dec145d59311cc9f3af0ead6bf04ca2ed74.tar.gz hdf5-e99b7dec145d59311cc9f3af0ead6bf04ca2ed74.tar.bz2 |
[svn-r16262] Description:
added missing reference in h5lget_name_by_idx_f:
!DEC$ATTRIBUTES reference ::
for character strings being passed in to C to fix bug in VMS.
-rw-r--r-- | fortran/src/H5Lff.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Lff.f90 b/fortran/src/H5Lff.f90 index cad00b6..966e9f3 100644 --- a/fortran/src/H5Lff.f90 +++ b/fortran/src/H5Lff.f90 @@ -952,7 +952,7 @@ CONTAINS !DEC$ IF DEFINED(HDF5F90_WINDOWS) !DEC$ ATTRIBUTES C,reference,decorate,alias:'H5LGET_NAME_BY_IDX_C'::h5lget_name_by_idx_c !DEC$ ENDIF - !DEC$ATTRIBUTES reference :: group_name + !DEC$ATTRIBUTES reference :: group_name, name INTEGER(HID_T), INTENT(IN) :: loc_id CHARACTER(LEN=*), INTENT(IN) :: group_name INTEGER(SIZE_T) :: group_namelen |