diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2017-11-02 19:38:48 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2017-11-02 19:38:48 (GMT) |
| commit | 1f8c36981741679f383de6bb10037a423d392808 (patch) | |
| tree | 14e863a60ee9047561ef5b8cc850ecfad1066422 | |
| parent | 9d2ee5646d1b58de58265a29547959dd5d6af9cb (diff) | |
| parent | b8cbd11dfb229e79b8a9b22ce45dac3e9a735590 (diff) | |
| download | hdf5-1f8c36981741679f383de6bb10037a423d392808.zip hdf5-1f8c36981741679f383de6bb10037a423d392808.tar.gz hdf5-1f8c36981741679f383de6bb10037a423d392808.tar.bz2 | |
Merge pull request #749 in HDFFV/hdf5 from ~BRTNFLD/hdf5_msb:develop to develop
* commit 'b8cbd11dfb229e79b8a9b22ce45dac3e9a735590':
Fix for Intel 18 Fortran compilation error.
| -rw-r--r-- | fortran/src/H5f90global.F90 | 5 |
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) |