diff options
author | Elena Pourmal <epourmal@hdfgroup.org> | 2004-04-16 13:56:33 (GMT) |
---|---|---|
committer | Elena Pourmal <epourmal@hdfgroup.org> | 2004-04-16 13:56:33 (GMT) |
commit | d01acbbddd9817b074eb770e159220175cdc5142 (patch) | |
tree | 883b97de4f9f4434c4cb461e325144a6b60aefd5 /fortran | |
parent | 508b06e28609af97be50591b49066381957e9c4e (diff) | |
download | hdf5-d01acbbddd9817b074eb770e159220175cdc5142.zip hdf5-d01acbbddd9817b074eb770e159220175cdc5142.tar.gz hdf5-d01acbbddd9817b074eb770e159220175cdc5142.tar.bz2 |
[svn-r8358] Purpose: Bug fix
Description: Fortran parallel test was using h5dwrite_f function
with the wrong parameter type.
Solution: Fixed.
Platforms tested: copper parallel; sequential was tested yesterday
I run out of time yesterday and didn't
test parallel ;-)
Misc. update:
Diffstat (limited to 'fortran')
-rw-r--r-- | fortran/testpar/thyperslab_wr.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/testpar/thyperslab_wr.f90 b/fortran/testpar/thyperslab_wr.f90 index 2ebd1d8..8db32e9 100644 --- a/fortran/testpar/thyperslab_wr.f90 +++ b/fortran/testpar/thyperslab_wr.f90 @@ -40,7 +40,7 @@ INTEGER, ALLOCATABLE :: data_out (:,:) ! Buffer to store data INTEGER :: rank = 2 ! Dataset rank INTEGER :: i, j - INTEGER :: dims(7) + INTEGER(HSIZE_T), DIMENSION(2) :: dims INTEGER :: error ! Error flag ! |