aboutsummaryrefslogtreecommitdiff
path: root/gcc/c/c-errors.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/c/c-errors.c')
-rw-r--r--gcc/c/c-errors.c163
1 files changed, 0 insertions, 163 deletions
diff --git a/gcc/c/c-errors.c b/gcc/c/c-errors.c
deleted file mode 100644
index ced12ed..0000000
--- a/gcc/c/c-errors.c
+++ /dev/null
@@ -1,163 +0,0 @@
-/* Various diagnostic subroutines for the GNU C language.
- Copyright (C) 2000-2022 Free Software Foundation, Inc.
- Contributed by Gabriel Dos Reis <gdr@codesourcery.com>
-
-This file is part of GCC.
-
-GCC is free software; you can redistribute it and/or modify it under
-the terms of the GNU General Public License as published by the Free
-Software Foundation; either version 3, or (at your option) any later
-version.
-
-GCC is distributed in the hope that it will be useful, but WITHOUT ANY
-WARRANTY; without even the implied warranty of MERCHANTABILITY or
-FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-for more details.
-
-You should have received a copy of the GNU General Public License
-along with GCC; see the file COPYING3. If not see
-<http://www.gnu.org/licenses/>. */
-
-#include "config.h"
-#include "system.h"
-#include "coretypes.h"
-#include "tm.h"
-#include "c-tree.h"
-#include "opts.h"
-
-/* Issue an ISO C11 pedantic warning MSGID if -pedantic outside C2X mode,
- otherwise issue warning MSGID if -Wc11-c2X-compat is specified.
- This function is supposed to be used for matters that are allowed in
- ISO C2X but not supported in ISO C11, thus we explicitly don't pedwarn
- when C2X is specified. */
-
-bool
-pedwarn_c11 (location_t location, int opt, const char *gmsgid, ...)
-{
- diagnostic_info diagnostic;
- va_list ap;
- bool warned = false;
- rich_location richloc (line_table, location);
-
- va_start (ap, gmsgid);
- /* If desired, issue the C11/C2X compat warning, which is more specific
- than -pedantic. */
- if (warn_c11_c2x_compat > 0)
- {
- diagnostic_set_info (&diagnostic, gmsgid, &ap, &richloc,
- (pedantic && !flag_isoc2x)
- ? DK_PEDWARN : DK_WARNING);
- diagnostic.option_index = OPT_Wc11_c2x_compat;
- warned = diagnostic_report_diagnostic (global_dc, &diagnostic);
- }
- /* -Wno-c11-c2x-compat suppresses even the pedwarns. */
- else if (warn_c11_c2x_compat == 0)
- ;
- /* For -pedantic outside C2X, issue a pedwarn. */
- else if (pedantic && !flag_isoc2x)
- {
- diagnostic_set_info (&diagnostic, gmsgid, &ap, &richloc, DK_PEDWARN);
- diagnostic.option_index = opt;
- warned = diagnostic_report_diagnostic (global_dc, &diagnostic);
- }
- va_end (ap);
- return warned;
-}
-
-/* Issue an ISO C99 pedantic warning MSGID if -pedantic outside C11 mode,
- otherwise issue warning MSGID if -Wc99-c11-compat is specified.
- This function is supposed to be used for matters that are allowed in
- ISO C11 but not supported in ISO C99, thus we explicitly don't pedwarn
- when C11 is specified. */
-
-bool
-pedwarn_c99 (location_t location, int opt, const char *gmsgid, ...)
-{
- diagnostic_info diagnostic;
- va_list ap;
- bool warned = false;
- rich_location richloc (line_table, location);
-
- va_start (ap, gmsgid);
- /* If desired, issue the C99/C11 compat warning, which is more specific
- than -pedantic. */
- if (warn_c99_c11_compat > 0)
- {
- diagnostic_set_info (&diagnostic, gmsgid, &ap, &richloc,
- (pedantic && !flag_isoc11)
- ? DK_PEDWARN : DK_WARNING);
- diagnostic.option_index = OPT_Wc99_c11_compat;
- warned = diagnostic_report_diagnostic (global_dc, &diagnostic);
- }
- /* -Wno-c99-c11-compat suppresses even the pedwarns. */
- else if (warn_c99_c11_compat == 0)
- ;
- /* For -pedantic outside C11, issue a pedwarn. */
- else if (pedantic && !flag_isoc11)
- {
- diagnostic_set_info (&diagnostic, gmsgid, &ap, &richloc, DK_PEDWARN);
- diagnostic.option_index = opt;
- warned = diagnostic_report_diagnostic (global_dc, &diagnostic);
- }
- va_end (ap);
- return warned;
-}
-
-/* Issue an ISO C90 pedantic warning MSGID if -pedantic outside C99 mode,
- otherwise issue warning MSGID if -Wc90-c99-compat is specified, or if
- a specific option such as -Wlong-long is specified.
- This function is supposed to be used for matters that are allowed in
- ISO C99 but not supported in ISO C90, thus we explicitly don't pedwarn
- when C99 is specified. (There is no flag_c90.) */
-
-bool
-pedwarn_c90 (location_t location, int opt, const char *gmsgid, ...)
-{
- diagnostic_info diagnostic;
- va_list ap;
- bool warned = false;
- rich_location richloc (line_table, location);
-
- va_start (ap, gmsgid);
- /* Warnings such as -Wvla are the most specific ones. */
- if (opt != OPT_Wpedantic)
- {
- int opt_var = *(int *) option_flag_var (opt, &global_options);
- if (opt_var == 0)
- goto out;
- else if (opt_var > 0)
- {
- diagnostic_set_info (&diagnostic, gmsgid, &ap, &richloc,
- (pedantic && !flag_isoc99)
- ? DK_PEDWARN : DK_WARNING);
- diagnostic.option_index = opt;
- diagnostic_report_diagnostic (global_dc, &diagnostic);
- warned = true;
- goto out;
- }
- }
- /* Maybe we want to issue the C90/C99 compat warning, which is more
- specific than -pedantic. */
- if (warn_c90_c99_compat > 0)
- {
- diagnostic_set_info (&diagnostic, gmsgid, &ap, &richloc,
- (pedantic && !flag_isoc99)
- ? DK_PEDWARN : DK_WARNING);
- diagnostic.option_index = OPT_Wc90_c99_compat;
- diagnostic_report_diagnostic (global_dc, &diagnostic);
- }
- /* -Wno-c90-c99-compat suppresses the pedwarns. */
- else if (warn_c90_c99_compat == 0)
- ;
- /* For -pedantic outside C99, issue a pedwarn. */
- else if (pedantic && !flag_isoc99)
- {
- diagnostic_set_info (&diagnostic, gmsgid, &ap, &richloc, DK_PEDWARN);
- diagnostic.option_index = opt;
- diagnostic_report_diagnostic (global_dc, &diagnostic);
- warned = true;
- }
-out:
- va_end (ap);
- return warned;
-}