diff options
author | Simon Marchi <simon.marchi@ericsson.com> | 2015-09-25 14:08:07 -0400 |
---|---|---|
committer | Simon Marchi <simon.marchi@ericsson.com> | 2015-09-25 14:08:07 -0400 |
commit | 9a3c826307ae6ad4dd6fbd72431e7d9d4947f1dd (patch) | |
tree | 087bd399e5b347c2fb2e0ec5977252453fdd4978 /gdb/guile | |
parent | 224c3ddb89a43bf8db06c373d4ff429477833c0f (diff) | |
download | gdb-9a3c826307ae6ad4dd6fbd72431e7d9d4947f1dd.zip gdb-9a3c826307ae6ad4dd6fbd72431e7d9d4947f1dd.tar.gz gdb-9a3c826307ae6ad4dd6fbd72431e7d9d4947f1dd.tar.bz2 |
Add some more casts (1/2)
Note: I needed to split this patch in two, otherwise it's too big for
the mailing list.
This patch adds explicit casts to situations where a void pointer is
assigned to a pointer to the "real" type. Building in C++ mode requires
those assignments to use an explicit cast. This includes, for example:
- callback arguments (cleanups, comparison functions, ...)
- data attached to some object (objfile, program space, etc) in the form
of a void pointer
- "user data" passed to some function
This patch comes from the commit "(mostly) auto-generated patch to insert
casts needed for C++", taken from Pedro's C++ branch.
Only files built on x86 with --enable-targets=all are modified, so the
native files for other arches will need to be dealt with separately.
I built-tested this with --enable-targets=all and reg-tested. To my
surprise, a test case (selftest.exp) had to be adjusted.
Here's the ChangeLog entry. Again, this was relatively quick to make
despite the length, thanks to David Malcom's script, although I don't
believe it's very useful information in that particular case...
gdb/ChangeLog:
* aarch64-tdep.c (aarch64_make_prologue_cache): Add cast(s).
(aarch64_make_stub_cache): Likewise.
(value_of_aarch64_user_reg): Likewise.
* ada-lang.c (ada_inferior_data_cleanup): Likewise.
(get_ada_inferior_data): Likewise.
(get_ada_pspace_data): Likewise.
(ada_pspace_data_cleanup): Likewise.
(ada_complete_symbol_matcher): Likewise.
(ada_exc_search_name_matches): Likewise.
* ada-tasks.c (get_ada_tasks_pspace_data): Likewise.
(get_ada_tasks_inferior_data): Likewise.
* addrmap.c (addrmap_mutable_foreach_worker): Likewise.
(splay_obstack_alloc): Likewise.
(splay_obstack_free): Likewise.
* alpha-linux-tdep.c (alpha_linux_supply_gregset): Likewise.
(alpha_linux_collect_gregset): Likewise.
(alpha_linux_supply_fpregset): Likewise.
(alpha_linux_collect_fpregset): Likewise.
* alpha-mdebug-tdep.c (alpha_mdebug_frame_unwind_cache): Likewise.
* alpha-tdep.c (alpha_lds): Likewise.
(alpha_sts): Likewise.
(alpha_sigtramp_frame_unwind_cache): Likewise.
(alpha_heuristic_frame_unwind_cache): Likewise.
(alpha_supply_int_regs): Likewise.
(alpha_fill_int_regs): Likewise.
(alpha_supply_fp_regs): Likewise.
(alpha_fill_fp_regs): Likewise.
* alphanbsd-tdep.c (alphanbsd_supply_fpregset): Likewise.
(alphanbsd_aout_supply_gregset): Likewise.
(alphanbsd_supply_gregset): Likewise.
* amd64-linux-tdep.c (amd64_linux_init_abi): Likewise.
(amd64_x32_linux_init_abi): Likewise.
* amd64-nat.c (amd64_supply_native_gregset): Likewise.
(amd64_collect_native_gregset): Likewise.
* amd64-tdep.c (amd64_frame_cache): Likewise.
(amd64_sigtramp_frame_cache): Likewise.
(amd64_epilogue_frame_cache): Likewise.
(amd64_supply_fxsave): Likewise.
(amd64_supply_xsave): Likewise.
(amd64_collect_fxsave): Likewise.
(amd64_collect_xsave): Likewise.
* amd64-windows-tdep.c (amd64_windows_frame_cache): Likewise.
* amd64obsd-tdep.c (amd64obsd_trapframe_cache): Likewise.
* arm-linux-tdep.c (arm_linux_supply_gregset): Likewise.
(arm_linux_collect_gregset): Likewise.
(arm_linux_supply_nwfpe): Likewise.
(arm_linux_collect_nwfpe): Likewise.
(arm_linux_supply_vfp): Likewise.
(arm_linux_collect_vfp): Likewise.
* arm-tdep.c (arm_find_mapping_symbol): Likewise.
(arm_prologue_unwind_stop_reason): Likewise.
(arm_prologue_this_id): Likewise.
(arm_prologue_prev_register): Likewise.
(arm_exidx_data_free): Likewise.
(arm_find_exidx_entry): Likewise.
(arm_stub_this_id): Likewise.
(arm_m_exception_this_id): Likewise.
(arm_m_exception_prev_register): Likewise.
(arm_normal_frame_base): Likewise.
(gdb_print_insn_arm): Likewise.
(arm_objfile_data_free): Likewise.
(arm_record_special_symbol): Likewise.
(value_of_arm_user_reg): Likewise.
* armbsd-tdep.c (armbsd_supply_fpregset): Likewise.
(armbsd_supply_gregset): Likewise.
* auto-load.c (auto_load_pspace_data_cleanup): Likewise.
(get_auto_load_pspace_data): Likewise.
(hash_loaded_script_entry): Likewise.
(eq_loaded_script_entry): Likewise.
(clear_section_scripts): Likewise.
(collect_matching_scripts): Likewise.
* auxv.c (auxv_inferior_data_cleanup): Likewise.
(get_auxv_inferior_data): Likewise.
* avr-tdep.c (avr_frame_unwind_cache): Likewise.
* ax-general.c (do_free_agent_expr_cleanup): Likewise.
* bfd-target.c (target_bfd_xfer_partial): Likewise.
(target_bfd_xclose): Likewise.
(target_bfd_get_section_table): Likewise.
* bfin-tdep.c (bfin_frame_cache): Likewise.
* block.c (find_block_in_blockvector): Likewise.
(call_site_for_pc): Likewise.
(block_find_non_opaque_type_preferred): Likewise.
* break-catch-sig.c (signal_catchpoint_insert_location): Likewise.
(signal_catchpoint_remove_location): Likewise.
(signal_catchpoint_breakpoint_hit): Likewise.
(signal_catchpoint_print_one): Likewise.
(signal_catchpoint_print_mention): Likewise.
(signal_catchpoint_print_recreate): Likewise.
* break-catch-syscall.c (get_catch_syscall_inferior_data): Likewise.
* breakpoint.c (do_cleanup_counted_command_line): Likewise.
(bp_location_compare_addrs): Likewise.
(get_first_locp_gte_addr): Likewise.
(check_tracepoint_command): Likewise.
(do_map_commands_command): Likewise.
(get_breakpoint_objfile_data): Likewise.
(free_breakpoint_probes): Likewise.
(do_captured_breakpoint_query): Likewise.
(compare_breakpoints): Likewise.
(bp_location_compare): Likewise.
(bpstat_remove_breakpoint_callback): Likewise.
(do_delete_breakpoint_cleanup): Likewise.
* bsd-uthread.c (bsd_uthread_set_supply_uthread): Likewise.
(bsd_uthread_set_collect_uthread): Likewise.
(bsd_uthread_activate): Likewise.
(bsd_uthread_fetch_registers): Likewise.
(bsd_uthread_store_registers): Likewise.
* btrace.c (check_xml_btrace_version): Likewise.
(parse_xml_btrace_block): Likewise.
(parse_xml_btrace_pt_config_cpu): Likewise.
(parse_xml_btrace_pt_raw): Likewise.
(parse_xml_btrace_pt): Likewise.
(parse_xml_btrace_conf_bts): Likewise.
(parse_xml_btrace_conf_pt): Likewise.
(do_btrace_data_cleanup): Likewise.
* c-typeprint.c (find_typedef_for_canonicalize): Likewise.
* charset.c (cleanup_iconv): Likewise.
(do_cleanup_iterator): Likewise.
* cli-out.c (cli_uiout_dtor): Likewise.
(cli_table_begin): Likewise.
(cli_table_body): Likewise.
(cli_table_end): Likewise.
(cli_table_header): Likewise.
(cli_begin): Likewise.
(cli_end): Likewise.
(cli_field_int): Likewise.
(cli_field_skip): Likewise.
(cli_field_string): Likewise.
(cli_field_fmt): Likewise.
(cli_spaces): Likewise.
(cli_text): Likewise.
(cli_message): Likewise.
(cli_wrap_hint): Likewise.
(cli_flush): Likewise.
(cli_redirect): Likewise.
(out_field_fmt): Likewise.
(field_separator): Likewise.
(cli_out_set_stream): Likewise.
* cli/cli-cmds.c (compare_symtabs): Likewise.
* cli/cli-dump.c (call_dump_func): Likewise.
(restore_section_callback): Likewise.
* cli/cli-script.c (clear_hook_in_cleanup): Likewise.
(do_restore_user_call_depth): Likewise.
(do_free_command_lines_cleanup): Likewise.
* coff-pe-read.c (get_section_vmas): Likewise.
(pe_as16): Likewise.
(pe_as32): Likewise.
* coffread.c (coff_symfile_read): Likewise.
* common/agent.c (agent_look_up_symbols): Likewise.
* common/filestuff.c (do_close_cleanup): Likewise.
* common/format.c (free_format_pieces_cleanup): Likewise.
* common/vec.c (vec_o_reserve): Likewise.
* compile/compile-c-support.c (print_one_macro): Likewise.
* compile/compile-c-symbols.c (hash_symbol_error): Likewise.
(eq_symbol_error): Likewise.
(del_symbol_error): Likewise.
(error_symbol_once): Likewise.
(gcc_convert_symbol): Likewise.
(gcc_symbol_address): Likewise.
(hash_symname): Likewise.
(eq_symname): Likewise.
* compile/compile-c-types.c (hash_type_map_instance): Likewise.
(eq_type_map_instance): Likewise.
(insert_type): Likewise.
(convert_type): Likewise.
* compile/compile-object-load.c (munmap_listp_free_cleanup): Likewise.
(setup_sections): Likewise.
(link_hash_table_free): Likewise.
(copy_sections): Likewise.
* compile/compile-object-run.c (do_module_cleanup): Likewise.
* compile/compile.c (compile_print_value): Likewise.
(do_rmdir): Likewise.
(cleanup_compile_instance): Likewise.
(cleanup_unlink_file): Likewise.
* completer.c (free_completion_tracker): Likewise.
* corelow.c (add_to_spuid_list): Likewise.
* cp-namespace.c (reset_directive_searched): Likewise.
* cp-support.c (reset_directive_searched): Likewise.
* cris-tdep.c (cris_sigtramp_frame_unwind_cache): Likewise.
(cris_frame_unwind_cache): Likewise.
* d-lang.c (builtin_d_type): Likewise.
* d-namespace.c (reset_directive_searched): Likewise.
* dbxread.c (dbx_free_symfile_info): Likewise.
(do_free_bincl_list_cleanup): Likewise.
* disasm.c (hash_dis_line_entry): Likewise.
(eq_dis_line_entry): Likewise.
(dis_asm_print_address): Likewise.
(fprintf_disasm): Likewise.
(do_ui_file_delete): Likewise.
* doublest.c (convert_floatformat_to_doublest): Likewise.
* dummy-frame.c (pop_dummy_frame_bpt): Likewise.
(dummy_frame_prev_register): Likewise.
(dummy_frame_this_id): Likewise.
* dwarf2-frame-tailcall.c (cache_hash): Likewise.
(cache_eq): Likewise.
(cache_find): Likewise.
(tailcall_frame_this_id): Likewise.
(dwarf2_tailcall_prev_register_first): Likewise.
(tailcall_frame_prev_register): Likewise.
(tailcall_frame_dealloc_cache): Likewise.
(tailcall_frame_prev_arch): Likewise.
* dwarf2-frame.c (dwarf2_frame_state_free): Likewise.
(dwarf2_frame_set_init_reg): Likewise.
(dwarf2_frame_init_reg): Likewise.
(dwarf2_frame_set_signal_frame_p): Likewise.
(dwarf2_frame_signal_frame_p): Likewise.
(dwarf2_frame_set_adjust_regnum): Likewise.
(dwarf2_frame_adjust_regnum): Likewise.
(clear_pointer_cleanup): Likewise.
(dwarf2_frame_cache): Likewise.
(find_cie): Likewise.
(dwarf2_frame_find_fde): Likewise.
* dwarf2expr.c (dwarf_expr_address_type): Likewise.
(free_dwarf_expr_context_cleanup): Likewise.
* dwarf2loc.c (locexpr_find_frame_base_location): Likewise.
(locexpr_get_frame_base): Likewise.
(loclist_find_frame_base_location): Likewise.
(loclist_get_frame_base): Likewise.
(dwarf_expr_dwarf_call): Likewise.
(dwarf_expr_get_base_type): Likewise.
(dwarf_expr_push_dwarf_reg_entry_value): Likewise.
(dwarf_expr_get_obj_addr): Likewise.
(entry_data_value_coerce_ref): Likewise.
(entry_data_value_copy_closure): Likewise.
(entry_data_value_free_closure): Likewise.
(get_frame_address_in_block_wrapper): Likewise.
(dwarf2_evaluate_property): Likewise.
(dwarf2_compile_property_to_c): Likewise.
(needs_frame_read_addr_from_reg): Likewise.
(needs_frame_get_reg_value): Likewise.
(needs_frame_frame_base): Likewise.
(needs_frame_frame_cfa): Likewise.
(needs_frame_tls_address): Likewise.
(needs_frame_dwarf_call): Likewise.
(needs_dwarf_reg_entry_value): Likewise.
(get_ax_pc): Likewise.
(locexpr_read_variable): Likewise.
(locexpr_read_variable_at_entry): Likewise.
(locexpr_read_needs_frame): Likewise.
(locexpr_describe_location): Likewise.
(locexpr_tracepoint_var_ref): Likewise.
(locexpr_generate_c_location): Likewise.
(loclist_read_variable): Likewise.
(loclist_read_variable_at_entry): Likewise.
(loclist_describe_location): Likewise.
(loclist_tracepoint_var_ref): Likewise.
(loclist_generate_c_location): Likewise.
* dwarf2read.c (line_header_hash_voidp): Likewise.
(line_header_eq_voidp): Likewise.
(dwarf2_has_info): Likewise.
(dwarf2_get_section_info): Likewise.
(locate_dwz_sections): Likewise.
(hash_file_name_entry): Likewise.
(eq_file_name_entry): Likewise.
(delete_file_name_entry): Likewise.
(dw2_setup): Likewise.
(dw2_get_file_names_reader): Likewise.
(dw2_find_pc_sect_compunit_symtab): Likewise.
(hash_signatured_type): Likewise.
(eq_signatured_type): Likewise.
(add_signatured_type_cu_to_table): Likewise.
(create_debug_types_hash_table): Likewise.
(lookup_dwo_signatured_type): Likewise.
(lookup_dwp_signatured_type): Likewise.
(lookup_signatured_type): Likewise.
(hash_type_unit_group): Likewise.
(eq_type_unit_group): Likewise.
(get_type_unit_group): Likewise.
(process_psymtab_comp_unit_reader): Likewise.
(sort_tu_by_abbrev_offset): Likewise.
(process_skeletonless_type_unit): Likewise.
(psymtabs_addrmap_cleanup): Likewise.
(dwarf2_read_symtab): Likewise.
(psymtab_to_symtab_1): Likewise.
(die_hash): Likewise.
(die_eq): Likewise.
(load_full_comp_unit_reader): Likewise.
(reset_die_in_process): Likewise.
(free_cu_line_header): Likewise.
(handle_DW_AT_stmt_list): Likewise.
(hash_dwo_file): Likewise.
(eq_dwo_file): Likewise.
(hash_dwo_unit): Likewise.
(eq_dwo_unit): Likewise.
(create_dwo_cu_reader): Likewise.
(create_dwo_unit_in_dwp_v1): Likewise.
(create_dwo_unit_in_dwp_v2): Likewise.
(lookup_dwo_unit_in_dwp): Likewise.
(dwarf2_locate_dwo_sections): Likewise.
(dwarf2_locate_common_dwp_sections): Likewise.
(dwarf2_locate_v2_dwp_sections): Likewise.
(hash_dwp_loaded_cutus): Likewise.
(eq_dwp_loaded_cutus): Likewise.
(lookup_dwo_cutu): Likewise.
(abbrev_table_free_cleanup): Likewise.
(dwarf2_free_abbrev_table): Likewise.
(find_partial_die_in_comp_unit): Likewise.
(free_line_header_voidp): Likewise.
(follow_die_offset): Likewise.
(follow_die_sig_1): Likewise.
(free_heap_comp_unit): Likewise.
(free_stack_comp_unit): Likewise.
(dwarf2_free_objfile): Likewise.
(per_cu_offset_and_type_hash): Likewise.
(per_cu_offset_and_type_eq): Likewise.
(get_die_type_at_offset): Likewise.
(partial_die_hash): Likewise.
(partial_die_eq): Likewise.
(dwarf2_per_objfile_free): Likewise.
(hash_strtab_entry): Likewise.
(eq_strtab_entry): Likewise.
(add_string): Likewise.
(hash_symtab_entry): Likewise.
(eq_symtab_entry): Likewise.
(delete_symtab_entry): Likewise.
(cleanup_mapped_symtab): Likewise.
(add_indices_to_cpool): Likewise.
(hash_psymtab_cu_index): Likewise.
(eq_psymtab_cu_index): Likewise.
(add_address_entry_worker): Likewise.
(unlink_if_set): Likewise.
(write_one_signatured_type): Likewise.
(save_gdb_index_command): Likewise.
* elfread.c (elf_symtab_read): Likewise.
(elf_gnu_ifunc_cache_hash): Likewise.
(elf_gnu_ifunc_cache_eq): Likewise.
(elf_gnu_ifunc_record_cache): Likewise.
(elf_gnu_ifunc_resolve_by_cache): Likewise.
(elf_get_probes): Likewise.
(probe_key_free): Likewise.
* f-lang.c (builtin_f_type): Likewise.
* frame-base.c (frame_base_append_sniffer): Likewise.
(frame_base_set_default): Likewise.
(frame_base_find_by_frame): Likewise.
* frame-unwind.c (frame_unwind_prepend_unwinder): Likewise.
(frame_unwind_append_unwinder): Likewise.
(frame_unwind_find_by_frame): Likewise.
* frame.c (frame_addr_hash): Likewise.
(frame_addr_hash_eq): Likewise.
(frame_stash_find): Likewise.
(do_frame_register_read): Likewise.
(unwind_to_current_frame): Likewise.
(frame_cleanup_after_sniffer): Likewise.
* frv-linux-tdep.c (frv_linux_sigtramp_frame_cache): Likewise.
* frv-tdep.c (frv_frame_unwind_cache): Likewise.
* ft32-tdep.c (ft32_frame_cache): Likewise.
* gcore.c (do_bfd_delete_cleanup): Likewise.
(gcore_create_callback): Likewise.
* gdb_bfd.c (hash_bfd): Likewise.
(eq_bfd): Likewise.
(gdb_bfd_open): Likewise.
(free_one_bfd_section): Likewise.
(gdb_bfd_ref): Likewise.
(gdb_bfd_unref): Likewise.
(get_section_descriptor): Likewise.
(gdb_bfd_map_section): Likewise.
(gdb_bfd_crc): Likewise.
(gdb_bfd_mark_parent): Likewise.
(gdb_bfd_record_inclusion): Likewise.
(gdb_bfd_requires_relocations): Likewise.
(print_one_bfd): Likewise.
* gdbtypes.c (type_pair_hash): Likewise.
(type_pair_eq): Likewise.
(builtin_type): Likewise.
(objfile_type): Likewise.
* gnu-v3-abi.c (vtable_ptrdiff_type): Likewise.
(vtable_address_point_offset): Likewise.
(gnuv3_get_vtable): Likewise.
(hash_value_and_voffset): Likewise.
(eq_value_and_voffset): Likewise.
(compare_value_and_voffset): Likewise.
(compute_vtable_size): Likewise.
(gnuv3_get_typeid_type): Likewise.
* go-lang.c (builtin_go_type): Likewise.
* guile/scm-block.c (bkscm_hash_block_smob): Likewise.
(bkscm_eq_block_smob): Likewise.
(bkscm_objfile_block_map): Likewise.
(bkscm_del_objfile_blocks): Likewise.
* guile/scm-breakpoint.c (bpscm_build_bp_list): Likewise.
* guile/scm-disasm.c (gdbscm_disasm_read_memory_worker): Likewise.
(gdbscm_disasm_print_address): Likewise.
* guile/scm-frame.c (frscm_hash_frame_smob): Likewise.
(frscm_eq_frame_smob): Likewise.
(frscm_inferior_frame_map): Likewise.
(frscm_del_inferior_frames): Likewise.
* guile/scm-gsmob.c (gdbscm_add_objfile_ref): Likewise.
* guile/scm-objfile.c (ofscm_handle_objfile_deleted): Likewise.
(ofscm_objfile_smob_from_objfile): Likewise.
* guile/scm-ports.c (ioscm_write): Likewise.
(ioscm_file_port_delete): Likewise.
(ioscm_file_port_rewind): Likewise.
(ioscm_file_port_put): Likewise.
(ioscm_file_port_write): Likewise.
* guile/scm-progspace.c (psscm_handle_pspace_deleted): Likewise.
(psscm_pspace_smob_from_pspace): Likewise.
* guile/scm-safe-call.c (scscm_recording_pre_unwind_handler): Likewise.
(scscm_recording_unwind_handler): Likewise.
(gdbscm_with_catch): Likewise.
(scscm_call_0_body): Likewise.
(scscm_call_1_body): Likewise.
(scscm_call_2_body): Likewise.
(scscm_call_3_body): Likewise.
(scscm_call_4_body): Likewise.
(scscm_apply_1_body): Likewise.
(scscm_eval_scheme_string): Likewise.
(gdbscm_safe_eval_string): Likewise.
(scscm_source_scheme_script): Likewise.
(gdbscm_safe_source_script): Likewise.
* guile/scm-string.c (gdbscm_call_scm_to_stringn): Likewise.
(gdbscm_call_scm_from_stringn): Likewise.
* guile/scm-symbol.c (syscm_hash_symbol_smob): Likewise.
(syscm_eq_symbol_smob): Likewise.
(syscm_get_symbol_map): Likewise.
(syscm_del_objfile_symbols): Likewise.
* guile/scm-symtab.c (stscm_hash_symtab_smob): Likewise.
(stscm_eq_symtab_smob): Likewise.
(stscm_objfile_symtab_map): Likewise.
(stscm_del_objfile_symtabs): Likewise.
* guile/scm-type.c (tyscm_hash_type_smob): Likewise.
(tyscm_eq_type_smob): Likewise.
(tyscm_type_map): Likewise.
(tyscm_copy_type_recursive): Likewise.
(save_objfile_types): Likewise.
* guile/scm-utils.c (extract_arg): Likewise.
* h8300-tdep.c (h8300_frame_cache): Likewise.
* hppa-linux-tdep.c (hppa_linux_sigtramp_frame_unwind_cache): Likewise.
* hppa-tdep.c (compare_unwind_entries): Likewise.
(find_unwind_entry): Likewise.
(hppa_frame_cache): Likewise.
(hppa_stub_frame_unwind_cache): Likewise.
* hppanbsd-tdep.c (hppanbsd_supply_gregset): Likewise.
* hppaobsd-tdep.c (hppaobsd_supply_gregset): Likewise.
(hppaobsd_supply_fpregset): Likewise.
* i386-cygwin-tdep.c (core_process_module_section): Likewise.
* i386-linux-tdep.c (i386_linux_init_abi): Likewise.
* i386-tdep.c (i386_frame_cache): Likewise.
(i386_epilogue_frame_cache): Likewise.
(i386_sigtramp_frame_cache): Likewise.
(i386_supply_gregset): Likewise.
(i386_collect_gregset): Likewise.
(i386_gdbarch_init): Likewise.
* i386obsd-tdep.c (i386obsd_aout_supply_regset): Likewise.
(i386obsd_trapframe_cache): Likewise.
* i387-tdep.c (i387_supply_fsave): Likewise.
(i387_collect_fsave): Likewise.
(i387_supply_fxsave): Likewise.
(i387_collect_fxsave): Likewise.
(i387_supply_xsave): Likewise.
(i387_collect_xsave): Likewise.
* ia64-tdep.c (ia64_frame_cache): Likewise.
(ia64_sigtramp_frame_cache): Likewise.
* infcmd.c (attach_command_continuation): Likewise.
(attach_command_continuation_free_args): Likewise.
* inferior.c (restore_inferior): Likewise.
(delete_thread_of_inferior): Likewise.
* inflow.c (inflow_inferior_data_cleanup): Likewise.
(get_inflow_inferior_data): Likewise.
(inflow_inferior_exit): Likewise.
* infrun.c (displaced_step_clear_cleanup): Likewise.
(restore_current_uiout_cleanup): Likewise.
(release_stop_context_cleanup): Likewise.
(do_restore_infcall_suspend_state_cleanup): Likewise.
(do_restore_infcall_control_state_cleanup): Likewise.
(restore_inferior_ptid): Likewise.
* inline-frame.c (block_starting_point_at): Likewise.
* iq2000-tdep.c (iq2000_frame_cache): Likewise.
* jit.c (get_jit_objfile_data): Likewise.
(get_jit_program_space_data): Likewise.
(jit_object_close_impl): Likewise.
(jit_find_objf_with_entry_addr): Likewise.
(jit_breakpoint_deleted): Likewise.
(jit_unwind_reg_set_impl): Likewise.
(jit_unwind_reg_get_impl): Likewise.
(jit_dealloc_cache): Likewise.
(jit_frame_sniffer): Likewise.
(jit_frame_prev_register): Likewise.
(jit_prepend_unwinder): Likewise.
(jit_inferior_exit_hook): Likewise.
(free_objfile_data): Likewise.
* jv-lang.c (jv_per_objfile_free): Likewise.
(get_dynamics_objfile): Likewise.
(get_java_class_symtab): Likewise.
(builtin_java_type): Likewise.
* language.c (language_string_char_type): Likewise.
(language_bool_type): Likewise.
(language_lookup_primitive_type): Likewise.
(language_lookup_primitive_type_as_symbol): Likewise.
* linespec.c (hash_address_entry): Likewise.
(eq_address_entry): Likewise.
(iterate_inline_only): Likewise.
(iterate_name_matcher): Likewise.
(decode_line_2_compare_items): Likewise.
(collect_one_symbol): Likewise.
(compare_symbols): Likewise.
(compare_msymbols): Likewise.
(add_symtabs_to_list): Likewise.
(collect_symbols): Likewise.
(compare_msyms): Likewise.
(add_minsym): Likewise.
(cleanup_linespec_result): Likewise.
* linux-fork.c (inferior_call_waitpid_cleanup): Likewise.
* linux-nat.c (delete_lwp_cleanup): Likewise.
(count_events_callback): Likewise.
(select_event_lwp_callback): Likewise.
(resume_stopped_resumed_lwps): Likewise.
* linux-tdep.c (get_linux_gdbarch_data): Likewise.
(invalidate_linux_cache_inf): Likewise.
(get_linux_inferior_data): Likewise.
(linux_find_memory_regions_thunk): Likewise.
(linux_make_mappings_callback): Likewise.
(linux_corefile_thread_callback): Likewise.
(find_mapping_size): Likewise.
* linux-thread-db.c (find_new_threads_callback): Likewise.
* lm32-tdep.c (lm32_frame_cache): Likewise.
* m2-lang.c (builtin_m2_type): Likewise.
* m32c-tdep.c (m32c_analyze_frame_prologue): Likewise.
* m32r-linux-tdep.c (m32r_linux_sigtramp_frame_cache): Likewise.
(m32r_linux_supply_gregset): Likewise.
(m32r_linux_collect_gregset): Likewise.
* m32r-tdep.c (m32r_frame_unwind_cache): Likewise.
* m68hc11-tdep.c (m68hc11_frame_unwind_cache): Likewise.
* m68k-tdep.c (m68k_frame_cache): Likewise.
* m68kbsd-tdep.c (m68kbsd_supply_fpregset): Likewise.
(m68kbsd_supply_gregset): Likewise.
* m68klinux-tdep.c (m68k_linux_sigtramp_frame_cache): Likewise.
* m88k-tdep.c (m88k_frame_cache): Likewise.
(m88k_supply_gregset): Likewise.
gdb/gdbserver/ChangeLog:
* dll.c (match_dll): Add cast(s).
(unloaded_dll): Likewise.
* linux-low.c (second_thread_of_pid_p): Likewise.
(delete_lwp_callback): Likewise.
(count_events_callback): Likewise.
(select_event_lwp_callback): Likewise.
(linux_set_resume_request): Likewise.
* server.c (accumulate_file_name_length): Likewise.
(emit_dll_description): Likewise.
(handle_qxfer_threads_worker): Likewise.
(visit_actioned_threads): Likewise.
* thread-db.c (any_thread_of): Likewise.
* tracepoint.c (same_process_p): Likewise.
(match_blocktype): Likewise.
(build_traceframe_info_xml): Likewise.
gdb/testsuite/ChangeLog:
* gdb.gdb/selftest.exp (do_steps_and_nexts): Adjust expected
source line.
Diffstat (limited to 'gdb/guile')
-rw-r--r-- | gdb/guile/scm-block.c | 10 | ||||
-rw-r--r-- | gdb/guile/scm-breakpoint.c | 2 | ||||
-rw-r--r-- | gdb/guile/scm-disasm.c | 11 | ||||
-rw-r--r-- | gdb/guile/scm-frame.c | 10 | ||||
-rw-r--r-- | gdb/guile/scm-gsmob.c | 2 | ||||
-rw-r--r-- | gdb/guile/scm-objfile.c | 4 | ||||
-rw-r--r-- | gdb/guile/scm-ports.c | 12 | ||||
-rw-r--r-- | gdb/guile/scm-progspace.c | 4 | ||||
-rw-r--r-- | gdb/guile/scm-safe-call.c | 27 | ||||
-rw-r--r-- | gdb/guile/scm-string.c | 4 | ||||
-rw-r--r-- | gdb/guile/scm-symbol.c | 13 | ||||
-rw-r--r-- | gdb/guile/scm-symtab.c | 10 | ||||
-rw-r--r-- | gdb/guile/scm-type.c | 12 | ||||
-rw-r--r-- | gdb/guile/scm-utils.c | 18 |
14 files changed, 72 insertions, 67 deletions
diff --git a/gdb/guile/scm-block.c b/gdb/guile/scm-block.c index c4b367f..87dbd1a 100644 --- a/gdb/guile/scm-block.c +++ b/gdb/guile/scm-block.c @@ -85,7 +85,7 @@ static const struct objfile_data *bkscm_objfile_data_key; static hashval_t bkscm_hash_block_smob (const void *p) { - const block_smob *b_smob = p; + const block_smob *b_smob = (const block_smob *) p; return htab_hash_pointer (b_smob->block); } @@ -95,8 +95,8 @@ bkscm_hash_block_smob (const void *p) static int bkscm_eq_block_smob (const void *ap, const void *bp) { - const block_smob *a = ap; - const block_smob *b = bp; + const block_smob *a = (const block_smob *) ap; + const block_smob *b = (const block_smob *) bp; return (a->block == b->block && a->block != NULL); @@ -108,7 +108,7 @@ bkscm_eq_block_smob (const void *ap, const void *bp) static htab_t bkscm_objfile_block_map (struct objfile *objfile) { - htab_t htab = objfile_data (objfile, bkscm_objfile_data_key); + htab_t htab = (htab_t) objfile_data (objfile, bkscm_objfile_data_key); if (htab == NULL) { @@ -347,7 +347,7 @@ bkscm_mark_block_invalid (void **slot, void *info) static void bkscm_del_objfile_blocks (struct objfile *objfile, void *datum) { - htab_t htab = datum; + htab_t htab = (htab_t) datum; if (htab != NULL) { diff --git a/gdb/guile/scm-breakpoint.c b/gdb/guile/scm-breakpoint.c index eea9b46..83574a3 100644 --- a/gdb/guile/scm-breakpoint.c +++ b/gdb/guile/scm-breakpoint.c @@ -509,7 +509,7 @@ gdbscm_delete_breakpoint_x (SCM self) static int bpscm_build_bp_list (struct breakpoint *bp, void *arg) { - SCM *list = arg; + SCM *list = (SCM *) arg; breakpoint_smob *bp_smob = bp->scm_bp_object; /* Lazily create wrappers for breakpoints created outside Scheme. */ diff --git a/gdb/guile/scm-disasm.c b/gdb/guile/scm-disasm.c index fe37a38..d1572c7 100644 --- a/gdb/guile/scm-disasm.c +++ b/gdb/guile/scm-disasm.c @@ -79,9 +79,11 @@ dascm_make_insn (CORE_ADDR pc, const char *assembly, int insn_len) static void * gdbscm_disasm_read_memory_worker (void *datap) { - struct gdbscm_disasm_read_data *data = datap; + struct gdbscm_disasm_read_data *data + = (struct gdbscm_disasm_read_data *) datap; struct disassemble_info *dinfo = data->dinfo; - struct gdbscm_disasm_data *disasm_data = dinfo->application_data; + struct gdbscm_disasm_data *disasm_data + = (struct gdbscm_disasm_data *) dinfo->application_data; SCM seekto, newpos, port = disasm_data->port; size_t bytes_read; @@ -141,10 +143,11 @@ gdbscm_disasm_memory_error (int status, bfd_vma memaddr, static void gdbscm_disasm_print_address (bfd_vma addr, struct disassemble_info *info) { - struct gdbscm_disasm_data *data = info->application_data; + struct gdbscm_disasm_data *data + = (struct gdbscm_disasm_data *) info->application_data; struct gdbarch *gdbarch = data->gdbarch; - print_address (gdbarch, addr, info->stream); + print_address (gdbarch, addr, (struct ui_file *) info->stream); } /* Subroutine of gdbscm_arch_disassemble to simplify it. diff --git a/gdb/guile/scm-frame.c b/gdb/guile/scm-frame.c index 38e1448..24e26e8 100644 --- a/gdb/guile/scm-frame.c +++ b/gdb/guile/scm-frame.c @@ -84,7 +84,7 @@ static const struct inferior_data *frscm_inferior_data_key; static hashval_t frscm_hash_frame_smob (const void *p) { - const frame_smob *f_smob = p; + const frame_smob *f_smob = (const frame_smob *) p; const struct frame_id *fid = &f_smob->frame_id; hashval_t hash = htab_hash_pointer (f_smob->inferior); @@ -104,8 +104,8 @@ frscm_hash_frame_smob (const void *p) static int frscm_eq_frame_smob (const void *ap, const void *bp) { - const frame_smob *a = ap; - const frame_smob *b = bp; + const frame_smob *a = (const frame_smob *) ap; + const frame_smob *b = (const frame_smob *) bp; return (frame_id_eq (a->frame_id, b->frame_id) && a->inferior == b->inferior @@ -118,7 +118,7 @@ frscm_eq_frame_smob (const void *ap, const void *bp) static htab_t frscm_inferior_frame_map (struct inferior *inferior) { - htab_t htab = inferior_data (inferior, frscm_inferior_data_key); + htab_t htab = (htab_t) inferior_data (inferior, frscm_inferior_data_key); if (htab == NULL) { @@ -379,7 +379,7 @@ frscm_mark_frame_invalid (void **slot, void *info) static void frscm_del_inferior_frames (struct inferior *inferior, void *datum) { - htab_t htab = datum; + htab_t htab = (htab_t) datum; if (htab != NULL) { diff --git a/gdb/guile/scm-gsmob.c b/gdb/guile/scm-gsmob.c index 52368e9..504ea6c 100644 --- a/gdb/guile/scm-gsmob.c +++ b/gdb/guile/scm-gsmob.c @@ -193,7 +193,7 @@ gdbscm_add_objfile_ref (struct objfile *objfile, g_smob->prev = NULL; if (objfile != NULL) { - g_smob->next = objfile_data (objfile, data_key); + g_smob->next = (chained_gdb_smob *) objfile_data (objfile, data_key); if (g_smob->next) g_smob->next->prev = g_smob; set_objfile_data (objfile, data_key, g_smob); diff --git a/gdb/guile/scm-objfile.c b/gdb/guile/scm-objfile.c index 0af151d..f85975e 100644 --- a/gdb/guile/scm-objfile.c +++ b/gdb/guile/scm-objfile.c @@ -116,7 +116,7 @@ ofscm_release_objfile (objfile_smob *o_smob) static void ofscm_handle_objfile_deleted (struct objfile *objfile, void *datum) { - objfile_smob *o_smob = datum; + objfile_smob *o_smob = (objfile_smob *) datum; gdb_assert (o_smob->objfile == objfile); @@ -148,7 +148,7 @@ ofscm_objfile_smob_from_objfile (struct objfile *objfile) { objfile_smob *o_smob; - o_smob = objfile_data (objfile, ofscm_objfile_data_key); + o_smob = (objfile_smob *) objfile_data (objfile, ofscm_objfile_data_key); if (o_smob == NULL) { SCM o_scm = ofscm_make_objfile_smob (); diff --git a/gdb/guile/scm-ports.c b/gdb/guile/scm-ports.c index 280e6d4..90bdb39 100644 --- a/gdb/guile/scm-ports.c +++ b/gdb/guile/scm-ports.c @@ -269,9 +269,9 @@ ioscm_write (SCM port, const void *data, size_t size) TRY { if (scm_is_eq (port, error_port_scm)) - fputsn_filtered (data, size, gdb_stderr); + fputsn_filtered ((const char *) data, size, gdb_stderr); else - fputsn_filtered (data, size, gdb_stdout); + fputsn_filtered ((const char *) data, size, gdb_stdout); } CATCH (except, RETURN_MASK_ALL) { @@ -430,7 +430,7 @@ gdbscm_error_port (void) static void ioscm_file_port_delete (struct ui_file *file) { - ioscm_file_port *stream = ui_file_data (file); + ioscm_file_port *stream = (ioscm_file_port *) ui_file_data (file); if (stream->magic != &file_port_magic) internal_error (__FILE__, __LINE__, @@ -441,7 +441,7 @@ ioscm_file_port_delete (struct ui_file *file) static void ioscm_file_port_rewind (struct ui_file *file) { - ioscm_file_port *stream = ui_file_data (file); + ioscm_file_port *stream = (ioscm_file_port *) ui_file_data (file); if (stream->magic != &file_port_magic) internal_error (__FILE__, __LINE__, @@ -455,7 +455,7 @@ ioscm_file_port_put (struct ui_file *file, ui_file_put_method_ftype *write, void *dest) { - ioscm_file_port *stream = ui_file_data (file); + ioscm_file_port *stream = (ioscm_file_port *) ui_file_data (file); if (stream->magic != &file_port_magic) internal_error (__FILE__, __LINE__, @@ -469,7 +469,7 @@ ioscm_file_port_write (struct ui_file *file, const char *buffer, long length_buffer) { - ioscm_file_port *stream = ui_file_data (file); + ioscm_file_port *stream = (ioscm_file_port *) ui_file_data (file); if (stream->magic != &file_port_magic) internal_error (__FILE__, __LINE__, diff --git a/gdb/guile/scm-progspace.c b/gdb/guile/scm-progspace.c index a95e834..32c3206 100644 --- a/gdb/guile/scm-progspace.c +++ b/gdb/guile/scm-progspace.c @@ -126,7 +126,7 @@ psscm_release_pspace (pspace_smob *p_smob) static void psscm_handle_pspace_deleted (struct program_space *pspace, void *datum) { - pspace_smob *p_smob = datum; + pspace_smob *p_smob = (pspace_smob *) datum; gdb_assert (p_smob->pspace == pspace); @@ -158,7 +158,7 @@ psscm_pspace_smob_from_pspace (struct program_space *pspace) { pspace_smob *p_smob; - p_smob = program_space_data (pspace, psscm_pspace_data_key); + p_smob = (pspace_smob *) program_space_data (pspace, psscm_pspace_data_key); if (p_smob == NULL) { SCM p_scm = psscm_make_pspace_smob (); diff --git a/gdb/guile/scm-safe-call.c b/gdb/guile/scm-safe-call.c index 6052214..62aec0f 100644 --- a/gdb/guile/scm-safe-call.c +++ b/gdb/guile/scm-safe-call.c @@ -97,7 +97,7 @@ scscm_nop_unwind_handler (void *data, SCM key, SCM args) static SCM scscm_recording_pre_unwind_handler (void *datap, SCM key, SCM args) { - struct with_catch_data *data = datap; + struct with_catch_data *data = (struct with_catch_data *) datap; excp_matcher_func *matcher = data->excp_matcher; if (matcher != NULL && matcher (key)) @@ -126,7 +126,7 @@ scscm_recording_pre_unwind_handler (void *datap, SCM key, SCM args) static SCM scscm_recording_unwind_handler (void *datap, SCM key, SCM args) { - struct with_catch_data *data = datap; + struct with_catch_data *data = (struct with_catch_data *) datap; /* We need to record the stack in the exception since we're about to throw and lose the location that got the exception. We do this by @@ -147,7 +147,7 @@ scscm_recording_unwind_handler (void *datap, SCM key, SCM args) static void * gdbscm_with_catch (void *data) { - struct with_catch_data *d = data; + struct with_catch_data *d = (struct with_catch_data *) data; d->catch_result = scm_c_catch (SCM_BOOL_T, @@ -230,7 +230,7 @@ gdbscm_call_guile (SCM (*func) (void *), void *data, static SCM scscm_call_0_body (void *argsp) { - SCM *args = argsp; + SCM *args = (SCM *) argsp; return scm_call_0 (args[0]); } @@ -248,7 +248,7 @@ gdbscm_safe_call_0 (SCM proc, excp_matcher_func *ok_excps) static SCM scscm_call_1_body (void *argsp) { - SCM *args = argsp; + SCM *args = (SCM *) argsp; return scm_call_1 (args[0], args[1]); } @@ -266,7 +266,7 @@ gdbscm_safe_call_1 (SCM proc, SCM arg0, excp_matcher_func *ok_excps) static SCM scscm_call_2_body (void *argsp) { - SCM *args = argsp; + SCM *args = (SCM *) argsp; return scm_call_2 (args[0], args[1], args[2]); } @@ -284,7 +284,7 @@ gdbscm_safe_call_2 (SCM proc, SCM arg0, SCM arg1, excp_matcher_func *ok_excps) static SCM scscm_call_3_body (void *argsp) { - SCM *args = argsp; + SCM *args = (SCM *) argsp; return scm_call_3 (args[0], args[1], args[2], args[3]); } @@ -303,7 +303,7 @@ gdbscm_safe_call_3 (SCM proc, SCM arg1, SCM arg2, SCM arg3, static SCM scscm_call_4_body (void *argsp) { - SCM *args = argsp; + SCM *args = (SCM *) argsp; return scm_call_4 (args[0], args[1], args[2], args[3], args[4]); } @@ -322,7 +322,7 @@ gdbscm_safe_call_4 (SCM proc, SCM arg1, SCM arg2, SCM arg3, SCM arg4, static SCM scscm_apply_1_body (void *argsp) { - SCM *args = argsp; + SCM *args = (SCM *) argsp; return scm_apply_1 (args[0], args[1], args[2]); } @@ -372,7 +372,8 @@ struct eval_scheme_string_data static void * scscm_eval_scheme_string (void *datap) { - struct eval_scheme_string_data *data = datap; + struct eval_scheme_string_data *data + = (struct eval_scheme_string_data *) datap; SCM result = scm_c_eval_string (data->string); if (data->display_result && !scm_is_eq (result, SCM_UNSPECIFIED)) @@ -402,7 +403,7 @@ gdbscm_safe_eval_string (const char *string, int display_result) result = gdbscm_with_guile (scscm_eval_scheme_string, (void *) &data); if (result != NULL) - return xstrdup (result); + return xstrdup ((char *) result); return NULL; } @@ -413,7 +414,7 @@ gdbscm_safe_eval_string (const char *string, int display_result) static void * scscm_source_scheme_script (void *data) { - const char *filename = data; + const char *filename = (const char *) data; /* The Guile docs don't specify what the result is. Maybe it's SCM_UNSPECIFIED, but the docs should specify that. :-) */ @@ -451,7 +452,7 @@ gdbscm_safe_source_script (const char *filename) xfree (abs_filename); if (result != NULL) - return xstrdup (result); + return xstrdup ((char *) result); return NULL; } diff --git a/gdb/guile/scm-string.c b/gdb/guile/scm-string.c index c55da90..e6cb1d1 100644 --- a/gdb/guile/scm-string.c +++ b/gdb/guile/scm-string.c @@ -93,7 +93,7 @@ struct scm_to_stringn_data static SCM gdbscm_call_scm_to_stringn (void *datap) { - struct scm_to_stringn_data *data = datap; + struct scm_to_stringn_data *data = (struct scm_to_stringn_data *) datap; data->result = scm_to_stringn (data->string, data->lenp, data->charset, data->conversion_kind); @@ -161,7 +161,7 @@ struct scm_from_stringn_data static SCM gdbscm_call_scm_from_stringn (void *datap) { - struct scm_from_stringn_data *data = datap; + struct scm_from_stringn_data *data = (struct scm_from_stringn_data *) datap; data->result = scm_from_stringn (data->string, data->len, data->charset, data->conversion_kind); diff --git a/gdb/guile/scm-symbol.c b/gdb/guile/scm-symbol.c index f711a02..81e4d50 100644 --- a/gdb/guile/scm-symbol.c +++ b/gdb/guile/scm-symbol.c @@ -65,7 +65,7 @@ struct syscm_gdbarch_data static hashval_t syscm_hash_symbol_smob (const void *p) { - const symbol_smob *s_smob = p; + const symbol_smob *s_smob = (const symbol_smob *) p; return htab_hash_pointer (s_smob->symbol); } @@ -75,8 +75,8 @@ syscm_hash_symbol_smob (const void *p) static int syscm_eq_symbol_smob (const void *ap, const void *bp) { - const symbol_smob *a = ap; - const symbol_smob *b = bp; + const symbol_smob *a = (const symbol_smob *) ap; + const symbol_smob *b = (const symbol_smob *) bp; return (a->symbol == b->symbol && a->symbol != NULL); @@ -105,7 +105,7 @@ syscm_get_symbol_map (struct symbol *symbol) { struct objfile *objfile = symbol_objfile (symbol); - htab = objfile_data (objfile, syscm_objfile_data_key); + htab = (htab_t) objfile_data (objfile, syscm_objfile_data_key); if (htab == NULL) { htab = gdbscm_create_eqable_gsmob_ptr_map (syscm_hash_symbol_smob, @@ -116,7 +116,8 @@ syscm_get_symbol_map (struct symbol *symbol) else { struct gdbarch *gdbarch = symbol_arch (symbol); - struct syscm_gdbarch_data *data = gdbarch_data (gdbarch, + struct syscm_gdbarch_data *data + = (struct syscm_gdbarch_data *) gdbarch_data (gdbarch, syscm_gdbarch_data_key); htab = data->htab; @@ -311,7 +312,7 @@ syscm_mark_symbol_invalid (void **slot, void *info) static void syscm_del_objfile_symbols (struct objfile *objfile, void *datum) { - htab_t htab = datum; + htab_t htab = (htab_t) datum; if (htab != NULL) { diff --git a/gdb/guile/scm-symtab.c b/gdb/guile/scm-symtab.c index 6d16b27..6b6edca 100644 --- a/gdb/guile/scm-symtab.c +++ b/gdb/guile/scm-symtab.c @@ -86,7 +86,7 @@ static const struct objfile_data *stscm_objfile_data_key; static hashval_t stscm_hash_symtab_smob (const void *p) { - const symtab_smob *st_smob = p; + const symtab_smob *st_smob = (const symtab_smob *) p; return htab_hash_pointer (st_smob->symtab); } @@ -96,8 +96,8 @@ stscm_hash_symtab_smob (const void *p) static int stscm_eq_symtab_smob (const void *ap, const void *bp) { - const symtab_smob *a = ap; - const symtab_smob *b = bp; + const symtab_smob *a = (const symtab_smob *) ap; + const symtab_smob *b = (const symtab_smob *) bp; return (a->symtab == b->symtab && a->symtab != NULL); @@ -110,7 +110,7 @@ static htab_t stscm_objfile_symtab_map (struct symtab *symtab) { struct objfile *objfile = SYMTAB_OBJFILE (symtab); - htab_t htab = objfile_data (objfile, stscm_objfile_data_key); + htab_t htab = (htab_t) objfile_data (objfile, stscm_objfile_data_key); if (htab == NULL) { @@ -292,7 +292,7 @@ stscm_mark_symtab_invalid (void **slot, void *info) static void stscm_del_objfile_symtabs (struct objfile *objfile, void *datum) { - htab_t htab = datum; + htab_t htab = (htab_t) datum; if (htab != NULL) { diff --git a/gdb/guile/scm-type.c b/gdb/guile/scm-type.c index 11b355d..642ce15 100644 --- a/gdb/guile/scm-type.c +++ b/gdb/guile/scm-type.c @@ -139,7 +139,7 @@ tyscm_type_name (struct type *type, SCM *excp) static hashval_t tyscm_hash_type_smob (const void *p) { - const type_smob *t_smob = p; + const type_smob *t_smob = (const type_smob *) p; return htab_hash_pointer (t_smob->type); } @@ -149,8 +149,8 @@ tyscm_hash_type_smob (const void *p) static int tyscm_eq_type_smob (const void *ap, const void *bp) { - const type_smob *a = ap; - const type_smob *b = bp; + const type_smob *a = (const type_smob *) ap; + const type_smob *b = (const type_smob *) bp; return (a->type == b->type && a->type != NULL); @@ -170,7 +170,7 @@ tyscm_type_map (struct type *type) if (objfile == NULL) return global_types_map; - htab = objfile_data (objfile, tyscm_objfile_data_key); + htab = (htab_t) objfile_data (objfile, tyscm_objfile_data_key); if (htab == NULL) { htab = gdbscm_create_eqable_gsmob_ptr_map (tyscm_hash_type_smob, @@ -353,7 +353,7 @@ static int tyscm_copy_type_recursive (void **slot, void *info) { type_smob *t_smob = (type_smob *) *slot; - htab_t copied_types = info; + htab_t copied_types = (htab_t) info; struct objfile *objfile = TYPE_OBJFILE (t_smob->type); htab_t htab; eqable_gdb_smob **new_slot; @@ -388,7 +388,7 @@ tyscm_copy_type_recursive (void **slot, void *info) static void save_objfile_types (struct objfile *objfile, void *datum) { - htab_t htab = datum; + htab_t htab = (htab_t) datum; htab_t copied_types; if (!gdb_scheme_initialized) diff --git a/gdb/guile/scm-utils.c b/gdb/guile/scm-utils.c index da45a05..872a1ee 100644 --- a/gdb/guile/scm-utils.c +++ b/gdb/guile/scm-utils.c @@ -201,7 +201,7 @@ extract_arg (char format_char, SCM arg, void *argp, { case 's': { - char **arg_ptr = argp; + char **arg_ptr = (char **) argp; CHECK_TYPE (gdbscm_is_true (scm_string_p (arg)), arg, position, func_name, _("string")); @@ -210,7 +210,7 @@ extract_arg (char format_char, SCM arg, void *argp, } case 't': { - int *arg_ptr = argp; + int *arg_ptr = (int *) argp; /* While in Scheme, anything non-#f is "true", we're strict. */ CHECK_TYPE (gdbscm_is_bool (arg), arg, position, func_name, @@ -220,7 +220,7 @@ extract_arg (char format_char, SCM arg, void *argp, } case 'i': { - int *arg_ptr = argp; + int *arg_ptr = (int *) argp; CHECK_TYPE (scm_is_signed_integer (arg, INT_MIN, INT_MAX), arg, position, func_name, _("int")); @@ -229,7 +229,7 @@ extract_arg (char format_char, SCM arg, void *argp, } case 'u': { - int *arg_ptr = argp; + int *arg_ptr = (int *) argp; CHECK_TYPE (scm_is_unsigned_integer (arg, 0, UINT_MAX), arg, position, func_name, _("unsigned int")); @@ -238,7 +238,7 @@ extract_arg (char format_char, SCM arg, void *argp, } case 'l': { - long *arg_ptr = argp; + long *arg_ptr = (long *) argp; CHECK_TYPE (scm_is_signed_integer (arg, LONG_MIN, LONG_MAX), arg, position, func_name, _("long")); @@ -247,7 +247,7 @@ extract_arg (char format_char, SCM arg, void *argp, } case 'n': { - unsigned long *arg_ptr = argp; + unsigned long *arg_ptr = (unsigned long *) argp; CHECK_TYPE (scm_is_unsigned_integer (arg, 0, ULONG_MAX), arg, position, func_name, _("unsigned long")); @@ -256,7 +256,7 @@ extract_arg (char format_char, SCM arg, void *argp, } case 'L': { - LONGEST *arg_ptr = argp; + LONGEST *arg_ptr = (LONGEST *) argp; CHECK_TYPE (scm_is_signed_integer (arg, INT64_MIN, INT64_MAX), arg, position, func_name, _("LONGEST")); @@ -265,7 +265,7 @@ extract_arg (char format_char, SCM arg, void *argp, } case 'U': { - ULONGEST *arg_ptr = argp; + ULONGEST *arg_ptr = (ULONGEST *) argp; CHECK_TYPE (scm_is_unsigned_integer (arg, 0, UINT64_MAX), arg, position, func_name, _("ULONGEST")); @@ -274,7 +274,7 @@ extract_arg (char format_char, SCM arg, void *argp, } case 'O': { - SCM *arg_ptr = argp; + SCM *arg_ptr = (SCM *) argp; *arg_ptr = arg; break; |