diff options
| author | Elena Pourmal <epourmal@hdfgroup.org> | 2003-10-13 17:26:37 (GMT) |
|---|---|---|
| committer | Elena Pourmal <epourmal@hdfgroup.org> | 2003-10-13 17:26:37 (GMT) |
| commit | 5de413e72ffc63a6a6153b407e0edf4f937884ae (patch) | |
| tree | c9d1f5ecad872aba446121502d1535f72f92a7a8 /doc | |
| parent | 7e448b4393b2b83f186a871e54fcd3758492ec5b (diff) | |
| download | hdf5-5de413e72ffc63a6a6153b407e0edf4f937884ae.zip hdf5-5de413e72ffc63a6a6153b407e0edf4f937884ae.tar.gz hdf5-5de413e72ffc63a6a6153b407e0edf4f937884ae.tar.bz2 | |
[svn-r7606]
Purpose: Bug fix
Description: Type of the third argument to the h5pset(get)_cache_f subroutines
was incorrect (INTEGER instead of INTEGER(SIZE_T)).
I was confused while doing my previous change since
fortran docs were wrong, and the type of the same argument in
1_4 branch is INTEGER. I forgot to check carefully #if def for
1_4 branch in the C code, and encountered only int type for the
corresponding C functions. Since Fortran doesn't support
backward compatibility, type of the argument should be
always in sync with the latest branch.
Solution: ALWAYS, ALWAYS pay attention to compiler's warning.
Fixed type to be INTEGER(SIZE_T).
Platforms tested: kelgia, copper 64-bit mode, solaris 2.7 64-bit mode.
Misc. update:
Diffstat (limited to 'doc')
| -rw-r--r-- | doc/html/fortran/h5p_FORTRAN.html | 40 |
1 files changed, 20 insertions, 20 deletions
diff --git a/doc/html/fortran/h5p_FORTRAN.html b/doc/html/fortran/h5p_FORTRAN.html index 601f320..564f50d 100644 --- a/doc/html/fortran/h5p_FORTRAN.html +++ b/doc/html/fortran/h5p_FORTRAN.html @@ -794,16 +794,16 @@ FORTRAN Property List API -- h5p SUBROUTINE h5pset_cache_f(prp_id, mdc_nelmts,rdcc_nelmts, rdcc_nbytes, rdcc_w0, hdferr) IMPLICIT NONE - INTEGER(HID_T), INTENT(IN) :: prp_id ! Property list identifier - INTEGER, INTENT(IN) :: mdc_nelmts ! Number of elements (objects) - ! in the meta data cache - INTEGER, INTENT(IN) :: rdcc_nelmts ! Number of elements (objects) - ! in the meta data cache - INTEGER(SIZE_T), INTENT(IN) :: rdcc_nbytes ! Total size of the raw data - ! chunk cache, in bytes - REAL, INTENT(IN) :: rdcc_w0 !Preemption policy - INTEGER, INTENT(OUT) :: hdferr ! Error code - ! 0 on success and -1 on failure + INTEGER(HID_T), INTENT(IN) :: prp_id ! Property list identifier + INTEGER, INTENT(IN) :: mdc_nelmts ! Number of elements (objects) + ! in the meta data cache + INTEGER(SIZE_T), INTENT(IN) :: rdcc_nelmts ! Number of elements (objects) + ! in the meta data cache + INTEGER(SIZE_T), INTENT(IN) :: rdcc_nbytes ! Total size of the raw data + ! chunk cache, in bytes + REAL, INTENT(IN) :: rdcc_w0 ! Preemption policy + INTEGER, INTENT(OUT) :: hdferr ! Error code + ! 0 on success and -1 on failure END SUBROUTINE h5pset_cache_f </pre> @@ -823,16 +823,16 @@ FORTRAN Property List API -- h5p SUBROUTINE h5pget_cache_f(prp_id, mdc_nelmts, rdcc_nelmts, rdcc_nbytes, rdcc_w0, hdferr) IMPLICIT NONE - INTEGER(HID_T), INTENT(IN) :: prp_id ! Property list identifier - INTEGER, INTENT(OUT) :: mdc_nelmts ! Number of elements (objects) - ! in the meta data cache - INTEGER, INTENT(OUT) :: rdcc_nelmts ! Number of elements (objects) - ! in the meta data cache - INTEGER(SIZE_T), INTENT(OUT) :: rdcc_nbytes ! Total size of the raw data - ! chunk cache, in bytes - REAL, INTENT(OUT) :: rdcc_w0 ! Preemption policy - INTEGER, INTENT(OUT) :: hdferr ! Error code - ! 0 on success and -1 on failure + INTEGER(HID_T), INTENT(IN) :: prp_id ! Property list identifier + INTEGER, INTENT(OUT) :: mdc_nelmts ! Number of elements (objects) + ! in the meta data cache + INTEGER(SIZE_T), INTENT(OUT) :: rdcc_nelmts ! Number of elements (objects) + ! in the meta data cache + INTEGER(SIZE_T), INTENT(OUT) :: rdcc_nbytes ! Total size of the raw data + ! chunk cache, in bytes + REAL, INTENT(OUT) :: rdcc_w0 ! Preemption policy + INTEGER, INTENT(OUT) :: hdferr ! Error code + ! 0 on success and -1 on failure END SUBROUTINE h5pget_cache_f </pre> |