re PR libfortran/90374 (Fortran 2018: Support d0.d, e0.d, es0.d, en0.d, g0.d and...
authorJerry DeLisle <jvdelisle@gcc.gnu.org>
Thu, 7 Nov 2019 03:06:20 +0000 (03:06 +0000)
committerJerry DeLisle <jvdelisle@gcc.gnu.org>
Thu, 7 Nov 2019 03:06:20 +0000 (03:06 +0000)
commit67732fbced89c42dabea4a3bc160da80d0db046a
treefeabf2ec8e1c3d38e1b267137d531abd42748a24
parentce6c0a20b5875c18a8416d60950febea76a4b9d3
re PR libfortran/90374 (Fortran 2018: Support d0.d, e0.d, es0.d, en0.d, g0.d and ew.d e0 edit descriptors for output)

2019-11-06  Jerry DeLisle  <jvdelisle@gcc.ngu.org>

PR fortran/90374
* io.c (check_format): Allow zero width for D, E, EN, and ES
specifiers as default and when -std=F2018 is given. Retain
existing errors when using the -fdec family of flags.

* libgfortran/io/format.c (parse_format_list): Relax format checking for
zero width as default and when -std=f2018.
io/format.h (format_token): Move definition to io.h.
io/io.h (format_token): Add definition here to allow access to
this definition at higher levels. Rename the declaration of
write_real_g0 to write_real_w0 and add a new format_token
argument, allowing higher level functions to pass in the
token for handling of g0 vs the other zero width specifiers.
io/transfer.c (formatted_transfer_scalar_write): Add checks for
zero width and call write_real_w0 to handle it.
io/write.c (write_real_g0): Remove.
(write_real_w0): Add new, same as previous write_real_g0 except
check format token to handle the g0 case.

* gfortran.dg/fmt_error_10.f: Modify for new constraints.
* gfortran.dg/fmt_error_7.f: Add dg-options "-std=f95".
* gfortran.dg/fmt_error_9.f: Modify for new constraints.
* gfortran.dg/fmt_zero_width.f90: New test.

From-SVN: r277905
13 files changed:
gcc/fortran/ChangeLog
gcc/fortran/io.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/fmt_error_10.f
gcc/testsuite/gfortran.dg/fmt_error_7.f
gcc/testsuite/gfortran.dg/fmt_error_9.f
gcc/testsuite/gfortran.dg/fmt_zero_width.f90 [new file with mode: 0644]
libgfortran/ChangeLog
libgfortran/io/format.c
libgfortran/io/format.h
libgfortran/io/io.h
libgfortran/io/transfer.c
libgfortran/io/write.c