------- 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
