summaryrefslogtreecommitdiffstats
path: root/fortran/src
diff options
context:
space:
mode:
authorM. Scot Breitenfeld <brtnfld@hdfgroup.org>2018-04-10 15:54:31 (GMT)
committerM. Scot Breitenfeld <brtnfld@hdfgroup.org>2018-04-10 15:54:31 (GMT)
commit05ef85b02dc88ebd738d1332476ae1765a25b191 (patch)
tree668daa52a960a104b42a454c8ca4f639d620767c /fortran/src
parent3211e907f4f9349ba7510d70cfbcc6ee36d99c58 (diff)
downloadhdf5-05ef85b02dc88ebd738d1332476ae1765a25b191.zip
hdf5-05ef85b02dc88ebd738d1332476ae1765a25b191.tar.gz
hdf5-05ef85b02dc88ebd738d1332476ae1765a25b191.tar.bz2
fixed return integer type of C function
Diffstat (limited to 'fortran/src')
-rw-r--r--fortran/src/H5Pff.F904
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Pff.F90 b/fortran/src/H5Pff.F90
index 178aa80..afb9136 100644
--- a/fortran/src/H5Pff.F90
+++ b/fortran/src/H5Pff.F90
@@ -7769,8 +7769,8 @@ SUBROUTINE h5pset_attr_phase_change_f(ocpl_id, max_compact, min_dense, hdferr)
INTEGER, INTENT(OUT) :: hdferr
!*****
INTERFACE
- INTEGER(HID_T) FUNCTION h5pget_virtual_count(dcpl_id, count) BIND(C,NAME='H5Pget_virtual_count')
- IMPORT :: HID_T, SIZE_T
+ INTEGER(C_INT) FUNCTION h5pget_virtual_count(dcpl_id, count) BIND(C,NAME='H5Pget_virtual_count')
+ IMPORT :: HID_T, SIZE_T, C_INT
IMPLICIT NONE
INTEGER(HID_T) , INTENT(IN), VALUE :: dcpl_id
INTEGER(SIZE_T), INTENT(OUT) :: count