From 745513e2b039515ccec52397cf7d1d807890bc9e Mon Sep 17 00:00:00 2001
From: Scot Breitenfeld <brtnfld@hdfgroup.org>
Date: Tue, 9 Feb 2016 11:51:28 -0500
Subject: [svn-r29074] fixed integer type for H5Sget_simple_extent_ndims_f
 argument

---
 fortran/src/H5Sff.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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')
-- 
cgit v0.12