summaryrefslogtreecommitdiffstats
path: root/hl/fortran/src/H5IMff.F90
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2019-03-26 18:30:37 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2019-03-26 18:30:37 (GMT)
commitb530043b7a3dc29c56f567f090d1a6831330e46f (patch)
tree3ef8b1d7f3a33517c2a2b1b7531468dce08306fd /hl/fortran/src/H5IMff.F90
parentd818edb110b668489d5c33ebc5c94dd9ef767121 (diff)
parenta1d7a9b8592e8b842b940f43733cc2df5d5d81bb (diff)
downloadhdf5-b530043b7a3dc29c56f567f090d1a6831330e46f.zip
hdf5-b530043b7a3dc29c56f567f090d1a6831330e46f.tar.gz
hdf5-b530043b7a3dc29c56f567f090d1a6831330e46f.tar.bz2
Merge pull request #1614 in HDFFV/hdf5 from ~BRTNFLD/hdf5_msb:develop to develop
* commit 'a1d7a9b8592e8b842b940f43733cc2df5d5d81bb': HDFFV-10738 Wrong INTENT for H5LTread_dataset_double_f
Diffstat (limited to 'hl/fortran/src/H5IMff.F90')
-rw-r--r--hl/fortran/src/H5IMff.F904
1 files changed, 2 insertions, 2 deletions
diff --git a/hl/fortran/src/H5IMff.F90 b/hl/fortran/src/H5IMff.F90
index 6646828..ac4b794 100644
--- a/hl/fortran/src/H5IMff.F90
+++ b/hl/fortran/src/H5IMff.F90
@@ -539,7 +539,7 @@ CONTAINS
INTEGER, INTENT(in) :: pal_number ! palette number
INTEGER(hsize_t), DIMENSION(*), INTENT(inout) :: dims ! dimensions
INTEGER :: errcode ! error code
- INTEGER(size_t) :: namelen ! name length
+ INTEGER(size_t) :: namelen ! name length
INTERFACE
INTEGER FUNCTION h5imget_palette_info_c(loc_id,namelen,dset_name,pal_number,dims) &
@@ -551,7 +551,7 @@ CONTAINS
CHARACTER(KIND=C_CHAR), DIMENSION(*), INTENT(in) :: dset_name ! name of the dataset
INTEGER, INTENT(in) :: pal_number ! palette number
INTEGER(hsize_t), DIMENSION(*), INTENT(inout) :: dims ! dimensions
- INTEGER(size_t) :: namelen ! name length
+ INTEGER(size_t) :: namelen ! name length
END FUNCTION h5imget_palette_info_c
END INTERFACE