OSDN Git Service

PR fortran/16404
authortobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 16 Jul 2004 00:39:40 +0000 (00:39 +0000)
committertobi <tobi@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 16 Jul 2004 00:39:40 +0000 (00:39 +0000)
commitaf0223a18eb85ad517c347400ee8a7a5f025783f
tree24952643edf5054848eaa39feffd49799b9beece
parent5a242bf7af062274fdb22fd00f495ff6edd26450
PR fortran/16404
(parts ported from g95)
* parse.h (gfc_state_data): New field do_variable.
(gfc_check_do_variable): Add prototype.
* parse.c (push_state): Initialize field 'do_variable'.
(gfc_check_do_variable): New function.
(parse_do_block): Remember do iterator variable.
(parse_file): Initialize field 'do_variable'.
* match.c (gfc_match_assignment, gfc_match_do,
gfc_match_allocate, gfc_match_nullify, gfc_match_deallocate):
Add previously missing checks.
(gfc_match_return): Reformat error message.
* io.c (match_out_tag): New function.
(match_open_element, match_close_element,
match_file_element, match_dt_element): Call match_out_tag
instead of match_vtag where appropriate.
(match_io_iterator, match_io_element): Add missing check.
(match_io): Reformat error message.
(match_inquire_element): Call match_out_tag where appropriate.

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