summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
authorElena Pourmal <epourmal@hdfgroup.org>2004-04-16 13:56:33 (GMT)
committerElena Pourmal <epourmal@hdfgroup.org>2004-04-16 13:56:33 (GMT)
commitd01acbbddd9817b074eb770e159220175cdc5142 (patch)
tree883b97de4f9f4434c4cb461e325144a6b60aefd5 /fortran
parent508b06e28609af97be50591b49066381957e9c4e (diff)
downloadhdf5-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.f902
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
!