diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2008-06-07 23:59:53 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2008-06-07 23:59:53 +0000 |
| commit | 9355110f96f64237672a85f677f9876f979ab9bf (patch) | |
| tree | 487800676128abb382d449fe3bde8cb9bd059db8 /gcc/df-scan.c | |
| parent | 8955a00563959780a959086f6c79173d80fbfab8 (diff) | |
| download | gcc-9355110f96f64237672a85f677f9876f979ab9bf.zip gcc-9355110f96f64237672a85f677f9876f979ab9bf.tar.gz gcc-9355110f96f64237672a85f677f9876f979ab9bf.tar.bz2 | |
re PR fortran/36420 (Fortran 2008: g0 edit descriptor)
2008-06-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libfortran/36420
PR libfortran/36421
PR libfortran/36422
* io/io.h: Add prototype for write_real.
* io/transfer.c (formatted_transfer_scalar): For FMT_G and width zero,
use write_real.
* io/format.c: Add zero width error message. (parse_format_list): Use
error message for FMT_A if followed by FMT_ZERO. Use zero width error
message for FMT_G if mode is READ or if -std=f95 or f2003. (fmormat0):
Fix typo in comment.
* io/write.c (write_a): Set wlen to len if FMT_G and length is zero.
(write_l): Add wlen variable and use it if FMT_G and width is zero.
(write_decimal): If FMT_G, set m to -1 to flag processor dependent
formatting. (write_real): Remove static declaration.
From-SVN: r136545
Diffstat (limited to 'gcc/df-scan.c')
0 files changed, 0 insertions, 0 deletions