diff options
| author | Bernhard Fischer <aldot@gcc.gnu.org> | 2006-10-15 14:12:59 +0200 |
|---|---|---|
| committer | Bernhard Reutner-Fischer <aldot@gcc.gnu.org> | 2006-10-15 14:12:59 +0200 |
| commit | 2e5758e8c13ded54350723f97d339c4a2d61c3ca (patch) | |
| tree | 9cdc011254cd071b183d4caa9eff4ce2d25931e3 /gcc/fortran/options.c | |
| parent | 9d6968a4dac504d9353c68944b401666922f1f93 (diff) | |
| download | gcc-2e5758e8c13ded54350723f97d339c4a2d61c3ca.zip gcc-2e5758e8c13ded54350723f97d339c4a2d61c3ca.tar.gz gcc-2e5758e8c13ded54350723f97d339c4a2d61c3ca.tar.bz2 | |
re PR fortran/24767 (gfortran: -Wno-unused-label does not work properly)
fortran/ChangeLog
2006-10-13 Bernhard Fischer <aldot@gcc.gnu.org>
PR fortran/24767
* lang.opt (Wunused-labels): Remove.
* options.c: Remove references to gfc_option.warn_unused_labels.
* gfortran.h: Remove variable warn_unused_labels.
* resolve.c (warn_unused_fortran_label) : Use warn_unused_label
instead of gfc_option.warn_unused_labels.
* invoke.texi: Remove documentation of -Wunused-labels.
testsuite/ChangeLog
2006-10-13 Bernhard Fischer <aldot@gcc.gnu.org>
PR fortran/24767
* gfortran.dg/label_4.f90: Adjust warning flag.
From-SVN: r117743
Diffstat (limited to 'gcc/fortran/options.c')
| -rw-r--r-- | gcc/fortran/options.c | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index 4d76030..9634704 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -61,7 +61,6 @@ gfc_init_options (unsigned int argc ATTRIBUTE_UNUSED, gfc_option.warn_surprising = 0; gfc_option.warn_tabs = 1; gfc_option.warn_underflow = 1; - gfc_option.warn_unused_labels = 0; gfc_option.flag_all_intrinsics = 0; gfc_option.flag_default_double = 0; @@ -303,8 +302,7 @@ set_Wall (void) gfc_option.warn_surprising = 1; gfc_option.warn_tabs = 0; gfc_option.warn_underflow = 1; - gfc_option.warn_unused_labels = 1; - + set_Wunused (1); warn_return_type = 1; warn_switch = 1; @@ -428,10 +426,6 @@ gfc_handle_option (size_t scode, const char *arg, int value) gfc_option.warn_underflow = value; break; - case OPT_Wunused_labels: - gfc_option.warn_unused_labels = value; - break; - case OPT_fall_intrinsics: gfc_option.flag_all_intrinsics = 1; break; |