diff options
| author | David Malcolm <dmalcolm@redhat.com> | 2017-05-05 21:01:05 +0000 |
|---|---|---|
| committer | David Malcolm <dmalcolm@gcc.gnu.org> | 2017-05-05 21:01:05 +0000 |
| commit | 56d3558517e7d7b75ff6704913f563a11eb13118 (patch) | |
| tree | c9613ec3bbd5d40d228e3d7c8a7edc4cda958a68 /gcc/fortran | |
| parent | 80ceac09a50d0d730cd729d735a49cd689ef2f65 (diff) | |
| download | gcc-56d3558517e7d7b75ff6704913f563a11eb13118.zip gcc-56d3558517e7d7b75ff6704913f563a11eb13118.tar.gz gcc-56d3558517e7d7b75ff6704913f563a11eb13118.tar.bz2 | |
Eliminate report_diagnostic macro
This patch eliminates the report_diagnostic macro, manually
expanding it in all sites in the code.
No functional change intended.
gcc/c-family/ChangeLog:
* c-common.c (c_cpp_error): Replace report_diagnostic
with diagnostic_report_diagnostic.
gcc/c/ChangeLog:
* c-decl.c (warn_defaults_to): Replace report_diagnostic
with diagnostic_report_diagnostic.
* c-errors.c (pedwarn_c99): Likewise.
(pedwarn_c90): Likewise.
gcc/cp/ChangeLog:
* error.c (pedwarn_cxx98): Replace report_diagnostic
with diagnostic_report_diagnostic.
gcc/ChangeLog:
* diagnostic.c (diagnostic_impl): Replace report_diagnostic
with diagnostic_report_diagnostic.
(diagnostic_n_impl_richloc): Likewise.
* diagnostic.h (report_diagnostic): Delete macro.
* rtl-error.c (diagnostic_for_asm): Replace report_diagnostic
with diagnostic_report_diagnostic.
* substring-locations.c (format_warning_va): Likewise.
gcc/fortran/ChangeLog:
* cpp.c (cb_cpp_error): Replace report_diagnostic
with diagnostic_report_diagnostic.
* error.c (gfc_warning): Likewise.
(gfc_warning_now_at): Likewise.
(gfc_warning_now): Likewise.
(gfc_warning_internal): Likewise.
(gfc_error_now): Likewise.
(gfc_fatal_error): Likewise.
(gfc_error_opt): Likewise.
(gfc_internal_error): Likewise.
From-SVN: r247663
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 13 | ||||
| -rw-r--r-- | gcc/fortran/cpp.c | 2 | ||||
| -rw-r--r-- | gcc/fortran/error.c | 16 |
3 files changed, 22 insertions, 9 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 1cc78c9..27fcf6e 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,16 @@ +2017-05-05 David Malcolm <dmalcolm@redhat.com> + + * cpp.c (cb_cpp_error): Replace report_diagnostic + with diagnostic_report_diagnostic. + * error.c (gfc_warning): Likewise. + (gfc_warning_now_at): Likewise. + (gfc_warning_now): Likewise. + (gfc_warning_internal): Likewise. + (gfc_error_now): Likewise. + (gfc_fatal_error): Likewise. + (gfc_error_opt): Likewise. + (gfc_internal_error): Likewise. + 2017-05-01 Thomas Koenig <tkoenig@gcc.gnu.org> PR fortran/37131 diff --git a/gcc/fortran/cpp.c b/gcc/fortran/cpp.c index 6ac37ad..4d1b56a 100644 --- a/gcc/fortran/cpp.c +++ b/gcc/fortran/cpp.c @@ -1062,7 +1062,7 @@ cb_cpp_error (cpp_reader *pfile ATTRIBUTE_UNUSED, int level, int reason, richloc, dlevel); if (reason == CPP_W_WARNING_DIRECTIVE) diagnostic_override_option_index (&diagnostic, OPT_Wcpp); - ret = report_diagnostic (&diagnostic); + ret = diagnostic_report_diagnostic (global_dc, &diagnostic); if (level == CPP_DL_WARNING_SYSHDR) global_dc->dc_warn_system_headers = save_warn_system_headers; return ret; diff --git a/gcc/fortran/error.c b/gcc/fortran/error.c index 0312499..eeb7a78 100644 --- a/gcc/fortran/error.c +++ b/gcc/fortran/error.c @@ -789,7 +789,7 @@ gfc_warning (int opt, const char *gmsgid, va_list ap) diagnostic_set_info (&diagnostic, gmsgid, &argp, &rich_loc, DK_WARNING); diagnostic.option_index = opt; - bool ret = report_diagnostic (&diagnostic); + bool ret = diagnostic_report_diagnostic (global_dc, &diagnostic); if (buffered_p) { @@ -1138,7 +1138,7 @@ gfc_warning_now_at (location_t loc, int opt, const char *gmsgid, ...) va_start (argp, gmsgid); diagnostic_set_info (&diagnostic, gmsgid, &argp, &rich_loc, DK_WARNING); diagnostic.option_index = opt; - ret = report_diagnostic (&diagnostic); + ret = diagnostic_report_diagnostic (global_dc, &diagnostic); va_end (argp); return ret; } @@ -1157,7 +1157,7 @@ gfc_warning_now (int opt, const char *gmsgid, ...) diagnostic_set_info (&diagnostic, gmsgid, &argp, &rich_loc, DK_WARNING); diagnostic.option_index = opt; - ret = report_diagnostic (&diagnostic); + ret = diagnostic_report_diagnostic (global_dc, &diagnostic); va_end (argp); return ret; } @@ -1176,7 +1176,7 @@ gfc_warning_internal (int opt, const char *gmsgid, ...) diagnostic_set_info (&diagnostic, gmsgid, &argp, &rich_loc, DK_WARNING); diagnostic.option_index = opt; - ret = report_diagnostic (&diagnostic); + ret = diagnostic_report_diagnostic (global_dc, &diagnostic); va_end (argp); return ret; } @@ -1194,7 +1194,7 @@ gfc_error_now (const char *gmsgid, ...) va_start (argp, gmsgid); diagnostic_set_info (&diagnostic, gmsgid, &argp, &rich_loc, DK_ERROR); - report_diagnostic (&diagnostic); + diagnostic_report_diagnostic (global_dc, &diagnostic); va_end (argp); } @@ -1210,7 +1210,7 @@ gfc_fatal_error (const char *gmsgid, ...) va_start (argp, gmsgid); diagnostic_set_info (&diagnostic, gmsgid, &argp, &rich_loc, DK_FATAL); - report_diagnostic (&diagnostic); + diagnostic_report_diagnostic (global_dc, &diagnostic); va_end (argp); gcc_unreachable (); @@ -1295,7 +1295,7 @@ gfc_error_opt (int opt, const char *gmsgid, va_list ap) } diagnostic_set_info (&diagnostic, gmsgid, &argp, &richloc, DK_ERROR); - report_diagnostic (&diagnostic); + diagnostic_report_diagnostic (global_dc, &diagnostic); if (buffered_p) { @@ -1345,7 +1345,7 @@ gfc_internal_error (const char *gmsgid, ...) va_start (argp, gmsgid); diagnostic_set_info (&diagnostic, gmsgid, &argp, &rich_loc, DK_ICE); - report_diagnostic (&diagnostic); + diagnostic_report_diagnostic (global_dc, &diagnostic); va_end (argp); gcc_unreachable (); |
