2008-05-03 Jerry DeLisle <jvdelisle@gcc.gnu.org>
authorjvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 3 May 2008 15:11:33 +0000 (15:11 +0000)
committerjvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 3 May 2008 15:11:33 +0000 (15:11 +0000)
commitf5098fb52913ddb4cd6b82a1bc769f50b93a1dad
tree3a2e67ce85966590b4fb8f93a08d35134b0a8ba0
parentbbb5db400843d200e84665b79059932a4c7faee8
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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@134900 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/gfortran.h
gcc/fortran/io.c