From 43d91bd041f70b6eac182123c8803c81288930cf Mon Sep 17 00:00:00 2001 From: Scot Breitenfeld Date: Fri, 13 Oct 2023 11:39:06 -0500 Subject: [PATCH] Fixes test failure for gfortran -O2 and -O3, -fdefault-real-16 (#3662) * added cmake ieee flag for nagfor * fixes gfortran -O2 and -O3, -fdefault-real-16 * fixed sync * updated release notes --- fortran/test/tH5P_F03.F90 | 3 +-- release_docs/RELEASE.txt | 5 +++++ 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/fortran/test/tH5P_F03.F90 b/fortran/test/tH5P_F03.F90 index 4f390d5fb76..24934eb3e05 100644 --- a/fortran/test/tH5P_F03.F90 +++ b/fortran/test/tH5P_F03.F90 @@ -146,7 +146,6 @@ SUBROUTINE test_create(total_error) ! Compound datatype test f_ptr = C_LOC(fill_ctype) - CALL H5Pget_fill_value_f(dcpl, comp_type_id, f_ptr, error) CALL check("H5Pget_fill_value_f",error, total_error) @@ -184,6 +183,7 @@ SUBROUTINE test_create(total_error) CALL VERIFY("***ERROR: Returned wrong fill value (real)", rfill, 2.0, total_error) ! For the actual compound type + f_ptr = C_LOC(fill_ctype) CALL H5Pset_fill_value_f(dcpl, comp_type_id, f_ptr, error) CALL check("H5Pget_fill_value_f",error, total_error) @@ -254,7 +254,6 @@ SUBROUTINE test_create(total_error) CALL check("H5Dget_create_plist_f", error, total_error) f_ptr = C_LOC(rd_c) - CALL H5Pget_fill_value_f(dcpl, comp_type_id, f_ptr, error) CALL check("H5Pget_fill_value_f", error, total_error) CALL verify("***ERROR: Returned wrong fill value", rd_c%a, fill_ctype%a, total_error) diff --git a/release_docs/RELEASE.txt b/release_docs/RELEASE.txt index 9b2ed76649e..ff876b42b64 100644 --- a/release_docs/RELEASE.txt +++ b/release_docs/RELEASE.txt @@ -348,6 +348,11 @@ Bug Fixes since HDF5-1.14.2 release skip running the atomicity tests if the major version of OpenMPI is < 5. + - Fixed Fortran 2003 test with gfortran-v13, optimization levels O2,O3 + + Fixes failing Fortran 2003 test with gfortran, optimization level O2,O3 + with -fdefault-real-16. Fixes GH #2928. + Platforms Tested ===================