diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2008-05-03 15:11:33 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2008-05-03 15:11:33 +0000 |
| commit | ad7ee6f8d5a0fda91de731835f909a3c330db24d (patch) | |
| tree | 3a2e67ce85966590b4fb8f93a08d35134b0a8ba0 /gcc/tree-ssa-phiopt.c | |
| parent | 1183512494cf8f3ca0b5460808d563ec0f8f14ec (diff) | |
| download | gcc-ad7ee6f8d5a0fda91de731835f909a3c330db24d.zip gcc-ad7ee6f8d5a0fda91de731835f909a3c330db24d.tar.gz gcc-ad7ee6f8d5a0fda91de731835f909a3c330db24d.tar.bz2 | |
re PR fortran/33268 (read ('(f3.3)'), a rejected due to the extra (...))
2008-05-03 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR fortran/33268
* gfortran.h: Add extra_comma pointer to gfc_dt structure. Add iokind to
gfc_expr value union. Add io_kind enum to here from io.c.
* io.c (gfc_free_dt): Free extra_comma.
(gfc_resolve_dt): If an extra comma was encountered and io_unit is type
BT_CHARACTER, resolve to format_expr and set default unit. Error if
io_kind is M_WRITE. (match_io): Match the extra comma and set new
pointer, extra_comma.
From-SVN: r134900
Diffstat (limited to 'gcc/tree-ssa-phiopt.c')
0 files changed, 0 insertions, 0 deletions