[Bug fortran/38507] Bogus Warning: Deleted feature: GOTO jumps to END of construct

["tobi at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #8 from tobi at gcc dot gnu dot org  2009-03-29 17:16 -------
Subject: Bug 38507

Author: tobi
Date: Sun Mar 29 17:15:48 2009
New Revision: 145245

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=145245
Log:
fortran/
PR fortran/38507
* gfortran.h (gfc_st_label): Fix comment.
(gfc_exec_op): Add statement code EXEC_END_BLOCK for end of block.
* parse.c (accept_statement): Use EXEC_END_BLOCK for END IF and
END SELECT with labels.
(check_do_closure): Fix formatting.
(parse_do_block): Fix typo in error message.
* resolve.c (code_stack): Remove tail member.  Update comment to
new use of reachable_labels.
(reachable_labels): Rename to ...
(find_reachable_labels): ... this.  Overhaul.  Update preceding
comment.
(resolve_branch): Fix comment preceding function.  Rewrite.
(resolve_code): Update call to find_reachable_labels.  Add code to
deal with EXEC_END_BLOCK.
* st.c (gfc_free_statement): Add code to deal with EXEC_END_BLOCK.
* trans.c (gfc_trans_code): Likewise.
testsuite/
* do_4.f: New.
* goto_2.f90: Correct expected warnings.
* goto_4.f90: Likewise.
* goto_5.f90: New.

Added:
    trunk/gcc/testsuite/gfortran.dg/do_4.f
    trunk/gcc/testsuite/gfortran.dg/goto_5.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/gfortran.h
    trunk/gcc/fortran/parse.c
    trunk/gcc/fortran/resolve.c
    trunk/gcc/fortran/st.c
    trunk/gcc/fortran/trans.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/goto_2.f90
    trunk/gcc/testsuite/gfortran.dg/goto_4.f90


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38507