summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorM. Scot Breitenfeld <brtnfld@hdfgroup.org>2017-11-02 19:26:44 (GMT)
committerM. Scot Breitenfeld <brtnfld@hdfgroup.org>2017-11-02 19:26:44 (GMT)
commitb8cbd11dfb229e79b8a9b22ce45dac3e9a735590 (patch)
tree14e863a60ee9047561ef5b8cc850ecfad1066422
parent9d2ee5646d1b58de58265a29547959dd5d6af9cb (diff)
downloadhdf5-b8cbd11dfb229e79b8a9b22ce45dac3e9a735590.zip
hdf5-b8cbd11dfb229e79b8a9b22ce45dac3e9a735590.tar.gz
hdf5-b8cbd11dfb229e79b8a9b22ce45dac3e9a735590.tar.bz2
Fix for Intel 18 Fortran compilation error.
HDFFV-10322
-rw-r--r--fortran/src/H5f90global.F905
1 files changed, 1 insertions, 4 deletions
diff --git a/fortran/src/H5f90global.F90 b/fortran/src/H5f90global.F90
index dd2b171..629418a 100644
--- a/fortran/src/H5f90global.F90
+++ b/fortran/src/H5f90global.F90
@@ -142,10 +142,7 @@ MODULE H5GLOBAL
INTEGER(HID_T), DIMENSION(PREDEF_TYPES_LEN) :: predef_types
EQUIVALENCE (predef_types(1), H5T_NATIVE_INTEGER_KIND(1))
- EQUIVALENCE (predef_types(2), H5T_NATIVE_INTEGER_KIND(2))
- EQUIVALENCE (predef_types(3), H5T_NATIVE_INTEGER_KIND(3))
- EQUIVALENCE (predef_types(4), H5T_NATIVE_INTEGER_KIND(4))
- EQUIVALENCE (predef_types(5), H5T_NATIVE_INTEGER_KIND(5))
+ ! EQUIVALENCE predef_types(2:5) are unnecessary and violate the standard
EQUIVALENCE (predef_types(6), H5T_NATIVE_INTEGER)
EQUIVALENCE (predef_types(7), H5T_NATIVE_REAL)
EQUIVALENCE (predef_types(8), H5T_NATIVE_DOUBLE)