diff options
author | Steven G. Kargl <kargl@gcc.gnu.org> | 2009-05-13 16:17:59 +0000 |
---|---|---|
committer | Steven G. Kargl <kargl@gcc.gnu.org> | 2009-05-13 16:17:59 +0000 |
commit | 79bd1948049e44e2bef8ea00187fee391421b0cf (patch) | |
tree | e49b4a8743040e93a8b492edc72c69521fa7a99c /gcc/fortran/parse.c | |
parent | 286c4fcbc8953338d4d00d93d8239ad305324209 (diff) | |
download | gcc-79bd1948049e44e2bef8ea00187fee391421b0cf.zip gcc-79bd1948049e44e2bef8ea00187fee391421b0cf.tar.gz gcc-79bd1948049e44e2bef8ea00187fee391421b0cf.tar.bz2 |
gfortran.h (gfc_code): Rename struct member label to label1.
2009-05-12 Steven G. Kargl <kargl@gcc.gnu.org>
* gfortran.h (gfc_code): Rename struct member label to label1.
* dump-parse-tree.c (show_code_node): Update symbol.
* trans-stmt.c (gfc_trans_label_assign, gfc_trans_goto,
gfc_trans_arithmetic_if)": Ditto.
* resolve.c (gfc_resolve_blocks, resolve_code): Ditto.
* match.c (match_arithmetic_if, gfc_match_if, gfc_reference_st_label,
gfc_match_assign, gfc_match_goto): Ditto.
* parse.c (parse_do_block): Ditto.
From-SVN: r147489
Diffstat (limited to 'gcc/fortran/parse.c')
-rw-r--r-- | gcc/fortran/parse.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c index 3c54c46..3dec173 100644 --- a/gcc/fortran/parse.c +++ b/gcc/fortran/parse.c @@ -2867,7 +2867,7 @@ parse_do_block (void) gfc_state_data s; gfc_symtree *stree; - s.ext.end_do_label = new_st.label; + s.ext.end_do_label = new_st.label1; if (new_st.ext.iterator != NULL) stree = new_st.ext.iterator->var->symtree; |