diff options
| -rw-r--r-- | fortran/src/H5Sff.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Sff.F90 b/fortran/src/H5Sff.F90 index e9b9b73..cb1388e 100644 --- a/fortran/src/H5Sff.F90 +++ b/fortran/src/H5Sff.F90 @@ -1784,7 +1784,7 @@ CONTAINS INTEGER, INTENT(OUT) :: hdferr !***** TYPE(C_PTR) :: start_c, stride_c, count_c, block_c - INTEGER(C_INT) :: n + INTEGER :: n INTERFACE INTEGER FUNCTION h5sget_regular_hyperslab(space_id, start, stride, count, block) BIND(C,NAME='H5Sget_regular_hyperslab') |