Skip to content

Commit

Permalink
Fixes test failure for gfortran -O2 and -O3, -fdefault-real-16 (HDFGr…
Browse files Browse the repository at this point in the history
…oup#3662)

* added cmake ieee flag for nagfor

* fixes gfortran -O2 and -O3, -fdefault-real-16

* fixed sync

* updated release notes
  • Loading branch information
brtnfld authored and jhendersonHDF committed Oct 18, 2023
1 parent 6fc9d82 commit 43d91bd
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 2 deletions.
3 changes: 1 addition & 2 deletions fortran/test/tH5P_F03.F90
Original file line number Diff line number Diff line change
Expand Up @@ -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)

Expand Down Expand Up @@ -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)

Expand Down Expand Up @@ -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)
Expand Down
5 changes: 5 additions & 0 deletions release_docs/RELEASE.txt
Original file line number Diff line number Diff line change
Expand Up @@ -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
===================
Expand Down

0 comments on commit 43d91bd

Please sign in to comment.