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 /fortran/src | |
| 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.
Diffstat (limited to 'fortran/src')
| -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 |