diff options
| author | Elena Pourmal <epourmal@hdfgroup.org> | 2000-10-20 20:49:32 (GMT) |
|---|---|---|
| committer | Elena Pourmal <epourmal@hdfgroup.org> | 2000-10-20 20:49:32 (GMT) |
| commit | b1c8d95cdd9918c1a2ed4dcb90fd9a2d8c588a68 (patch) | |
| tree | e8c663224da7a24c202d3b79ceaa44be7a36a646 /fortran/src/H5Aff.f90 | |
| parent | 79d1d8258f57f099975c15185b97f0ce1529b902 (diff) | |
| download | hdf5-b1c8d95cdd9918c1a2ed4dcb90fd9a2d8c588a68.zip hdf5-b1c8d95cdd9918c1a2ed4dcb90fd9a2d8c588a68.tar.gz hdf5-b1c8d95cdd9918c1a2ed4dcb90fd9a2d8c588a68.tar.bz2 | |
[svn-r2713]
Purpose:
H5Aff.f90: Bug fix
Description:
Character string was not passed correctly from the user's application
to the write/read subroutines when buffer was decalred as assumed-shape
array.
Solution:
Declared date buffer to be assumed-size array.
Platforms tested:
Solaris 2.7, Linux
Purpose:
H5fortran_flags.f90: Bug fix
Description:
Fortran H5I_* types had incorrect values.
Solution:
Fixed.
Platforms tested:
Solaris 2.7, Linux
Diffstat (limited to 'fortran/src/H5Aff.f90')
| -rw-r--r-- | fortran/src/H5Aff.f90 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/fortran/src/H5Aff.f90 b/fortran/src/H5Aff.f90 index b24de00..1bc2225 100644 --- a/fortran/src/H5Aff.f90 +++ b/fortran/src/H5Aff.f90 @@ -73,6 +73,7 @@ MODULE PROCEDURE h5aread_real_7 ! Comment if on T3E MODULE PROCEDURE h5aread_double_scalar + MODULE PROCEDURE h5aread_double_1 MODULE PROCEDURE h5aread_double_2 MODULE PROCEDURE h5aread_double_3 MODULE PROCEDURE h5aread_double_4 @@ -866,7 +867,7 @@ INTEGER(HID_T), INTENT(IN) :: attr_id ! Attribute identifier INTEGER(HID_T), INTENT(IN) :: memtype_id ! Attribute datatype ! identifier (in memory) - CHARACTER(LEN=*), DIMENSION(:), INTENT(OUT) :: buf + CHARACTER(LEN=*), DIMENSION(*), INTENT(OUT) :: buf ! Attribute data INTEGER, INTENT(OUT) :: hdferr ! Error code INTEGER, EXTERNAL :: h5areadc_c |