diff options
author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2023-10-13 16:39:06 (GMT) |
---|---|---|
committer | GitHub <noreply@github.com> | 2023-10-13 16:39:06 (GMT) |
commit | 6aaa960d900b59a442e28c264ca0562449ebd05b (patch) | |
tree | 80cfe25088321ce27a5e111dfebd75b2e4138bd6 /fortran/test | |
parent | eda1344a72d0f85e4532c504f1e9ecc025a87a21 (diff) | |
download | hdf5-6aaa960d900b59a442e28c264ca0562449ebd05b.zip hdf5-6aaa960d900b59a442e28c264ca0562449ebd05b.tar.gz hdf5-6aaa960d900b59a442e28c264ca0562449ebd05b.tar.bz2 |
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
Diffstat (limited to 'fortran/test')
-rw-r--r-- | fortran/test/tH5P_F03.F90 | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/fortran/test/tH5P_F03.F90 b/fortran/test/tH5P_F03.F90 index 4f390d5..24934eb 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) |