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 | |
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')
-rw-r--r-- | fortran/src/H5Dff.F90 | 1 | ||||
-rw-r--r-- | fortran/src/H5Sff.F90 | 2 | ||||
-rw-r--r-- | fortran/src/H5_buildiface.F90 | 1 |
3 files changed, 1 insertions, 3 deletions
diff --git a/fortran/src/H5Dff.F90 b/fortran/src/H5Dff.F90 index f4fe4ac..5d6ff52 100644 --- a/fortran/src/H5Dff.F90 +++ b/fortran/src/H5Dff.F90 @@ -1816,7 +1816,6 @@ CONTAINS SUBROUTINE h5dwrite_reference_dsetreg(dset_id, mem_type_id, buf, dims, hdferr, & mem_space_id, file_space_id, xfer_prp) - USE, INTRINSIC :: ISO_C_BINDING, ONLY : C_PTR IMPLICIT NONE INTEGER(HID_T), INTENT(IN) :: dset_id INTEGER(HID_T), INTENT(IN) :: mem_type_id 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 diff --git a/fortran/src/H5_buildiface.F90 b/fortran/src/H5_buildiface.F90 index cd4580b..62ced23 100644 --- a/fortran/src/H5_buildiface.F90 +++ b/fortran/src/H5_buildiface.F90 @@ -43,7 +43,6 @@ #include <H5config_f.inc> PROGRAM H5_buildiface - USE, INTRINSIC :: ISO_C_BINDING, ONLY : C_PTR, C_CHAR, C_LOC IMPLICIT NONE ! These values are valid REAL KINDs (with corresponding C float) found during configure |