diff options
author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2023-10-11 20:16:01 (GMT) |
---|---|---|
committer | GitHub <noreply@github.com> | 2023-10-11 20:16:01 (GMT) |
commit | 85c176247d2c434d9db535999a285daa13aa50b5 (patch) | |
tree | f2b7f2864585b3dd019d6f9adbe941d532eacc74 /fortran/src/H5Sff.F90 | |
parent | 6f56d06f6af371b8b8c58079d8200647df249ee2 (diff) | |
download | hdf5-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.F90 | 2 |
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 |