On Sun, May 24, 2026 at 10:05 AM Jerry D <[email protected]> wrote: > > On 5/22/26 2:18 PM, Harald Anlauf wrote: > > --- snip --- > > > >> > >> I will add the checks for real(10) and real(16) to the test case. > >> > >> I would like to commit this now and handle the rounding in a new PR or > >> leave > >> this one open and identify this as patch 1 of 2. > >> > >> Is this OK? > > > > OK, then make it so. > > > > Please adjust the commit message to indicate that this is a partial > > EX implementation lacking proper rounding. > > > > Done > > > Since reading the hex format is still missing, wouldn't it be > > best to stick to the existing PR? Otherwise a new PR could > > lose information that is in the old one. > > > > Keeping the PR open, added Harald as co-author for all his > suggestions and the idea of using standard functions to extract > the components. > > > Thanks for being so patient. > > > > Harald > > Committed: > > commit r17-702-g5d0a9050f3a1c1f9f8e89188dec3d6f39c64a06a > Author: Jerry DeLisle <[email protected]> > Date: Sun May 10 18:13:48 2026 -0700 > > Fortran: [PR93727] Implement EX format specifier for WRITE > > These changes implement a portion of the Fortran 2018 > EX format specifier for WRITE output. Hexadecimal > floating point formats for KIND=4,8,10, and 16 real > numbers if supported by the configured machine. > > Format tokens are added as place holders for future leading > zero specifiers. > > Remaining to be completed is proper rounding of truncated > hex float strings and implementing the READ functions. These > will be a followup patches. > > PR fortran/93727
I got FAIL: gfortran.dg/EXformat_1.F90 -O0 execution test FAIL: gfortran.dg/EXformat_1.F90 -O1 execution test FAIL: gfortran.dg/EXformat_1.F90 -O2 execution test FAIL: gfortran.dg/EXformat_1.F90 -O3 -fomit-frame-pointer -funroll-loops -fpeel-loops -ftracer -finline-functions execution test FAIL: gfortran.dg/EXformat_1.F90 -O3 -g execution test FAIL: gfortran.dg/EXformat_1.F90 -Os execution test FAIL: gfortran.dg/EXformat_2.f90 -O0 execution test FAIL: gfortran.dg/EXformat_2.f90 -O1 execution test FAIL: gfortran.dg/EXformat_2.f90 -O2 execution test FAIL: gfortran.dg/EXformat_2.f90 -O3 -fomit-frame-pointer -funroll-loops -fpeel-loops -ftracer -finline-functions execution test FAIL: gfortran.dg/EXformat_2.f90 -O3 -g execution test FAIL: gfortran.dg/EXformat_2.f90 -Os execution test FAIL: go.test/test/fixedbugs/bug053.go execution, -O2 -g on Linux/x86-64: Note: The following floating-point exceptions are signalling: IEEE_INVALID_FLAG IEEE_UNDERFLOW_FLAG IEEE_DENORMAL STOP 3 FAIL: gfortran.dg/EXformat_1.F90 -O0 execution test -- H.J.
