[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 #3 from GCC Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Jerry DeLisle <jvdeli...@gcc.gnu.org>:

https://gcc.gnu.org/g:cf406a6c79ce404c45f99bcf2df3293269dbb462

commit r15-6090-gcf406a6c79ce404c45f99bcf2df3293269dbb462
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_decimal_unsigned): Likewise.
            (read_radix): Likewise.

    gcc/testsuite/ChangeLog:

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