[Bug libfortran/117819] Formatted READ with BZ in format fails

[cvs-commit at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=117819

--- Comment #4 from GCC Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-14 branch has been updated by Jerry DeLisle
<jvdeli...@gcc.gnu.org>:

https://gcc.gnu.org/g:2d9dbaf06e4cd83125781d1eb760f5404da3d175

commit r14-11079-g2d9dbaf06e4cd83125781d1eb760f5404da3d175
Author: Jerry DeLisle <jvdeli...@gcc.gnu.org>
Date:   Mon Dec 9 20:11:23 2024 -0800

    Fortran: Fix READ with padding in BLANK ZERO mode.

            PR fortran/117819

    libgfortran/ChangeLog:

            * io/read.c (read_decimal): If the read value is short of the
            specified width and pad mode is PAD yes, check for BLANK ZERO
            and adjust the value accordingly.
            (read_radix): Likewise.

    gcc/testsuite/ChangeLog:

            * gfortran.dg/pr117819.f90: New test.

    (cherry picked from commit cf406a6c79ce404c45f99bcf2df3293269dbb462)