diff options
author | manu <manu@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-11-23 23:47:42 +0000 |
---|---|---|
committer | manu <manu@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-11-23 23:47:42 +0000 |
commit | fed21cc2fd6c90fab465bce9f4e771669a68d470 (patch) | |
tree | f611b28dd269fb7e389fd5408fb94d4f9fe5416f /gcc/fortran/options.c | |
parent | bd35ba528ac0064eb863c629aa0cb30e10ef0327 (diff) |
gcc/fortran/ChangeLog:
2014-11-23 Manuel López-Ibáñez <manu@gcc.gnu.org>
PR fortran/44054
* decl.c (gfc_verify_c_interop_param): Use gfc_error_now_2.
(gfc_set_constant_character_len): Use gfc_warning_now_2.
* resolve.c (resolve_ordinary_assign): Likewise.
* gfortran.h (warn_character_truncation): Do not declare here.
* error.c (gfc_format_decoder): Handle %L.
* lang.opt (Wcharacter-truncation): Add Var and LangEnabledBy.
* options.c (gfc_init_options): Do not handle
warn_character_truncation explicitly.
(set_Wall): Likewise.
(gfc_handle_option): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@217992 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/options.c')
-rw-r--r-- | gcc/fortran/options.c | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index dee1af48a7c6..0dd0118cdd4d 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -95,7 +95,6 @@ gfc_init_options (unsigned int decoded_options_count, gfc_option.warn_aliasing = 0; gfc_option.warn_ampersand = 0; - gfc_option.warn_character_truncation = 0; gfc_option.warn_array_temp = 0; gfc_option.warn_c_binding_type = 0; gfc_option.gfc_warn_conversion = 0; @@ -460,7 +459,6 @@ set_Wall (int setting) gfc_option.warn_underflow = setting; gfc_option.warn_intrinsic_shadow = setting; gfc_option.warn_intrinsics_std = setting; - gfc_option.warn_character_truncation = setting; gfc_option.warn_real_q_constant = setting; gfc_option.warn_unused_dummy_argument = setting; gfc_option.warn_target_lifetime = setting; @@ -663,10 +661,6 @@ gfc_handle_option (size_t scode, const char *arg, int value, gfc_option.warn_c_binding_type = value; break; - case OPT_Wcharacter_truncation: - gfc_option.warn_character_truncation = value; - break; - case OPT_Wcompare_reals: gfc_option.warn_compare_reals = value; break; |