From ab55105446b5bd197d6e41a7056036b27eda1154 Mon Sep 17 00:00:00 2001 From: Daniel Franke Date: Sat, 15 Mar 2008 10:28:55 -0400 Subject: [PATCH] re PR fortran/35584 (overzealous warning: branch causes infinite loop) 2008-03-15 Daniel Franke PR fortran/35584 * resolve.c (resolve_branch): Less strict and pessimistic warning message. From-SVN: r133250 --- gcc/fortran/ChangeLog | 10 ++++++++-- gcc/fortran/resolve.c | 2 +- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 8139d52..211453e 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,7 +1,13 @@ +2008-03-15 Daniel Franke + + PR fortran/35584 + * resolve.c (resolve_branch): Less strict and pessimistic warning + message. + 2008-03-11 Paolo Bonzini - * f95-lang.c (LANG_HOOKS_CLEAR_BINDING_STACK): Delete. - (gfc_be_parse_file): Call clear_binding_stack from here. + * f95-lang.c (LANG_HOOKS_CLEAR_BINDING_STACK): Delete. + (gfc_be_parse_file): Call clear_binding_stack from here. (gfc_clear_binding_stack): Rename to clear_binding_stack. 2008-03-09 Paul Thomas diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index ead60f2..f8cd803 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -5596,7 +5596,7 @@ resolve_branch (gfc_st_label *label, gfc_code *code) if (code->here == label) { - gfc_warning ("Branch at %L causes an infinite loop", &code->loc); + gfc_warning ("Branch at %L may result in an infinite loop", &code->loc); return; } -- 2.7.4