summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2014-01-06 15:53:56 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2014-01-06 15:53:56 (GMT)
commit1febc8a4531e221c468c55a1f367b110d15094b9 (patch)
treeb37935b137fb0b54d13048d8987187a8eb914643
parent0a128b20a6b5d8dc2ca2ba821ccd30e0a196974e (diff)
downloadhdf5-1febc8a4531e221c468c55a1f367b110d15094b9.zip
hdf5-1febc8a4531e221c468c55a1f367b110d15094b9.tar.gz
hdf5-1febc8a4531e221c468c55a1f367b110d15094b9.tar.bz2
[svn-r24611] This is a partial fix for HDFFV-8634. It fixes the problem without --enable-fortran2003, where the optional parameter should not be given as an option for an interface to a C function. --enable-fortran2003 does not work due to a compiler bug in intel 14.0
Tested: kite (intel 14.0 with --enable-fortran)
-rw-r--r--fortran/src/H5Sff.f904
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/src/H5Sff.f90 b/fortran/src/H5Sff.f90
index 1bae584..c493d46 100644
--- a/fortran/src/H5Sff.f90
+++ b/fortran/src/H5Sff.f90
@@ -1323,8 +1323,8 @@ CONTAINS
INTEGER, INTENT(IN) :: operator
INTEGER(HSIZE_T), DIMENSION(*), INTENT(IN) :: start
INTEGER(HSIZE_T), DIMENSION(*), INTENT(IN) :: count
- INTEGER(HSIZE_T), DIMENSION(*), OPTIONAL, INTENT(IN) :: stride
- INTEGER(HSIZE_T), DIMENSION(*), OPTIONAL, INTENT(IN) :: block
+ INTEGER(HSIZE_T), DIMENSION(*), INTENT(IN) :: stride
+ INTEGER(HSIZE_T), DIMENSION(*), INTENT(IN) :: block
END FUNCTION h5sselect_hyperslab_c
END INTERFACE