summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5Sff.F90
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2023-10-11 20:16:01 (GMT)
committerGitHub <noreply@github.com>2023-10-11 20:16:01 (GMT)
commit85c176247d2c434d9db535999a285daa13aa50b5 (patch)
treef2b7f2864585b3dd019d6f9adbe941d532eacc74 /fortran/src/H5Sff.F90
parent6f56d06f6af371b8b8c58079d8200647df249ee2 (diff)
downloadhdf5-85c176247d2c434d9db535999a285daa13aa50b5.zip
hdf5-85c176247d2c434d9db535999a285daa13aa50b5.tar.gz
hdf5-85c176247d2c434d9db535999a285daa13aa50b5.tar.bz2
Address nagfor exceptions stoppage. (#3658)
* added cmake ieee flag for nagfor * generalized determining the nag compiler * fixing some misc. NAG warnings
Diffstat (limited to 'fortran/src/H5Sff.F90')
-rw-r--r--fortran/src/H5Sff.F902
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Sff.F90 b/fortran/src/H5Sff.F90
index 5a1ca53..e734c03 100644
--- a/fortran/src/H5Sff.F90
+++ b/fortran/src/H5Sff.F90
@@ -71,7 +71,7 @@ CONTAINS
IMPLICIT NONE
INTEGER, INTENT(IN) :: rank
INTEGER(HSIZE_T), INTENT(IN) :: dims(rank)
- INTEGER(HSIZE_T), DIMENSION(:),INTENT(IN) :: maxdims(rank)
+ INTEGER(HSIZE_T), INTENT(IN) :: maxdims(rank)
INTEGER(HID_T), INTENT(OUT) :: space_id
END FUNCTION h5screate_simple_c
END INTERFACE