On Fri, Jul 27, 2018 at 11:48 PM David Malcolm <dmalc...@redhat.com> wrote: > > This patch removes some duplicated code in dumpfile.c by > reimplementing the various dump_foo_loc calls in terms of dump_foo.
OK. Richard. > gcc/ChangeLog: > * dump-context.h (dump_context::dump_loc): New decl. > * dumpfile.c (dump_context::dump_loc): New member function. > (dump_context::dump_gimple_stmt_loc): Reimplement using dump_loc > and dump_gimple_stmt. > (dump_context::dump_gimple_expr_loc): Likewise, using > dump_gimple_expr. > (dump_context::dump_generic_expr_loc): Likewise, using > dump_generic_expr. > (dump_context::dump_printf_loc_va): Likewise, using > dump_printf_va. > (dump_context::begin_scope): Explicitly using the global function > "dump_loc", rather than the member function. > --- > gcc/dump-context.h | 2 + > gcc/dumpfile.c | 119 > ++++++++++++++--------------------------------------- > 2 files changed, 33 insertions(+), 88 deletions(-) > > diff --git a/gcc/dump-context.h b/gcc/dump-context.h > index a191e3a..f6df0b4 100644 > --- a/gcc/dump-context.h > +++ b/gcc/dump-context.h > @@ -39,6 +39,8 @@ class dump_context > > ~dump_context (); > > + void dump_loc (dump_flags_t dump_kind, const dump_location_t &loc); > + > void dump_gimple_stmt (dump_flags_t dump_kind, dump_flags_t > extra_dump_flags, > gimple *gs, int spc); > > diff --git a/gcc/dumpfile.c b/gcc/dumpfile.c > index 176c9b8..3c8bc38 100644 > --- a/gcc/dumpfile.c > +++ b/gcc/dumpfile.c > @@ -474,6 +474,27 @@ dump_context::~dump_context () > delete m_pending; > } > > +/* Print LOC to the appropriate dump destinations, given DUMP_KIND. > + If optinfos are enabled, begin a new optinfo. */ > + > +void > +dump_context::dump_loc (dump_flags_t dump_kind, const dump_location_t &loc) > +{ > + location_t srcloc = loc.get_location_t (); > + > + if (dump_file && (dump_kind & pflags)) > + ::dump_loc (dump_kind, dump_file, srcloc); > + > + if (alt_dump_file && (dump_kind & alt_flags)) > + ::dump_loc (dump_kind, alt_dump_file, srcloc); > + > + if (optinfo_enabled_p ()) > + { > + optinfo &info = begin_next_optinfo (loc); > + info.handle_dump_file_kind (dump_kind); > + } > +} > + > /* Dump gimple statement GS with SPC indentation spaces and > EXTRA_DUMP_FLAGS on the dump streams if DUMP_KIND is enabled. */ > > @@ -504,25 +525,8 @@ dump_context::dump_gimple_stmt_loc (dump_flags_t > dump_kind, > dump_flags_t extra_dump_flags, > gimple *gs, int spc) > { > - location_t srcloc = loc.get_location_t (); > - if (dump_file && (dump_kind & pflags)) > - { > - dump_loc (dump_kind, dump_file, srcloc); > - print_gimple_stmt (dump_file, gs, spc, dump_flags | extra_dump_flags); > - } > - > - if (alt_dump_file && (dump_kind & alt_flags)) > - { > - dump_loc (dump_kind, alt_dump_file, srcloc); > - print_gimple_stmt (alt_dump_file, gs, spc, dump_flags | > extra_dump_flags); > - } > - > - if (optinfo_enabled_p ()) > - { > - optinfo &info = begin_next_optinfo (loc); > - info.handle_dump_file_kind (dump_kind); > - info.add_gimple_stmt (gs, spc, dump_flags | extra_dump_flags); > - } > + dump_loc (dump_kind, loc); > + dump_gimple_stmt (dump_kind, extra_dump_flags, gs, spc); > } > > /* Dump gimple statement GS with SPC indentation spaces and > @@ -557,25 +561,8 @@ dump_context::dump_gimple_expr_loc (dump_flags_t > dump_kind, > gimple *gs, > int spc) > { > - location_t srcloc = loc.get_location_t (); > - if (dump_file && (dump_kind & pflags)) > - { > - dump_loc (dump_kind, dump_file, srcloc); > - print_gimple_expr (dump_file, gs, spc, dump_flags | extra_dump_flags); > - } > - > - if (alt_dump_file && (dump_kind & alt_flags)) > - { > - dump_loc (dump_kind, alt_dump_file, srcloc); > - print_gimple_expr (alt_dump_file, gs, spc, dump_flags | > extra_dump_flags); > - } > - > - if (optinfo_enabled_p ()) > - { > - optinfo &info = begin_next_optinfo (loc); > - info.handle_dump_file_kind (dump_kind); > - info.add_gimple_expr (gs, spc, dump_flags | extra_dump_flags); > - } > + dump_loc (dump_kind, loc); > + dump_gimple_expr (dump_kind, extra_dump_flags, gs, spc); > } > > > @@ -611,25 +598,8 @@ dump_context::dump_generic_expr_loc (dump_flags_t > dump_kind, > dump_flags_t extra_dump_flags, > tree t) > { > - location_t srcloc = loc.get_location_t (); > - if (dump_file && (dump_kind & pflags)) > - { > - dump_loc (dump_kind, dump_file, srcloc); > - print_generic_expr (dump_file, t, dump_flags | extra_dump_flags); > - } > - > - if (alt_dump_file && (dump_kind & alt_flags)) > - { > - dump_loc (dump_kind, alt_dump_file, srcloc); > - print_generic_expr (alt_dump_file, t, dump_flags | extra_dump_flags); > - } > - > - if (optinfo_enabled_p ()) > - { > - optinfo &info = begin_next_optinfo (loc); > - info.handle_dump_file_kind (dump_kind); > - info.add_tree (t, dump_flags | extra_dump_flags); > - } > + dump_loc (dump_kind, loc); > + dump_generic_expr (dump_kind, extra_dump_flags, t); > } > > /* Output a formatted message using FORMAT on appropriate dump streams. */ > @@ -672,35 +642,8 @@ dump_context::dump_printf_loc_va (dump_flags_t dump_kind, > const dump_location_t &loc, > const char *format, va_list ap) > { > - location_t srcloc = loc.get_location_t (); > - > - if (dump_file && (dump_kind & pflags)) > - { > - dump_loc (dump_kind, dump_file, srcloc); > - va_list aq; > - va_copy (aq, ap); > - vfprintf (dump_file, format, aq); > - va_end (aq); > - } > - > - if (alt_dump_file && (dump_kind & alt_flags)) > - { > - dump_loc (dump_kind, alt_dump_file, srcloc); > - va_list aq; > - va_copy (aq, ap); > - vfprintf (alt_dump_file, format, aq); > - va_end (aq); > - } > - > - if (optinfo_enabled_p ()) > - { > - optinfo &info = begin_next_optinfo (loc); > - info.handle_dump_file_kind (dump_kind); > - va_list aq; > - va_copy (aq, ap); > - info.add_printf_va (format, aq); > - va_end (aq); > - } > + dump_loc (dump_kind, loc); > + dump_printf_va (dump_kind, format, ap); > } > > /* Output VALUE in decimal to appropriate dump streams. */ > @@ -767,13 +710,13 @@ dump_context::begin_scope (const char *name, const > dump_location_t &loc) > > if (dump_file) > { > - dump_loc (MSG_NOTE, dump_file, loc.get_location_t ()); > + ::dump_loc (MSG_NOTE, dump_file, loc.get_location_t ()); > fprintf (dump_file, "=== %s ===\n", name); > } > > if (alt_dump_file) > { > - dump_loc (MSG_NOTE, alt_dump_file, loc.get_location_t ()); > + ::dump_loc (MSG_NOTE, alt_dump_file, loc.get_location_t ()); > fprintf (alt_dump_file, "=== %s ===\n", name); > } > > -- > 1.8.5.3 >