diff options
author | Tom Tromey <tom@tromey.com> | 2018-11-23 12:20:05 -0700 |
---|---|---|
committer | Tom Tromey <tom@tromey.com> | 2019-01-09 18:28:14 -0700 |
commit | aed57c537116ae91f553ac835b3f96d1f87b3bb0 (patch) | |
tree | c2699609b04041be0ab313616b8a20e771a7a47e /gdb/guile | |
parent | 99d89cdea6c296bdd94ce532350d139d3900ff78 (diff) | |
download | binutils-gdb-aed57c537116ae91f553ac835b3f96d1f87b3bb0.tar.gz |
Remove most uses of ALL_OBJFILES
This removes most uses of ALL_OBJFILES, replacing them with ranged for
loops. The remaining uses are all in macros, and will be removed in
subsequent patches.
gdb/ChangeLog
2019-01-09 Tom Tromey <tom@tromey.com>
* symtab.c (iterate_over_symtabs, matching_obj_sections)
(expand_symtab_containing_pc, lookup_static_symbol)
(basic_lookup_transparent_type, find_pc_sect_compunit_symtab)
(find_symbol_at_address, find_line_symtab, find_main_name): Use
all_objfiles.
* probe.c (find_probe_by_pc, collect_probes): Use all_objfiles.
* breakpoint.c (create_overlay_event_breakpoint)
(create_longjmp_master_breakpoint)
(create_std_terminate_master_breakpoint)
(create_exception_master_breakpoint): Use all_objfiles.
* linux-thread-db.c (try_thread_db_load_from_pdir)
(has_libpthread): Use all_objfiles.
* ada-lang.c (add_nonlocal_symbols): Use all_objfiles.
* linespec.c (iterate_over_all_matching_symtabs)
(search_minsyms_for_name): Use all_objfiles.
* maint.c (maintenance_info_sections): Use all_objfiles.
* main.c (captured_main_1): Use all_objfiles.
* spu-tdep.c (spu_objfile_from_frame): Use all_objfiles.
* guile/scm-objfile.c (gdbscm_objfiles): Use all_objfiles.
* guile/scm-pretty-print.c
(ppscm_find_pretty_printer_from_objfiles): Use all_objfiles.
* solib-spu.c (append_ocl_sos): Use all_objfiles.
* symmisc.c (maintenance_print_symbols): Use all_objfiles.
(maintenance_print_msymbols): Use all_objfiles.
* source.c (select_source_symtab): Use all_objfiles.
* jit.c (jit_find_objf_with_entry_addr): Use all_objfiles.
* symfile.c (remove_symbol_file_command)
(expand_symtabs_matching, map_symbol_filenames): Use
all_objfiles.
* ppc-linux-tdep.c (ppc_linux_spe_context_inferior_created): Use
all_objfiles.
* dwarf2-frame.c (dwarf2_frame_find_fde): Use all_objfiles.
* objc-lang.c (find_methods): Use all_objfiles.
* objfiles.c (have_partial_symbols, have_full_symbols)
(have_minimal_symbols, qsort_cmp)
(default_iterate_over_objfiles_in_search_order): Use
all_objfiles.
* hppa-tdep.c (find_unwind_entry): Use all_objfiles.
* psymtab.c (maintenance_print_psymbols): Use all_objfiles.
(maintenance_check_psymtabs): Use all_objfiles.
(ALL_PSYMTABS): Remove.
* compile/compile-object-run.c (do_module_cleanup): Use
all_objfiles.
* blockframe.c (find_pc_partial_function): Use all_objfiles.
* cp-support.c (add_symbol_overload_list_qualified): Use
all_objfiles.
* windows-tdep.c (windows_iterate_over_objfiles_in_search_order):
Use all_objfiles.
* dwarf-index-write.c (save_gdb_index_command): Use all_objfiles.
* python/py-xmethods.c (gdbpy_get_matching_xmethod_workers): Use
all_objfiles.
* python/py-objfile.c (objfpy_lookup_objfile_by_name)
(objfpy_lookup_objfile_by_build_id): Use all_objfiles.
* python/py-prettyprint.c (find_pretty_printer_from_objfiles):
Uses all_objfiles.
* solib.c (solib_read_symbols): Use all_objfiles
Diffstat (limited to 'gdb/guile')
-rw-r--r-- | gdb/guile/scm-objfile.c | 11 | ||||
-rw-r--r-- | gdb/guile/scm-pretty-print.c | 25 |
2 files changed, 17 insertions, 19 deletions
diff --git a/gdb/guile/scm-objfile.c b/gdb/guile/scm-objfile.c index b5f61729570..79b784aad62 100644 --- a/gdb/guile/scm-objfile.c +++ b/gdb/guile/scm-objfile.c @@ -366,17 +366,16 @@ gdbscm_get_current_objfile (void) static SCM gdbscm_objfiles (void) { - struct objfile *objf; SCM result; result = SCM_EOL; - ALL_OBJFILES (objf) - { - SCM item = ofscm_scm_from_objfile (objf); + for (objfile *objf : all_objfiles (current_program_space)) + { + SCM item = ofscm_scm_from_objfile (objf); - result = scm_cons (item, result); - } + result = scm_cons (item, result); + } return scm_reverse_x (result, SCM_EOL); } diff --git a/gdb/guile/scm-pretty-print.c b/gdb/guile/scm-pretty-print.c index 9cc4f7f6b27..d621ed5e912 100644 --- a/gdb/guile/scm-pretty-print.c +++ b/gdb/guile/scm-pretty-print.c @@ -427,19 +427,18 @@ ppscm_search_pp_list (SCM list, SCM value) static SCM ppscm_find_pretty_printer_from_objfiles (SCM value) { - struct objfile *objfile; - - ALL_OBJFILES (objfile) - { - objfile_smob *o_smob = ofscm_objfile_smob_from_objfile (objfile); - SCM pp = ppscm_search_pp_list (ofscm_objfile_smob_pretty_printers (o_smob), - value); - - /* Note: This will return if pp is a <gdb:exception> object, - which is what we want. */ - if (gdbscm_is_true (pp)) - return pp; - } + for (objfile *objfile : all_objfiles (current_program_space)) + { + objfile_smob *o_smob = ofscm_objfile_smob_from_objfile (objfile); + SCM pp + = ppscm_search_pp_list (ofscm_objfile_smob_pretty_printers (o_smob), + value); + + /* Note: This will return if pp is a <gdb:exception> object, + which is what we want. */ + if (gdbscm_is_true (pp)) + return pp; + } return SCM_BOOL_F; } |