projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
* vax-tdep.h (vax_regnum): Add VAX_R0_REGNUM and VAX_R1_REGNUM.
[deliverable/binutils-gdb.git] / gdb / gdbarch.c
CommitLineData
59233f88
AC		 1/* *INDENT-OFF* */ /* THIS FILE IS GENERATED */
2
adf40b2e 3/* Dynamic architecture support for GDB, the GNU debugger.
79d45cd4
AC		 4
5 Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free
6 Software Foundation, Inc.
c906108c 7
96baa820
JM		 8 This file is part of GDB.
9
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2 of the License, or
13 (at your option) any later version.
c906108c 14
96baa820
JM		 15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
c906108c 19
96baa820
JM		 20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 59 Temple Place - Suite 330,
23 Boston, MA 02111-1307, USA. */
adf40b2e 24
104c1213
JM		 25/* This file was created with the aid of ``gdbarch.sh''.
26
52204a0b 27 The Bourne shell script ``gdbarch.sh'' creates the files
104c1213
JM		 28 ``new-gdbarch.c'' and ``new-gdbarch.h and then compares them
29 against the existing ``gdbarch.[hc]''. Any differences found
30 being reported.
31
32 If editing this file, please also run gdbarch.sh and merge any
52204a0b 33 changes into that script. Conversely, when making sweeping changes
104c1213
JM		 34 to this file, modifying gdbarch.sh and using its output may prove
35 easier. */
c906108c 36
c906108c
SS		 37
38#include "defs.h"
1ad03bde 39#include "arch-utils.h"
c906108c 40
0f71a2f6 41#include "gdbcmd.h"
adf40b2e 42#include "inferior.h" /* enum CALL_DUMMY_LOCATION et.al. */
7a292a7a 43#include "symcat.h"
c906108c 44
f0d4cc9e 45#include "floatformat.h"
c906108c 46
95160752 47#include "gdb_assert.h"
b66d6d2e 48#include "gdb_string.h"
67c2c32c 49#include "gdb-events.h"
b59ff9d5 50#include "reggroups.h"
4be87837 51#include "osabi.h"
aebd7893 52#include "gdb_obstack.h"
95160752 53
104c1213
JM		 54/* Static function declarations */
55
b3cc3077 56static void alloc_gdbarch_data (struct gdbarch *);
104c1213 57
0f71a2f6
JM		 58/* Non-zero if we want to trace architecture code. */
59
60#ifndef GDBARCH_DEBUG
61#define GDBARCH_DEBUG 0
62#endif
63int gdbarch_debug = GDBARCH_DEBUG;
64
65
66/* Maintain the struct gdbarch object */
67
68struct gdbarch
adf40b2e 69{
76860b5f
AC		 70 /* Has this architecture been fully initialized? */
71 int initialized_p;
aebd7893
AC		 72
73 /* An obstack bound to the lifetime of the architecture. */
74 struct obstack *obstack;
75
adf40b2e
JM		 76 /* basic architectural information */
77 const struct bfd_arch_info * bfd_arch_info;
78 int byte_order;
4be87837 79 enum gdb_osabi osabi;
0f71a2f6 80
adf40b2e
JM		 81 /* target specific vector. */
82 struct gdbarch_tdep *tdep;
4b9b3959 83 gdbarch_dump_tdep_ftype *dump_tdep;
0f71a2f6 84
adf40b2e 85 /* per-architecture data-pointers */
95160752 86 unsigned nr_data;
adf40b2e 87 void **data;
0f71a2f6 88
adf40b2e
JM		 89 /* per-architecture swap-regions */
90 struct gdbarch_swap *swap;
0f71a2f6 91
adf40b2e 92 /* Multi-arch values.
0f71a2f6 93
adf40b2e 94 When extending this structure you must:
0f71a2f6 95
adf40b2e 96 Add the field below.
0f71a2f6 97
adf40b2e
JM		 98 Declare set/get functions and define the corresponding
99 macro in gdbarch.h.
0f71a2f6 100
adf40b2e
JM		 101 gdbarch_alloc(): If zero/NULL is not a suitable default,
102 initialize the new field.
0f71a2f6 103
adf40b2e
JM		 104 verify_gdbarch(): Confirm that the target updated the field
105 correctly.
0f71a2f6 106
7e73cedf 107 gdbarch_dump(): Add a fprintf_unfiltered call so that the new
adf40b2e 108 field is dumped out
0f71a2f6 109
c0e8c252 110 ``startup_gdbarch()'': Append an initial value to the static
adf40b2e 111 variable (base values on the host's c-type system).
0f71a2f6 112
adf40b2e
JM		 113 get_gdbarch(): Implement the set/get functions (probably using
114 the macro's as shortcuts).
0f71a2f6
JM		 115
116 */
117
adf40b2e
JM		 118 int short_bit;
119 int int_bit;
120 int long_bit;
121 int long_long_bit;
122 int float_bit;
123 int double_bit;
124 int long_double_bit;
66b43ecb 125 int ptr_bit;
52204a0b 126 int addr_bit;
66b43ecb 127 int bfd_vma_bit;
4e409299 128 int char_signed;
adf40b2e
JM		 129 gdbarch_read_pc_ftype *read_pc;
130 gdbarch_write_pc_ftype *write_pc;
adf40b2e 131 gdbarch_read_sp_ftype *read_sp;
39d4ef09 132 gdbarch_virtual_frame_pointer_ftype *virtual_frame_pointer;
d8124050
AC		 133 gdbarch_pseudo_register_read_ftype *pseudo_register_read;
134 gdbarch_pseudo_register_write_ftype *pseudo_register_write;
adf40b2e 135 int num_regs;
0aba1244 136 int num_pseudo_regs;
adf40b2e 137 int sp_regnum;
adf40b2e 138 int pc_regnum;
c2169756 139 int ps_regnum;
60054393 140 int fp0_regnum;
88c72b7d
AC		 141 gdbarch_stab_reg_to_regnum_ftype *stab_reg_to_regnum;
142 gdbarch_ecoff_reg_to_regnum_ftype *ecoff_reg_to_regnum;
143 gdbarch_dwarf_reg_to_regnum_ftype *dwarf_reg_to_regnum;
144 gdbarch_sdb_reg_to_regnum_ftype *sdb_reg_to_regnum;
145 gdbarch_dwarf2_reg_to_regnum_ftype *dwarf2_reg_to_regnum;
adf40b2e 146 gdbarch_register_name_ftype *register_name;
9c04cab7
AC		 147 gdbarch_register_type_ftype *register_type;
148 gdbarch_deprecated_register_virtual_type_ftype *deprecated_register_virtual_type;
b8b527c5 149 int deprecated_register_bytes;
9c04cab7
AC		 150 gdbarch_deprecated_register_byte_ftype *deprecated_register_byte;
151 gdbarch_deprecated_register_raw_size_ftype *deprecated_register_raw_size;
152 gdbarch_deprecated_register_virtual_size_ftype *deprecated_register_virtual_size;
a0ed5532 153 int deprecated_max_register_raw_size;
a0ed5532 154 int deprecated_max_register_virtual_size;
f3be58bc 155 gdbarch_unwind_dummy_id_ftype *unwind_dummy_id;
a59fe496 156 gdbarch_deprecated_save_dummy_frame_tos_ftype *deprecated_save_dummy_frame_tos;
f3be58bc
AC		 157 int deprecated_fp_regnum;
158 gdbarch_deprecated_target_read_fp_ftype *deprecated_target_read_fp;
b8de8283
AC		 159 gdbarch_push_dummy_call_ftype *push_dummy_call;
160 gdbarch_deprecated_push_arguments_ftype *deprecated_push_arguments;
07555a72 161 int deprecated_use_generic_dummy_frames;
b8de8283
AC		 162 gdbarch_deprecated_push_return_address_ftype *deprecated_push_return_address;
163 gdbarch_deprecated_dummy_write_sp_ftype *deprecated_dummy_write_sp;
164 int deprecated_register_size;
adf40b2e 165 int call_dummy_location;
b1e29e33
AC		 166 CORE_ADDR deprecated_call_dummy_start_offset;
167 CORE_ADDR deprecated_call_dummy_breakpoint_offset;
b1e29e33
AC		 168 LONGEST * deprecated_call_dummy_words;
169 int deprecated_sizeof_call_dummy_words;
b1e29e33 170 gdbarch_deprecated_fix_call_dummy_ftype *deprecated_fix_call_dummy;
7043d8dc 171 gdbarch_push_dummy_code_ftype *push_dummy_code;
b8de8283 172 gdbarch_deprecated_push_dummy_frame_ftype *deprecated_push_dummy_frame;
b8de8283
AC		 173 gdbarch_deprecated_do_registers_info_ftype *deprecated_do_registers_info;
174 gdbarch_print_registers_info_ftype *print_registers_info;
175 gdbarch_print_float_info_ftype *print_float_info;
176 gdbarch_print_vector_info_ftype *print_vector_info;
177 gdbarch_register_sim_regno_ftype *register_sim_regno;
178 gdbarch_register_bytes_ok_ftype *register_bytes_ok;
179 gdbarch_cannot_fetch_register_ftype *cannot_fetch_register;
180 gdbarch_cannot_store_register_ftype *cannot_store_register;
181 gdbarch_get_longjmp_target_ftype *get_longjmp_target;
182 gdbarch_deprecated_pc_in_call_dummy_ftype *deprecated_pc_in_call_dummy;
a5afb99f 183 gdbarch_deprecated_init_frame_pc_ftype *deprecated_init_frame_pc;
adf40b2e
JM		 184 int believe_pcc_promotion;
185 int believe_pcc_promotion_type;
129c1cd6 186 gdbarch_deprecated_get_saved_register_ftype *deprecated_get_saved_register;
781a750d
AC		 187 gdbarch_deprecated_register_convertible_ftype *deprecated_register_convertible;
188 gdbarch_deprecated_register_convert_to_virtual_ftype *deprecated_register_convert_to_virtual;
189 gdbarch_deprecated_register_convert_to_raw_ftype *deprecated_register_convert_to_raw;
13d01224
AC		 190 gdbarch_convert_register_p_ftype *convert_register_p;
191 gdbarch_register_to_value_ftype *register_to_value;
192 gdbarch_value_to_register_ftype *value_to_register;
4478b372
JB		 193 gdbarch_pointer_to_address_ftype *pointer_to_address;
194 gdbarch_address_to_pointer_ftype *address_to_pointer;
fc0c74b1 195 gdbarch_integer_to_address_ftype *integer_to_address;
749b82f6 196 gdbarch_deprecated_pop_frame_ftype *deprecated_pop_frame;
4183d812 197 gdbarch_deprecated_store_struct_return_ftype *deprecated_store_struct_return;
92ad9cd9
AC		 198 gdbarch_return_value_ftype *return_value;
199 gdbarch_return_value_on_stack_ftype *return_value_on_stack;
ebba8386 200 gdbarch_extract_return_value_ftype *extract_return_value;
adf40b2e 201 gdbarch_store_return_value_ftype *store_return_value;
ebba8386
AC		 202 gdbarch_deprecated_extract_return_value_ftype *deprecated_extract_return_value;
203 gdbarch_deprecated_store_return_value_ftype *deprecated_store_return_value;
92ad9cd9 204 gdbarch_use_struct_convention_ftype *use_struct_convention;
74055713 205 gdbarch_deprecated_extract_struct_value_address_ftype *deprecated_extract_struct_value_address;
f30ee0bc 206 gdbarch_deprecated_frame_init_saved_regs_ftype *deprecated_frame_init_saved_regs;
e9582e71 207 gdbarch_deprecated_init_extra_frame_info_ftype *deprecated_init_extra_frame_info;
adf40b2e
JM		 208 gdbarch_skip_prologue_ftype *skip_prologue;
209 gdbarch_inner_than_ftype *inner_than;
210 gdbarch_breakpoint_from_pc_ftype *breakpoint_from_pc;
a1131521 211 gdbarch_adjust_breakpoint_address_ftype *adjust_breakpoint_address;
917317f4
JM		 212 gdbarch_memory_insert_breakpoint_ftype *memory_insert_breakpoint;
213 gdbarch_memory_remove_breakpoint_ftype *memory_remove_breakpoint;
adf40b2e
JM		 214 CORE_ADDR decr_pc_after_break;
215 CORE_ADDR function_start_offset;
216 gdbarch_remote_translate_xfer_address_ftype *remote_translate_xfer_address;
217 CORE_ADDR frame_args_skip;
19772a2c 218 gdbarch_deprecated_frameless_function_invocation_ftype *deprecated_frameless_function_invocation;
618ce49f
AC		 219 gdbarch_deprecated_frame_chain_ftype *deprecated_frame_chain;
220 gdbarch_deprecated_frame_chain_valid_ftype *deprecated_frame_chain_valid;
8bedc050 221 gdbarch_deprecated_frame_saved_pc_ftype *deprecated_frame_saved_pc;
12cc2063 222 gdbarch_unwind_pc_ftype *unwind_pc;
a9e5fdc2 223 gdbarch_unwind_sp_ftype *unwind_sp;
42efa47a
AC		 224 gdbarch_deprecated_frame_args_address_ftype *deprecated_frame_args_address;
225 gdbarch_deprecated_frame_locals_address_ftype *deprecated_frame_locals_address;
6913c89a 226 gdbarch_deprecated_saved_pc_after_call_ftype *deprecated_saved_pc_after_call;
adf40b2e 227 gdbarch_frame_num_args_ftype *frame_num_args;
f27dd7fd 228 gdbarch_deprecated_stack_align_ftype *deprecated_stack_align;
dc604539 229 gdbarch_frame_align_ftype *frame_align;
88d89dbb 230 gdbarch_deprecated_reg_struct_has_addr_ftype *deprecated_reg_struct_has_addr;
192cb3d4 231 gdbarch_stabs_argument_has_addr_ftype *stabs_argument_has_addr;
8b148df9 232 int frame_red_zone_size;
58d5518e 233 int parm_boundary;
f0d4cc9e
AC		 234 const struct floatformat * float_format;
235 const struct floatformat * double_format;
236 const struct floatformat * long_double_format;
f517ea4e 237 gdbarch_convert_from_func_ptr_addr_ftype *convert_from_func_ptr_addr;
875e1767 238 gdbarch_addr_bits_remove_ftype *addr_bits_remove;
181c1381 239 gdbarch_smash_text_address_ftype *smash_text_address;
64c4637f 240 gdbarch_software_single_step_ftype *software_single_step;
2bf0cb65 241 gdbarch_print_insn_ftype *print_insn;
bdcd319a 242 gdbarch_skip_trampoline_code_ftype *skip_trampoline_code;
dea0c52f 243 gdbarch_skip_solib_resolver_ftype *skip_solib_resolver;
68e9cc94 244 gdbarch_in_solib_call_trampoline_ftype *in_solib_call_trampoline;
d50355b6 245 gdbarch_in_solib_return_trampoline_ftype *in_solib_return_trampoline;
f561f026 246 gdbarch_deprecated_pc_in_sigtramp_ftype *deprecated_pc_in_sigtramp;
aa2a3f87
AC		 247 gdbarch_deprecated_sigtramp_start_ftype *deprecated_sigtramp_start;
248 gdbarch_deprecated_sigtramp_end_ftype *deprecated_sigtramp_end;
c12260ac 249 gdbarch_in_function_epilogue_p_ftype *in_function_epilogue_p;
552c04a7 250 gdbarch_construct_inferior_arguments_ftype *construct_inferior_arguments;
a2cf933a
EZ		 251 gdbarch_elf_make_msymbol_special_ftype *elf_make_msymbol_special;
252 gdbarch_coff_make_msymbol_special_ftype *coff_make_msymbol_special;
5720643c 253 const char * name_of_malloc;
c4ed33b9 254 int cannot_step_breakpoint;
f74fa174 255 int have_nonsteppable_watchpoint;
8b2dbe47
KB		 256 gdbarch_address_class_type_flags_ftype *address_class_type_flags;
257 gdbarch_address_class_type_flags_to_name_ftype *address_class_type_flags_to_name;
258 gdbarch_address_class_name_to_type_flags_ftype *address_class_name_to_type_flags;
b59ff9d5 259 gdbarch_register_reggroup_p_ftype *register_reggroup_p;
143985b7 260 gdbarch_fetch_pointer_argument_ftype *fetch_pointer_argument;
6ce6d90f 261 gdbarch_regset_from_core_section_ftype *regset_from_core_section;
adf40b2e 262};
0f71a2f6
JM		 263
264
265/* The default architecture uses host values (for want of a better
266 choice). */
267
268extern const struct bfd_arch_info bfd_default_arch_struct;
269
4b9b3959
AC		 270struct gdbarch startup_gdbarch =
271{
76860b5f 272 1, /* Always initialized. */
aebd7893 273 NULL, /* The obstack. */
0f71a2f6 274 /* basic architecture information */
ec5cbaec
AC		 275 &bfd_default_arch_struct, /* bfd_arch_info */
276 BFD_ENDIAN_BIG, /* byte_order */
277 GDB_OSABI_UNKNOWN, /* osabi */
4b9b3959
AC		 278 /* target specific vector and its dump routine */
279 NULL, NULL,
0f71a2f6
JM		 280 /*per-architecture data-pointers and swap regions */
281 0, NULL, NULL,
282 /* Multi-arch values */
ec5cbaec
AC		 283 8 * sizeof (short), /* short_bit */
284 8 * sizeof (int), /* int_bit */
285 8 * sizeof (long), /* long_bit */
286 8 * sizeof (LONGEST), /* long_long_bit */
287 8 * sizeof (float), /* float_bit */
288 8 * sizeof (double), /* double_bit */
289 8 * sizeof (long double), /* long_double_bit */
290 8 * sizeof (void*), /* ptr_bit */
291 8 * sizeof (void*), /* addr_bit */
292 8 * sizeof (void*), /* bfd_vma_bit */
293 1, /* char_signed */
294 0, /* read_pc */
295 0, /* write_pc */
ec5cbaec 296 0, /* read_sp */
ec5cbaec
AC		 297 0, /* virtual_frame_pointer */
298 0, /* pseudo_register_read */
299 0, /* pseudo_register_write */
300 0, /* num_regs */
301 0, /* num_pseudo_regs */
302 -1, /* sp_regnum */
ec5cbaec
AC		 303 -1, /* pc_regnum */
304 -1, /* ps_regnum */
305 0, /* fp0_regnum */
ec5cbaec
AC		 306 0, /* stab_reg_to_regnum */
307 0, /* ecoff_reg_to_regnum */
308 0, /* dwarf_reg_to_regnum */
309 0, /* sdb_reg_to_regnum */
310 0, /* dwarf2_reg_to_regnum */
311 0, /* register_name */
9c04cab7
AC		 312 0, /* register_type */
313 0, /* deprecated_register_virtual_type */
ec5cbaec 314 0, /* deprecated_register_bytes */
9c04cab7
AC		 315 generic_register_byte, /* deprecated_register_byte */
316 generic_register_size, /* deprecated_register_raw_size */
317 generic_register_size, /* deprecated_register_virtual_size */
ec5cbaec 318 0, /* deprecated_max_register_raw_size */
ec5cbaec 319 0, /* deprecated_max_register_virtual_size */
f3be58bc 320 0, /* unwind_dummy_id */
a59fe496 321 0, /* deprecated_save_dummy_frame_tos */
f3be58bc
AC		 322 -1, /* deprecated_fp_regnum */
323 0, /* deprecated_target_read_fp */
b8de8283
AC		 324 0, /* push_dummy_call */
325 0, /* deprecated_push_arguments */
ec5cbaec 326 0, /* deprecated_use_generic_dummy_frames */
b8de8283
AC		 327 0, /* deprecated_push_return_address */
328 0, /* deprecated_dummy_write_sp */
329 0, /* deprecated_register_size */
ec5cbaec 330 0, /* call_dummy_location */
ec5cbaec
AC		 331 0, /* deprecated_call_dummy_start_offset */
332 0, /* deprecated_call_dummy_breakpoint_offset */
ec5cbaec
AC		 333 0, /* deprecated_call_dummy_words */
334 0, /* deprecated_sizeof_call_dummy_words */
ec5cbaec
AC		 335 0, /* deprecated_fix_call_dummy */
336 0, /* push_dummy_code */
b8de8283 337 0, /* deprecated_push_dummy_frame */
b8de8283
AC		 338 0, /* deprecated_do_registers_info */
339 default_print_registers_info, /* print_registers_info */
340 0, /* print_float_info */
341 0, /* print_vector_info */
342 0, /* register_sim_regno */
343 0, /* register_bytes_ok */
344 0, /* cannot_fetch_register */
345 0, /* cannot_store_register */
346 0, /* get_longjmp_target */
90ba813f 347 deprecated_pc_in_call_dummy, /* deprecated_pc_in_call_dummy */
ec5cbaec
AC		 348 0, /* deprecated_init_frame_pc */
349 0, /* believe_pcc_promotion */
350 0, /* believe_pcc_promotion_type */
351 0, /* deprecated_get_saved_register */
781a750d
AC		 352 0, /* deprecated_register_convertible */
353 0, /* deprecated_register_convert_to_virtual */
354 0, /* deprecated_register_convert_to_raw */
ec5cbaec
AC		 355 0, /* convert_register_p */
356 0, /* register_to_value */
357 0, /* value_to_register */
358 0, /* pointer_to_address */
359 0, /* address_to_pointer */
360 0, /* integer_to_address */
ec5cbaec
AC		 361 0, /* deprecated_pop_frame */
362 0, /* deprecated_store_struct_return */
92ad9cd9
AC		 363 0, /* return_value */
364 0, /* return_value_on_stack */
ec5cbaec
AC		 365 0, /* extract_return_value */
366 0, /* store_return_value */
367 0, /* deprecated_extract_return_value */
368 0, /* deprecated_store_return_value */
92ad9cd9 369 0, /* use_struct_convention */
74055713 370 0, /* deprecated_extract_struct_value_address */
ec5cbaec
AC		 371 0, /* deprecated_frame_init_saved_regs */
372 0, /* deprecated_init_extra_frame_info */
373 0, /* skip_prologue */
ec5cbaec
AC		 374 0, /* inner_than */
375 0, /* breakpoint_from_pc */
a1131521 376 0, /* adjust_breakpoint_address */
ec5cbaec
AC		 377 0, /* memory_insert_breakpoint */
378 0, /* memory_remove_breakpoint */
379 0, /* decr_pc_after_break */
ec5cbaec
AC		 380 0, /* function_start_offset */
381 generic_remote_translate_xfer_address, /* remote_translate_xfer_address */
382 0, /* frame_args_skip */
19772a2c 383 0, /* deprecated_frameless_function_invocation */
ec5cbaec
AC		 384 0, /* deprecated_frame_chain */
385 0, /* deprecated_frame_chain_valid */
386 0, /* deprecated_frame_saved_pc */
387 0, /* unwind_pc */
a9e5fdc2 388 0, /* unwind_sp */
42efa47a
AC		 389 get_frame_base, /* deprecated_frame_args_address */
390 get_frame_base, /* deprecated_frame_locals_address */
ec5cbaec
AC		 391 0, /* deprecated_saved_pc_after_call */
392 0, /* frame_num_args */
f27dd7fd 393 0, /* deprecated_stack_align */
ec5cbaec 394 0, /* frame_align */
88d89dbb 395 0, /* deprecated_reg_struct_has_addr */
192cb3d4 396 default_stabs_argument_has_addr, /* stabs_argument_has_addr */
8b148df9 397 0, /* frame_red_zone_size */
ec5cbaec
AC		 398 0, /* parm_boundary */
399 0, /* float_format */
400 0, /* double_format */
401 0, /* long_double_format */
e2d0e7eb 402 convert_from_func_ptr_addr_identity, /* convert_from_func_ptr_addr */
ec5cbaec
AC		 403 0, /* addr_bits_remove */
404 0, /* smash_text_address */
405 0, /* software_single_step */
406 0, /* print_insn */
407 0, /* skip_trampoline_code */
4c8c40e6 408 generic_skip_solib_resolver, /* skip_solib_resolver */
ec5cbaec
AC		 409 0, /* in_solib_call_trampoline */
410 0, /* in_solib_return_trampoline */
f561f026 411 0, /* deprecated_pc_in_sigtramp */
aa2a3f87
AC		 412 0, /* deprecated_sigtramp_start */
413 0, /* deprecated_sigtramp_end */
ec5cbaec
AC		 414 generic_in_function_epilogue_p, /* in_function_epilogue_p */
415 construct_inferior_arguments, /* construct_inferior_arguments */
ec5cbaec
AC		 416 0, /* elf_make_msymbol_special */
417 0, /* coff_make_msymbol_special */
418 "malloc", /* name_of_malloc */
419 0, /* cannot_step_breakpoint */
420 0, /* have_nonsteppable_watchpoint */
421 0, /* address_class_type_flags */
422 0, /* address_class_type_flags_to_name */
423 0, /* address_class_name_to_type_flags */
424 default_register_reggroup_p, /* register_reggroup_p */
425 0, /* fetch_pointer_argument */
6ce6d90f 426 0, /* regset_from_core_section */
c0e8c252 427 /* startup_gdbarch() */
0f71a2f6 428};
4b9b3959 429
c0e8c252 430struct gdbarch *current_gdbarch = &startup_gdbarch;
0f71a2f6 431
66b43ecb 432/* Create a new ``struct gdbarch'' based on information provided by
0f71a2f6
JM		 433 ``struct gdbarch_info''. */
434
435struct gdbarch *
104c1213
JM		 436gdbarch_alloc (const struct gdbarch_info *info,
437 struct gdbarch_tdep *tdep)
0f71a2f6 438{
85de9627
AC		 439 /* NOTE: The new architecture variable is named ``current_gdbarch''
440 so that macros such as TARGET_DOUBLE_BIT, when expanded, refer to
441 the current local architecture and not the previous global
442 architecture. This ensures that the new architectures initial
443 values are not influenced by the previous architecture. Once
444 everything is parameterised with gdbarch, this will go away. */
aebd7893
AC		 445 struct gdbarch *current_gdbarch;
446
447 /* Create an obstack for allocating all the per-architecture memory,
448 then use that to allocate the architecture vector. */
449 struct obstack *obstack = XMALLOC (struct obstack);
450 obstack_init (obstack);
451 current_gdbarch = obstack_alloc (obstack, sizeof (*current_gdbarch));
85de9627 452 memset (current_gdbarch, 0, sizeof (*current_gdbarch));
aebd7893 453 current_gdbarch->obstack = obstack;
0f71a2f6 454
85de9627 455 alloc_gdbarch_data (current_gdbarch);
b3cc3077 456
85de9627 457 current_gdbarch->tdep = tdep;
0f71a2f6 458
85de9627
AC		 459 current_gdbarch->bfd_arch_info = info->bfd_arch_info;
460 current_gdbarch->byte_order = info->byte_order;
4be87837 461 current_gdbarch->osabi = info->osabi;
0f71a2f6
JM		 462
463 /* Force the explicit initialization of these. */
85de9627
AC		 464 current_gdbarch->short_bit = 2*TARGET_CHAR_BIT;
465 current_gdbarch->int_bit = 4*TARGET_CHAR_BIT;
466 current_gdbarch->long_bit = 4*TARGET_CHAR_BIT;
467 current_gdbarch->long_long_bit = 2*TARGET_LONG_BIT;
468 current_gdbarch->float_bit = 4*TARGET_CHAR_BIT;
469 current_gdbarch->double_bit = 8*TARGET_CHAR_BIT;
17ef5d92 470 current_gdbarch->long_double_bit = 8*TARGET_CHAR_BIT;
85de9627
AC		 471 current_gdbarch->ptr_bit = TARGET_INT_BIT;
472 current_gdbarch->bfd_vma_bit = TARGET_ARCHITECTURE->bits_per_address;
4e409299 473 current_gdbarch->char_signed = -1;
85de9627 474 current_gdbarch->write_pc = generic_target_write_pc;
85de9627
AC		 475 current_gdbarch->virtual_frame_pointer = legacy_virtual_frame_pointer;
476 current_gdbarch->num_regs = -1;
477 current_gdbarch->sp_regnum = -1;
85de9627 478 current_gdbarch->pc_regnum = -1;
c2169756 479 current_gdbarch->ps_regnum = -1;
85de9627 480 current_gdbarch->fp0_regnum = -1;
85de9627
AC		 481 current_gdbarch->stab_reg_to_regnum = no_op_reg_to_regnum;
482 current_gdbarch->ecoff_reg_to_regnum = no_op_reg_to_regnum;
483 current_gdbarch->dwarf_reg_to_regnum = no_op_reg_to_regnum;
484 current_gdbarch->sdb_reg_to_regnum = no_op_reg_to_regnum;
485 current_gdbarch->dwarf2_reg_to_regnum = no_op_reg_to_regnum;
9c04cab7
AC		 486 current_gdbarch->deprecated_register_byte = generic_register_byte;
487 current_gdbarch->deprecated_register_raw_size = generic_register_size;
488 current_gdbarch->deprecated_register_virtual_size = generic_register_size;
f3be58bc 489 current_gdbarch->deprecated_fp_regnum = -1;
07555a72 490 current_gdbarch->deprecated_use_generic_dummy_frames = 1;
b99fa2d2 491 current_gdbarch->call_dummy_location = AT_ENTRY_POINT;
b1e29e33
AC		 492 current_gdbarch->deprecated_call_dummy_words = legacy_call_dummy_words;
493 current_gdbarch->deprecated_sizeof_call_dummy_words = legacy_sizeof_call_dummy_words;
b8de8283
AC		 494 current_gdbarch->print_registers_info = default_print_registers_info;
495 current_gdbarch->register_sim_regno = legacy_register_sim_regno;
496 current_gdbarch->cannot_fetch_register = cannot_register_not;
497 current_gdbarch->cannot_store_register = cannot_register_not;
90ba813f 498 current_gdbarch->deprecated_pc_in_call_dummy = deprecated_pc_in_call_dummy;
13d01224
AC		 499 current_gdbarch->convert_register_p = legacy_convert_register_p;
500 current_gdbarch->register_to_value = legacy_register_to_value;
501 current_gdbarch->value_to_register = legacy_value_to_register;
85de9627
AC		 502 current_gdbarch->pointer_to_address = unsigned_pointer_to_address;
503 current_gdbarch->address_to_pointer = unsigned_address_to_pointer;
504 current_gdbarch->return_value_on_stack = generic_return_value_on_stack_not;
ebba8386
AC		 505 current_gdbarch->extract_return_value = legacy_extract_return_value;
506 current_gdbarch->store_return_value = legacy_store_return_value;
56f12751 507 current_gdbarch->use_struct_convention = generic_use_struct_convention;
85de9627
AC		 508 current_gdbarch->memory_insert_breakpoint = default_memory_insert_breakpoint;
509 current_gdbarch->memory_remove_breakpoint = default_memory_remove_breakpoint;
85de9627 510 current_gdbarch->remote_translate_xfer_address = generic_remote_translate_xfer_address;
42efa47a
AC		 511 current_gdbarch->deprecated_frame_args_address = get_frame_base;
512 current_gdbarch->deprecated_frame_locals_address = get_frame_base;
192cb3d4 513 current_gdbarch->stabs_argument_has_addr = default_stabs_argument_has_addr;
e2d0e7eb 514 current_gdbarch->convert_from_func_ptr_addr = convert_from_func_ptr_addr_identity;
85de9627 515 current_gdbarch->addr_bits_remove = core_addr_identity;
181c1381 516 current_gdbarch->smash_text_address = core_addr_identity;
85de9627 517 current_gdbarch->skip_trampoline_code = generic_skip_trampoline_code;
dea0c52f 518 current_gdbarch->skip_solib_resolver = generic_skip_solib_resolver;
68e9cc94 519 current_gdbarch->in_solib_call_trampoline = generic_in_solib_call_trampoline;
d50355b6 520 current_gdbarch->in_solib_return_trampoline = generic_in_solib_return_trampoline;
f561f026 521 current_gdbarch->deprecated_pc_in_sigtramp = legacy_pc_in_sigtramp;
c12260ac 522 current_gdbarch->in_function_epilogue_p = generic_in_function_epilogue_p;
552c04a7 523 current_gdbarch->construct_inferior_arguments = construct_inferior_arguments;
a2cf933a
EZ		 524 current_gdbarch->elf_make_msymbol_special = default_elf_make_msymbol_special;
525 current_gdbarch->coff_make_msymbol_special = default_coff_make_msymbol_special;
5720643c 526 current_gdbarch->name_of_malloc = "malloc";
b59ff9d5 527 current_gdbarch->register_reggroup_p = default_register_reggroup_p;
0f71a2f6
JM		 528 /* gdbarch_alloc() */
529
85de9627 530 return current_gdbarch;
0f71a2f6
JM		 531}
532
533
aebd7893
AC		 534/* Allocate extra space using the per-architecture obstack. */
535
536void *
537gdbarch_obstack_zalloc (struct gdbarch *arch, long size)
538{
539 void *data = obstack_alloc (arch->obstack, size);
540 memset (data, 0, size);
541 return data;
542}
543
544
058f20d5
JB		 545/* Free a gdbarch struct. This should never happen in normal
546 operation --- once you've created a gdbarch, you keep it around.
547 However, if an architecture's init function encounters an error
548 building the structure, it may need to clean up a partially
549 constructed gdbarch. */
4b9b3959 550
058f20d5
JB		 551void
552gdbarch_free (struct gdbarch *arch)
553{
aebd7893 554 struct obstack *obstack;
95160752 555 gdb_assert (arch != NULL);
aebd7893
AC		 556 gdb_assert (!arch->initialized_p);
557 obstack = arch->obstack;
558 obstack_free (obstack, 0); /* Includes the ARCH. */
559 xfree (obstack);
058f20d5
JB		 560}
561
562
db446970
AC		 563/* Ensure that all values in a GDBARCH are reasonable. */
564
565/* NOTE/WARNING: The parameter is called ``current_gdbarch'' so that it
566 just happens to match the global variable ``current_gdbarch''. That
567 way macros refering to that variable get the local and not the global
568 version - ulgh. Once everything is parameterised with gdbarch, this
569 will go away. */
0f71a2f6 570
0f71a2f6 571static void
db446970 572verify_gdbarch (struct gdbarch *current_gdbarch)
0f71a2f6 573{
f16a1923
AC		 574 struct ui_file *log;
575 struct cleanup *cleanups;
576 long dummy;
577 char *buf;
f16a1923
AC		 578 log = mem_fileopen ();
579 cleanups = make_cleanup_ui_file_delete (log);
0f71a2f6 580 /* fundamental */
db446970 581 if (current_gdbarch->byte_order == BFD_ENDIAN_UNKNOWN)
f16a1923 582 fprintf_unfiltered (log, "\n\tbyte-order");
db446970 583 if (current_gdbarch->bfd_arch_info == NULL)
f16a1923 584 fprintf_unfiltered (log, "\n\tbfd_arch_info");
0f71a2f6 585 /* Check those that need to be defined for the given multi-arch level. */
66b43ecb
AC		 586 /* Skip verify of short_bit, invalid_p == 0 */
587 /* Skip verify of int_bit, invalid_p == 0 */
588 /* Skip verify of long_bit, invalid_p == 0 */
589 /* Skip verify of long_long_bit, invalid_p == 0 */
590 /* Skip verify of float_bit, invalid_p == 0 */
591 /* Skip verify of double_bit, invalid_p == 0 */
592 /* Skip verify of long_double_bit, invalid_p == 0 */
593 /* Skip verify of ptr_bit, invalid_p == 0 */
db446970
AC		 594 if (current_gdbarch->addr_bit == 0)
595 current_gdbarch->addr_bit = TARGET_PTR_BIT;
c0e8c252 596 /* Skip verify of bfd_vma_bit, invalid_p == 0 */
db446970
AC		 597 if (current_gdbarch->char_signed == -1)
598 current_gdbarch->char_signed = 1;
cde9ea48 599 /* Skip verify of read_pc, has predicate */
be8dfb87 600 /* Skip verify of write_pc, invalid_p == 0 */
bd1ce8ba 601 /* Skip verify of read_sp, has predicate */
39d4ef09 602 /* Skip verify of virtual_frame_pointer, invalid_p == 0 */
d8124050
AC		 603 /* Skip verify of pseudo_register_read, has predicate */
604 /* Skip verify of pseudo_register_write, has predicate */
50248794 605 if ((GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL)
db446970 606 && (current_gdbarch->num_regs == -1))
f16a1923 607 fprintf_unfiltered (log, "\n\tnum_regs");
0aba1244 608 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
1200cd6e 609 /* Skip verify of sp_regnum, invalid_p == 0 */
1200cd6e 610 /* Skip verify of pc_regnum, invalid_p == 0 */
c2169756 611 /* Skip verify of ps_regnum, invalid_p == 0 */
60054393 612 /* Skip verify of fp0_regnum, invalid_p == 0 */
88c72b7d
AC		 613 /* Skip verify of stab_reg_to_regnum, invalid_p == 0 */
614 /* Skip verify of ecoff_reg_to_regnum, invalid_p == 0 */
615 /* Skip verify of dwarf_reg_to_regnum, invalid_p == 0 */
616 /* Skip verify of sdb_reg_to_regnum, invalid_p == 0 */
617 /* Skip verify of dwarf2_reg_to_regnum, invalid_p == 0 */
9c04cab7
AC		 618 /* Skip verify of register_type, has predicate */
619 /* Skip verify of deprecated_register_virtual_type, has predicate */
620 /* Skip verify of deprecated_register_byte, has predicate */
dadd712e
AC		 621 /* Skip verify of deprecated_register_raw_size, has predicate */
622 /* Skip verify of deprecated_register_virtual_size, has predicate */
a0ed5532 623 /* Skip verify of deprecated_max_register_raw_size, has predicate */
a0ed5532 624 /* Skip verify of deprecated_max_register_virtual_size, has predicate */
f3be58bc 625 /* Skip verify of unwind_dummy_id, has predicate */
a59fe496 626 /* Skip verify of deprecated_save_dummy_frame_tos, has predicate */
f3be58bc
AC		 627 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
628 /* Skip verify of deprecated_target_read_fp, has predicate */
b8de8283
AC		 629 /* Skip verify of push_dummy_call, has predicate */
630 /* Skip verify of deprecated_push_arguments, has predicate */
631 /* Skip verify of deprecated_use_generic_dummy_frames, invalid_p == 0 */
632 /* Skip verify of deprecated_push_return_address, has predicate */
633 /* Skip verify of deprecated_dummy_write_sp, has predicate */
634 /* Skip verify of call_dummy_location, invalid_p == 0 */
b8de8283
AC		 635 /* Skip verify of deprecated_call_dummy_words, invalid_p == 0 */
636 /* Skip verify of deprecated_sizeof_call_dummy_words, invalid_p == 0 */
b8de8283
AC		 637 /* Skip verify of deprecated_fix_call_dummy, has predicate */
638 /* Skip verify of push_dummy_code, has predicate */
639 /* Skip verify of deprecated_push_dummy_frame, has predicate */
903ad3a6 640 /* Skip verify of deprecated_do_registers_info, has predicate */
0ab7a791 641 /* Skip verify of print_registers_info, invalid_p == 0 */
23e3a7ac 642 /* Skip verify of print_float_info, has predicate */
e76f1f2e 643 /* Skip verify of print_vector_info, has predicate */
7c7651b2 644 /* Skip verify of register_sim_regno, invalid_p == 0 */
2649061d 645 /* Skip verify of register_bytes_ok, has predicate */
01fb7433
AC		 646 /* Skip verify of cannot_fetch_register, invalid_p == 0 */
647 /* Skip verify of cannot_store_register, invalid_p == 0 */
9df628e0 648 /* Skip verify of get_longjmp_target, has predicate */
ae45cd16 649 /* Skip verify of deprecated_pc_in_call_dummy, has predicate */
a5afb99f 650 /* Skip verify of deprecated_init_frame_pc, has predicate */
129c1cd6 651 /* Skip verify of deprecated_get_saved_register, has predicate */
cd0bfa36 652 /* Skip verify of deprecated_register_convertible, has predicate */
781a750d
AC		 653 /* Skip verify of deprecated_register_convert_to_virtual, invalid_p == 0 */
654 /* Skip verify of deprecated_register_convert_to_raw, invalid_p == 0 */
13d01224
AC		 655 /* Skip verify of convert_register_p, invalid_p == 0 */
656 /* Skip verify of register_to_value, invalid_p == 0 */
657 /* Skip verify of value_to_register, invalid_p == 0 */
4478b372
JB		 658 /* Skip verify of pointer_to_address, invalid_p == 0 */
659 /* Skip verify of address_to_pointer, invalid_p == 0 */
fc0c74b1 660 /* Skip verify of integer_to_address, has predicate */
749b82f6 661 /* Skip verify of deprecated_pop_frame, has predicate */
4183d812 662 /* Skip verify of deprecated_store_struct_return, has predicate */
92ad9cd9
AC		 663 /* Skip verify of return_value, has predicate */
664 /* Skip verify of return_value_on_stack, invalid_p == 0 */
ebba8386
AC		 665 /* Skip verify of extract_return_value, invalid_p == 0 */
666 /* Skip verify of store_return_value, invalid_p == 0 */
92ad9cd9 667 /* Skip verify of use_struct_convention, invalid_p == 0 */
74055713 668 /* Skip verify of deprecated_extract_struct_value_address, has predicate */
f30ee0bc 669 /* Skip verify of deprecated_frame_init_saved_regs, has predicate */
e9582e71 670 /* Skip verify of deprecated_init_extra_frame_info, has predicate */
50248794 671 if ((GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL)
db446970 672 && (current_gdbarch->skip_prologue == 0))
f16a1923 673 fprintf_unfiltered (log, "\n\tskip_prologue");
50248794 674 if ((GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL)
db446970 675 && (current_gdbarch->inner_than == 0))
f16a1923 676 fprintf_unfiltered (log, "\n\tinner_than");
aaab4dba 677 if ((GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL)
db446970 678 && (current_gdbarch->breakpoint_from_pc == 0))
aaab4dba 679 fprintf_unfiltered (log, "\n\tbreakpoint_from_pc");
a1131521 680 /* Skip verify of adjust_breakpoint_address, has predicate */
c0e8c252
AC		 681 /* Skip verify of memory_insert_breakpoint, invalid_p == 0 */
682 /* Skip verify of memory_remove_breakpoint, invalid_p == 0 */
71bd6bd4 683 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
6503b91e 684 /* Skip verify of function_start_offset, invalid_p == 0 */
c0e8c252 685 /* Skip verify of remote_translate_xfer_address, invalid_p == 0 */
5867a2fb 686 /* Skip verify of frame_args_skip, invalid_p == 0 */
19772a2c 687 /* Skip verify of deprecated_frameless_function_invocation, has predicate */
618ce49f
AC		 688 /* Skip verify of deprecated_frame_chain, has predicate */
689 /* Skip verify of deprecated_frame_chain_valid, has predicate */
8bedc050 690 /* Skip verify of deprecated_frame_saved_pc, has predicate */
12cc2063 691 /* Skip verify of unwind_pc, has predicate */
a9e5fdc2 692 /* Skip verify of unwind_sp, has predicate */
42efa47a
AC		 693 /* Skip verify of deprecated_frame_args_address, has predicate */
694 /* Skip verify of deprecated_frame_locals_address, has predicate */
6913c89a 695 /* Skip verify of deprecated_saved_pc_after_call, has predicate */
983a287a 696 /* Skip verify of frame_num_args, has predicate */
f27dd7fd 697 /* Skip verify of deprecated_stack_align, has predicate */
dc604539 698 /* Skip verify of frame_align, has predicate */
88d89dbb 699 /* Skip verify of deprecated_reg_struct_has_addr, has predicate */
192cb3d4 700 /* Skip verify of stabs_argument_has_addr, invalid_p == 0 */
db446970
AC		 701 if (current_gdbarch->float_format == 0)
702 current_gdbarch->float_format = default_float_format (current_gdbarch);
703 if (current_gdbarch->double_format == 0)
704 current_gdbarch->double_format = default_double_format (current_gdbarch);
705 if (current_gdbarch->long_double_format == 0)
706 current_gdbarch->long_double_format = default_double_format (current_gdbarch);
f517ea4e 707 /* Skip verify of convert_from_func_ptr_addr, invalid_p == 0 */
875e1767 708 /* Skip verify of addr_bits_remove, invalid_p == 0 */
181c1381 709 /* Skip verify of smash_text_address, invalid_p == 0 */
64c4637f 710 /* Skip verify of software_single_step, has predicate */
f6c40618 711 if ((GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL)
db446970 712 && (current_gdbarch->print_insn == 0))
f6c40618 713 fprintf_unfiltered (log, "\n\tprint_insn");
bdcd319a 714 /* Skip verify of skip_trampoline_code, invalid_p == 0 */
dea0c52f 715 /* Skip verify of skip_solib_resolver, invalid_p == 0 */
68e9cc94 716 /* Skip verify of in_solib_call_trampoline, invalid_p == 0 */
d50355b6 717 /* Skip verify of in_solib_return_trampoline, invalid_p == 0 */
f561f026 718 /* Skip verify of deprecated_pc_in_sigtramp, has predicate */
aa2a3f87
AC		 719 /* Skip verify of deprecated_sigtramp_start, has predicate */
720 /* Skip verify of deprecated_sigtramp_end, has predicate */
c12260ac 721 /* Skip verify of in_function_epilogue_p, invalid_p == 0 */
552c04a7 722 /* Skip verify of construct_inferior_arguments, invalid_p == 0 */
a2cf933a
EZ		 723 /* Skip verify of elf_make_msymbol_special, invalid_p == 0 */
724 /* Skip verify of coff_make_msymbol_special, invalid_p == 0 */
5720643c 725 /* Skip verify of name_of_malloc, invalid_p == 0 */
c4ed33b9 726 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
f74fa174 727 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
8b2dbe47
KB		 728 /* Skip verify of address_class_type_flags, has predicate */
729 /* Skip verify of address_class_type_flags_to_name, has predicate */
730 /* Skip verify of address_class_name_to_type_flags, has predicate */
7e20f3fb 731 /* Skip verify of register_reggroup_p, invalid_p == 0 */
143985b7 732 /* Skip verify of fetch_pointer_argument, has predicate */
6ce6d90f 733 /* Skip verify of regset_from_core_section, has predicate */
f16a1923
AC		 734 buf = ui_file_xstrdup (log, &dummy);
735 make_cleanup (xfree, buf);
736 if (strlen (buf) > 0)
737 internal_error (__FILE__, __LINE__,
738 "verify_gdbarch: the following are invalid ...%s",
739 buf);
740 do_cleanups (cleanups);
0f71a2f6
JM		 741}
742
743
744/* Print out the details of the current architecture. */
745
4b9b3959
AC		 746/* NOTE/WARNING: The parameter is called ``current_gdbarch'' so that it
747 just happens to match the global variable ``current_gdbarch''. That
748 way macros refering to that variable get the local and not the global
749 version - ulgh. Once everything is parameterised with gdbarch, this
750 will go away. */
751
0f71a2f6 752void
db446970 753gdbarch_dump (struct gdbarch *current_gdbarch, struct ui_file *file)
0f71a2f6 754{
4b9b3959
AC		 755 fprintf_unfiltered (file,
756 "gdbarch_dump: GDB_MULTI_ARCH = %d\n",
757 GDB_MULTI_ARCH);
e2d0e7eb
AC		 758 fprintf_unfiltered (file,
759 "gdbarch_dump: convert_from_func_ptr_addr = 0x%08lx\n",
760 (long) current_gdbarch->convert_from_func_ptr_addr);
7996bcec
AC		 761 fprintf_unfiltered (file,
762 "gdbarch_dump: gdbarch_frame_align_p() = %d\n",
763 gdbarch_frame_align_p (current_gdbarch));
764 fprintf_unfiltered (file,
765 "gdbarch_dump: frame_align = 0x%08lx\n",
766 (long) current_gdbarch->frame_align);
6ce6d90f
MK		 767 fprintf_unfiltered (file,
768 "gdbarch_dump: gdbarch_regset_from_core_section_p() = %d\n",
769 gdbarch_regset_from_core_section_p (current_gdbarch));
770 fprintf_unfiltered (file,
771 "gdbarch_dump: regset_from_core_section = 0x%08lx\n",
772 (long) current_gdbarch->regset_from_core_section);
92ad9cd9
AC		 773 fprintf_unfiltered (file,
774 "gdbarch_dump: gdbarch_return_value_p() = %d\n",
775 gdbarch_return_value_p (current_gdbarch));
776 fprintf_unfiltered (file,
777 "gdbarch_dump: return_value = 0x%08lx\n",
778 (long) current_gdbarch->return_value);
7996bcec
AC		 779 fprintf_unfiltered (file,
780 "gdbarch_dump: in_function_epilogue_p = 0x%08lx\n",
781 (long) current_gdbarch->in_function_epilogue_p);
782 fprintf_unfiltered (file,
783 "gdbarch_dump: register_reggroup_p = 0x%08lx\n",
784 (long) current_gdbarch->register_reggroup_p);
192cb3d4
MK		 785 fprintf_unfiltered (file,
786 "gdbarch_dump: stabs_argument_has_addr = 0x%08lx\n",
787 (long) current_gdbarch->stabs_argument_has_addr);
7996bcec
AC		 788 fprintf_unfiltered (file,
789 "gdbarch_dump: gdbarch_pseudo_register_read_p() = %d\n",
790 gdbarch_pseudo_register_read_p (current_gdbarch));
791 fprintf_unfiltered (file,
792 "gdbarch_dump: pseudo_register_read = 0x%08lx\n",
793 (long) current_gdbarch->pseudo_register_read);
794 fprintf_unfiltered (file,
795 "gdbarch_dump: gdbarch_pseudo_register_write_p() = %d\n",
796 gdbarch_pseudo_register_write_p (current_gdbarch));
797 fprintf_unfiltered (file,
798 "gdbarch_dump: pseudo_register_write = 0x%08lx\n",
799 (long) current_gdbarch->pseudo_register_write);
800 fprintf_unfiltered (file,
801 "gdbarch_dump: gdbarch_address_class_name_to_type_flags_p() = %d\n",
802 gdbarch_address_class_name_to_type_flags_p (current_gdbarch));
803 fprintf_unfiltered (file,
804 "gdbarch_dump: address_class_name_to_type_flags = 0x%08lx\n",
805 (long) current_gdbarch->address_class_name_to_type_flags);
1e9f55d0
AC		 806#ifdef ADDRESS_CLASS_TYPE_FLAGS_P
807 fprintf_unfiltered (file,
808 "gdbarch_dump: %s # %s\n",
809 "ADDRESS_CLASS_TYPE_FLAGS_P()",
810 XSTRING (ADDRESS_CLASS_TYPE_FLAGS_P ()));
811 fprintf_unfiltered (file,
812 "gdbarch_dump: ADDRESS_CLASS_TYPE_FLAGS_P() = %d\n",
813 ADDRESS_CLASS_TYPE_FLAGS_P ());
814#endif
8b2dbe47
KB		 815#ifdef ADDRESS_CLASS_TYPE_FLAGS
816 fprintf_unfiltered (file,
817 "gdbarch_dump: %s # %s\n",
818 "ADDRESS_CLASS_TYPE_FLAGS(byte_size, dwarf2_addr_class)",
819 XSTRING (ADDRESS_CLASS_TYPE_FLAGS (byte_size, dwarf2_addr_class)));
7996bcec
AC		 820 fprintf_unfiltered (file,
821 "gdbarch_dump: ADDRESS_CLASS_TYPE_FLAGS = <0x%08lx>\n",
822 (long) current_gdbarch->address_class_type_flags
823 /*ADDRESS_CLASS_TYPE_FLAGS ()*/);
8b2dbe47 824#endif
7996bcec
AC		 825 fprintf_unfiltered (file,
826 "gdbarch_dump: gdbarch_address_class_type_flags_to_name_p() = %d\n",
827 gdbarch_address_class_type_flags_to_name_p (current_gdbarch));
828 fprintf_unfiltered (file,
829 "gdbarch_dump: address_class_type_flags_to_name = 0x%08lx\n",
830 (long) current_gdbarch->address_class_type_flags_to_name);
08e45a40 831#ifdef ADDRESS_TO_POINTER
4b9b3959 832 fprintf_unfiltered (file,
08e45a40
AC		 833 "gdbarch_dump: %s # %s\n",
834 "ADDRESS_TO_POINTER(type, buf, addr)",
835 XSTRING (ADDRESS_TO_POINTER (type, buf, addr)));
7996bcec
AC		 836 fprintf_unfiltered (file,
837 "gdbarch_dump: ADDRESS_TO_POINTER = <0x%08lx>\n",
838 (long) current_gdbarch->address_to_pointer
839 /*ADDRESS_TO_POINTER ()*/);
4b9b3959 840#endif
5e74b15c
RE		 841#ifdef ADDR_BITS_REMOVE
842 fprintf_unfiltered (file,
843 "gdbarch_dump: %s # %s\n",
844 "ADDR_BITS_REMOVE(addr)",
845 XSTRING (ADDR_BITS_REMOVE (addr)));
7996bcec
AC		 846 fprintf_unfiltered (file,
847 "gdbarch_dump: ADDR_BITS_REMOVE = <0x%08lx>\n",
848 (long) current_gdbarch->addr_bits_remove
849 /*ADDR_BITS_REMOVE ()*/);
5e74b15c 850#endif
a1131521
KB		 851 fprintf_unfiltered (file,
852 "gdbarch_dump: gdbarch_adjust_breakpoint_address_p() = %d\n",
853 gdbarch_adjust_breakpoint_address_p (current_gdbarch));
854 fprintf_unfiltered (file,
855 "gdbarch_dump: adjust_breakpoint_address = 0x%08lx\n",
856 (long) current_gdbarch->adjust_breakpoint_address);
08e45a40 857#ifdef BELIEVE_PCC_PROMOTION
4b9b3959 858 fprintf_unfiltered (file,
08e45a40
AC		 859 "gdbarch_dump: BELIEVE_PCC_PROMOTION # %s\n",
860 XSTRING (BELIEVE_PCC_PROMOTION));
861 fprintf_unfiltered (file,
06b25f14
AC		 862 "gdbarch_dump: BELIEVE_PCC_PROMOTION = %d\n",
863 BELIEVE_PCC_PROMOTION);
4b9b3959 864#endif
08e45a40 865#ifdef BELIEVE_PCC_PROMOTION_TYPE
4b9b3959 866 fprintf_unfiltered (file,
08e45a40
AC		 867 "gdbarch_dump: BELIEVE_PCC_PROMOTION_TYPE # %s\n",
868 XSTRING (BELIEVE_PCC_PROMOTION_TYPE));
869 fprintf_unfiltered (file,
06b25f14
AC		 870 "gdbarch_dump: BELIEVE_PCC_PROMOTION_TYPE = %d\n",
871 BELIEVE_PCC_PROMOTION_TYPE);
4b9b3959 872#endif
08e45a40 873#ifdef BREAKPOINT_FROM_PC
4b9b3959 874 fprintf_unfiltered (file,
08e45a40
AC		 875 "gdbarch_dump: %s # %s\n",
876 "BREAKPOINT_FROM_PC(pcptr, lenptr)",
877 XSTRING (BREAKPOINT_FROM_PC (pcptr, lenptr)));
7996bcec
AC		 878 fprintf_unfiltered (file,
879 "gdbarch_dump: BREAKPOINT_FROM_PC = <0x%08lx>\n",
880 (long) current_gdbarch->breakpoint_from_pc
881 /*BREAKPOINT_FROM_PC ()*/);
4b9b3959 882#endif
08e45a40 883#ifdef CALL_DUMMY_LOCATION
52204a0b 884 fprintf_unfiltered (file,
08e45a40
AC		 885 "gdbarch_dump: CALL_DUMMY_LOCATION # %s\n",
886 XSTRING (CALL_DUMMY_LOCATION));
887 fprintf_unfiltered (file,
06b25f14
AC		 888 "gdbarch_dump: CALL_DUMMY_LOCATION = %d\n",
889 CALL_DUMMY_LOCATION);
52204a0b 890#endif
08e45a40 891#ifdef CANNOT_FETCH_REGISTER
4b9b3959
AC		 892 fprintf_unfiltered (file,
893 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 894 "CANNOT_FETCH_REGISTER(regnum)",
895 XSTRING (CANNOT_FETCH_REGISTER (regnum)));
7996bcec
AC		 896 fprintf_unfiltered (file,
897 "gdbarch_dump: CANNOT_FETCH_REGISTER = <0x%08lx>\n",
898 (long) current_gdbarch->cannot_fetch_register
899 /*CANNOT_FETCH_REGISTER ()*/);
4b9b3959 900#endif
c4ed33b9
AC		 901#ifdef CANNOT_STEP_BREAKPOINT
902 fprintf_unfiltered (file,
903 "gdbarch_dump: CANNOT_STEP_BREAKPOINT # %s\n",
904 XSTRING (CANNOT_STEP_BREAKPOINT));
905 fprintf_unfiltered (file,
906 "gdbarch_dump: CANNOT_STEP_BREAKPOINT = %d\n",
907 CANNOT_STEP_BREAKPOINT);
908#endif
08e45a40 909#ifdef CANNOT_STORE_REGISTER
4b9b3959
AC		 910 fprintf_unfiltered (file,
911 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 912 "CANNOT_STORE_REGISTER(regnum)",
913 XSTRING (CANNOT_STORE_REGISTER (regnum)));
7996bcec
AC		 914 fprintf_unfiltered (file,
915 "gdbarch_dump: CANNOT_STORE_REGISTER = <0x%08lx>\n",
916 (long) current_gdbarch->cannot_store_register
917 /*CANNOT_STORE_REGISTER ()*/);
4b9b3959 918#endif
a2cf933a 919#ifdef COFF_MAKE_MSYMBOL_SPECIAL
a2cf933a
EZ		 920 fprintf_unfiltered (file,
921 "gdbarch_dump: %s # %s\n",
922 "COFF_MAKE_MSYMBOL_SPECIAL(val, msym)",
923 XSTRING (COFF_MAKE_MSYMBOL_SPECIAL (val, msym)));
7996bcec
AC		 924 fprintf_unfiltered (file,
925 "gdbarch_dump: COFF_MAKE_MSYMBOL_SPECIAL = <0x%08lx>\n",
926 (long) current_gdbarch->coff_make_msymbol_special
927 /*COFF_MAKE_MSYMBOL_SPECIAL ()*/);
a2cf933a 928#endif
7996bcec
AC		 929 fprintf_unfiltered (file,
930 "gdbarch_dump: construct_inferior_arguments = 0x%08lx\n",
931 (long) current_gdbarch->construct_inferior_arguments);
13d01224
AC		 932#ifdef CONVERT_REGISTER_P
933 fprintf_unfiltered (file,
934 "gdbarch_dump: %s # %s\n",
ff2e87ac
AC		 935 "CONVERT_REGISTER_P(regnum, type)",
936 XSTRING (CONVERT_REGISTER_P (regnum, type)));
7996bcec
AC		 937 fprintf_unfiltered (file,
938 "gdbarch_dump: CONVERT_REGISTER_P = <0x%08lx>\n",
939 (long) current_gdbarch->convert_register_p
940 /*CONVERT_REGISTER_P ()*/);
13d01224 941#endif
08e45a40 942#ifdef DECR_PC_AFTER_BREAK
4b9b3959 943 fprintf_unfiltered (file,
08e45a40
AC		 944 "gdbarch_dump: DECR_PC_AFTER_BREAK # %s\n",
945 XSTRING (DECR_PC_AFTER_BREAK));
0aba1244 946 fprintf_unfiltered (file,
08e45a40
AC		 947 "gdbarch_dump: DECR_PC_AFTER_BREAK = %ld\n",
948 (long) DECR_PC_AFTER_BREAK);
0aba1244 949#endif
b1e29e33
AC		 950#ifdef DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET
951 fprintf_unfiltered (file,
952 "gdbarch_dump: DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET # %s\n",
953 XSTRING (DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET));
954 fprintf_unfiltered (file,
955 "gdbarch_dump: DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET = %ld\n",
956 (long) DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET);
957#endif
b1e29e33
AC		 958#ifdef DEPRECATED_CALL_DUMMY_START_OFFSET
959 fprintf_unfiltered (file,
960 "gdbarch_dump: DEPRECATED_CALL_DUMMY_START_OFFSET # %s\n",
961 XSTRING (DEPRECATED_CALL_DUMMY_START_OFFSET));
962 fprintf_unfiltered (file,
963 "gdbarch_dump: DEPRECATED_CALL_DUMMY_START_OFFSET = %ld\n",
964 (long) DEPRECATED_CALL_DUMMY_START_OFFSET);
965#endif
966#ifdef DEPRECATED_CALL_DUMMY_WORDS
967 fprintf_unfiltered (file,
968 "gdbarch_dump: DEPRECATED_CALL_DUMMY_WORDS # %s\n",
969 XSTRING (DEPRECATED_CALL_DUMMY_WORDS));
970 fprintf_unfiltered (file,
971 "gdbarch_dump: DEPRECATED_CALL_DUMMY_WORDS = 0x%08lx\n",
972 (long) DEPRECATED_CALL_DUMMY_WORDS);
973#endif
1e9f55d0
AC		 974#ifdef DEPRECATED_DO_REGISTERS_INFO_P
975 fprintf_unfiltered (file,
976 "gdbarch_dump: %s # %s\n",
977 "DEPRECATED_DO_REGISTERS_INFO_P()",
978 XSTRING (DEPRECATED_DO_REGISTERS_INFO_P ()));
979 fprintf_unfiltered (file,
980 "gdbarch_dump: DEPRECATED_DO_REGISTERS_INFO_P() = %d\n",
981 DEPRECATED_DO_REGISTERS_INFO_P ());
982#endif
903ad3a6 983#ifdef DEPRECATED_DO_REGISTERS_INFO
903ad3a6
AC		 984 fprintf_unfiltered (file,
985 "gdbarch_dump: %s # %s\n",
986 "DEPRECATED_DO_REGISTERS_INFO(reg_nr, fpregs)",
987 XSTRING (DEPRECATED_DO_REGISTERS_INFO (reg_nr, fpregs)));
7996bcec
AC		 988 fprintf_unfiltered (file,
989 "gdbarch_dump: DEPRECATED_DO_REGISTERS_INFO = <0x%08lx>\n",
990 (long) current_gdbarch->deprecated_do_registers_info
991 /*DEPRECATED_DO_REGISTERS_INFO ()*/);
903ad3a6 992#endif
6c0e89ed
AC		 993#ifdef DEPRECATED_DUMMY_WRITE_SP_P
994 fprintf_unfiltered (file,
995 "gdbarch_dump: %s # %s\n",
996 "DEPRECATED_DUMMY_WRITE_SP_P()",
997 XSTRING (DEPRECATED_DUMMY_WRITE_SP_P ()));
998 fprintf_unfiltered (file,
999 "gdbarch_dump: DEPRECATED_DUMMY_WRITE_SP_P() = %d\n",
1000 DEPRECATED_DUMMY_WRITE_SP_P ());
1001#endif
1002#ifdef DEPRECATED_DUMMY_WRITE_SP
6c0e89ed
AC		 1003 fprintf_unfiltered (file,
1004 "gdbarch_dump: %s # %s\n",
1005 "DEPRECATED_DUMMY_WRITE_SP(val)",
1006 XSTRING (DEPRECATED_DUMMY_WRITE_SP (val)));
7996bcec
AC		 1007 fprintf_unfiltered (file,
1008 "gdbarch_dump: DEPRECATED_DUMMY_WRITE_SP = <0x%08lx>\n",
1009 (long) current_gdbarch->deprecated_dummy_write_sp
1010 /*DEPRECATED_DUMMY_WRITE_SP ()*/);
6c0e89ed 1011#endif
26e9b323 1012#ifdef DEPRECATED_EXTRACT_RETURN_VALUE
26e9b323
AC		 1013 fprintf_unfiltered (file,
1014 "gdbarch_dump: %s # %s\n",
1015 "DEPRECATED_EXTRACT_RETURN_VALUE(type, regbuf, valbuf)",
1016 XSTRING (DEPRECATED_EXTRACT_RETURN_VALUE (type, regbuf, valbuf)));
7996bcec
AC		 1017 fprintf_unfiltered (file,
1018 "gdbarch_dump: DEPRECATED_EXTRACT_RETURN_VALUE = <0x%08lx>\n",
1019 (long) current_gdbarch->deprecated_extract_return_value
1020 /*DEPRECATED_EXTRACT_RETURN_VALUE ()*/);
26e9b323 1021#endif
74055713
AC		 1022#ifdef DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P
1023 fprintf_unfiltered (file,
1024 "gdbarch_dump: %s # %s\n",
1025 "DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P()",
1026 XSTRING (DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P ()));
1027 fprintf_unfiltered (file,
1028 "gdbarch_dump: DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P() = %d\n",
1029 DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P ());
1030#endif
1031#ifdef DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS
1032 fprintf_unfiltered (file,
1033 "gdbarch_dump: %s # %s\n",
1034 "DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS(regcache)",
1035 XSTRING (DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS (regcache)));
1036 fprintf_unfiltered (file,
1037 "gdbarch_dump: DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS = <0x%08lx>\n",
1038 (long) current_gdbarch->deprecated_extract_struct_value_address
1039 /*DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS ()*/);
1040#endif
b1e29e33
AC		 1041#ifdef DEPRECATED_FIX_CALL_DUMMY_P
1042 fprintf_unfiltered (file,
1043 "gdbarch_dump: %s # %s\n",
1044 "DEPRECATED_FIX_CALL_DUMMY_P()",
1045 XSTRING (DEPRECATED_FIX_CALL_DUMMY_P ()));
1046 fprintf_unfiltered (file,
1047 "gdbarch_dump: DEPRECATED_FIX_CALL_DUMMY_P() = %d\n",
1048 DEPRECATED_FIX_CALL_DUMMY_P ());
1049#endif
1050#ifdef DEPRECATED_FIX_CALL_DUMMY
b1e29e33
AC		 1051 fprintf_unfiltered (file,
1052 "gdbarch_dump: %s # %s\n",
1053 "DEPRECATED_FIX_CALL_DUMMY(dummy, pc, fun, nargs, args, type, gcc_p)",
1054 XSTRING (DEPRECATED_FIX_CALL_DUMMY (dummy, pc, fun, nargs, args, type, gcc_p)));
7996bcec
AC		 1055 fprintf_unfiltered (file,
1056 "gdbarch_dump: DEPRECATED_FIX_CALL_DUMMY = <0x%08lx>\n",
1057 (long) current_gdbarch->deprecated_fix_call_dummy
1058 /*DEPRECATED_FIX_CALL_DUMMY ()*/);
b1e29e33 1059#endif
0ba6dca9
AC		 1060#ifdef DEPRECATED_FP_REGNUM
1061 fprintf_unfiltered (file,
1062 "gdbarch_dump: DEPRECATED_FP_REGNUM # %s\n",
1063 XSTRING (DEPRECATED_FP_REGNUM));
1064 fprintf_unfiltered (file,
1065 "gdbarch_dump: DEPRECATED_FP_REGNUM = %d\n",
1066 DEPRECATED_FP_REGNUM);
1067#endif
19772a2c
AC		 1068#ifdef DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P
1069 fprintf_unfiltered (file,
1070 "gdbarch_dump: %s # %s\n",
1071 "DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P()",
1072 XSTRING (DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P ()));
1073 fprintf_unfiltered (file,
1074 "gdbarch_dump: DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P() = %d\n",
1075 DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P ());
1076#endif
1077#ifdef DEPRECATED_FRAMELESS_FUNCTION_INVOCATION
1078 fprintf_unfiltered (file,
1079 "gdbarch_dump: %s # %s\n",
1080 "DEPRECATED_FRAMELESS_FUNCTION_INVOCATION(fi)",
1081 XSTRING (DEPRECATED_FRAMELESS_FUNCTION_INVOCATION (fi)));
1082 fprintf_unfiltered (file,
1083 "gdbarch_dump: DEPRECATED_FRAMELESS_FUNCTION_INVOCATION = <0x%08lx>\n",
1084 (long) current_gdbarch->deprecated_frameless_function_invocation
1085 /*DEPRECATED_FRAMELESS_FUNCTION_INVOCATION ()*/);
1086#endif
42efa47a
AC		 1087#ifdef DEPRECATED_FRAME_ARGS_ADDRESS_P
1088 fprintf_unfiltered (file,
1089 "gdbarch_dump: %s # %s\n",
1090 "DEPRECATED_FRAME_ARGS_ADDRESS_P()",
1091 XSTRING (DEPRECATED_FRAME_ARGS_ADDRESS_P ()));
1092 fprintf_unfiltered (file,
1093 "gdbarch_dump: DEPRECATED_FRAME_ARGS_ADDRESS_P() = %d\n",
1094 DEPRECATED_FRAME_ARGS_ADDRESS_P ());
1095#endif
1096#ifdef DEPRECATED_FRAME_ARGS_ADDRESS
1097 fprintf_unfiltered (file,
1098 "gdbarch_dump: %s # %s\n",
1099 "DEPRECATED_FRAME_ARGS_ADDRESS(fi)",
1100 XSTRING (DEPRECATED_FRAME_ARGS_ADDRESS (fi)));
7996bcec
AC		 1101 fprintf_unfiltered (file,
1102 "gdbarch_dump: DEPRECATED_FRAME_ARGS_ADDRESS = <0x%08lx>\n",
1103 (long) current_gdbarch->deprecated_frame_args_address
1104 /*DEPRECATED_FRAME_ARGS_ADDRESS ()*/);
42efa47a 1105#endif
618ce49f
AC		 1106#ifdef DEPRECATED_FRAME_CHAIN_P
1107 fprintf_unfiltered (file,
1108 "gdbarch_dump: %s # %s\n",
1109 "DEPRECATED_FRAME_CHAIN_P()",
1110 XSTRING (DEPRECATED_FRAME_CHAIN_P ()));
1111 fprintf_unfiltered (file,
1112 "gdbarch_dump: DEPRECATED_FRAME_CHAIN_P() = %d\n",
1113 DEPRECATED_FRAME_CHAIN_P ());
1114#endif
1115#ifdef DEPRECATED_FRAME_CHAIN
1116 fprintf_unfiltered (file,
1117 "gdbarch_dump: %s # %s\n",
1118 "DEPRECATED_FRAME_CHAIN(frame)",
1119 XSTRING (DEPRECATED_FRAME_CHAIN (frame)));
7996bcec
AC		 1120 fprintf_unfiltered (file,
1121 "gdbarch_dump: DEPRECATED_FRAME_CHAIN = <0x%08lx>\n",
1122 (long) current_gdbarch->deprecated_frame_chain
1123 /*DEPRECATED_FRAME_CHAIN ()*/);
618ce49f
AC		 1124#endif
1125#ifdef DEPRECATED_FRAME_CHAIN_VALID_P
1126 fprintf_unfiltered (file,
1127 "gdbarch_dump: %s # %s\n",
1128 "DEPRECATED_FRAME_CHAIN_VALID_P()",
1129 XSTRING (DEPRECATED_FRAME_CHAIN_VALID_P ()));
1130 fprintf_unfiltered (file,
1131 "gdbarch_dump: DEPRECATED_FRAME_CHAIN_VALID_P() = %d\n",
1132 DEPRECATED_FRAME_CHAIN_VALID_P ());
1133#endif
1134#ifdef DEPRECATED_FRAME_CHAIN_VALID
1135 fprintf_unfiltered (file,
1136 "gdbarch_dump: %s # %s\n",
1137 "DEPRECATED_FRAME_CHAIN_VALID(chain, thisframe)",
1138 XSTRING (DEPRECATED_FRAME_CHAIN_VALID (chain, thisframe)));
7996bcec
AC		 1139 fprintf_unfiltered (file,
1140 "gdbarch_dump: DEPRECATED_FRAME_CHAIN_VALID = <0x%08lx>\n",
1141 (long) current_gdbarch->deprecated_frame_chain_valid
1142 /*DEPRECATED_FRAME_CHAIN_VALID ()*/);
618ce49f 1143#endif
f30ee0bc
AC		 1144#ifdef DEPRECATED_FRAME_INIT_SAVED_REGS_P
1145 fprintf_unfiltered (file,
1146 "gdbarch_dump: %s # %s\n",
1147 "DEPRECATED_FRAME_INIT_SAVED_REGS_P()",
1148 XSTRING (DEPRECATED_FRAME_INIT_SAVED_REGS_P ()));
1149 fprintf_unfiltered (file,
1150 "gdbarch_dump: DEPRECATED_FRAME_INIT_SAVED_REGS_P() = %d\n",
1151 DEPRECATED_FRAME_INIT_SAVED_REGS_P ());
1152#endif
1153#ifdef DEPRECATED_FRAME_INIT_SAVED_REGS
f30ee0bc
AC		 1154 fprintf_unfiltered (file,
1155 "gdbarch_dump: %s # %s\n",
1156 "DEPRECATED_FRAME_INIT_SAVED_REGS(frame)",
1157 XSTRING (DEPRECATED_FRAME_INIT_SAVED_REGS (frame)));
7996bcec
AC		 1158 fprintf_unfiltered (file,
1159 "gdbarch_dump: DEPRECATED_FRAME_INIT_SAVED_REGS = <0x%08lx>\n",
1160 (long) current_gdbarch->deprecated_frame_init_saved_regs
1161 /*DEPRECATED_FRAME_INIT_SAVED_REGS ()*/);
f30ee0bc 1162#endif
42efa47a
AC		 1163#ifdef DEPRECATED_FRAME_LOCALS_ADDRESS_P
1164 fprintf_unfiltered (file,
1165 "gdbarch_dump: %s # %s\n",
1166 "DEPRECATED_FRAME_LOCALS_ADDRESS_P()",
1167 XSTRING (DEPRECATED_FRAME_LOCALS_ADDRESS_P ()));
1168 fprintf_unfiltered (file,
1169 "gdbarch_dump: DEPRECATED_FRAME_LOCALS_ADDRESS_P() = %d\n",
1170 DEPRECATED_FRAME_LOCALS_ADDRESS_P ());
1171#endif
1172#ifdef DEPRECATED_FRAME_LOCALS_ADDRESS
1173 fprintf_unfiltered (file,
1174 "gdbarch_dump: %s # %s\n",
1175 "DEPRECATED_FRAME_LOCALS_ADDRESS(fi)",
1176 XSTRING (DEPRECATED_FRAME_LOCALS_ADDRESS (fi)));
7996bcec
AC		 1177 fprintf_unfiltered (file,
1178 "gdbarch_dump: DEPRECATED_FRAME_LOCALS_ADDRESS = <0x%08lx>\n",
1179 (long) current_gdbarch->deprecated_frame_locals_address
1180 /*DEPRECATED_FRAME_LOCALS_ADDRESS ()*/);
42efa47a 1181#endif
8bedc050
AC		 1182#ifdef DEPRECATED_FRAME_SAVED_PC_P
1183 fprintf_unfiltered (file,
1184 "gdbarch_dump: %s # %s\n",
1185 "DEPRECATED_FRAME_SAVED_PC_P()",
1186 XSTRING (DEPRECATED_FRAME_SAVED_PC_P ()));
1187 fprintf_unfiltered (file,
1188 "gdbarch_dump: DEPRECATED_FRAME_SAVED_PC_P() = %d\n",
1189 DEPRECATED_FRAME_SAVED_PC_P ());
1190#endif
1191#ifdef DEPRECATED_FRAME_SAVED_PC
1192 fprintf_unfiltered (file,
1193 "gdbarch_dump: %s # %s\n",
1194 "DEPRECATED_FRAME_SAVED_PC(fi)",
1195 XSTRING (DEPRECATED_FRAME_SAVED_PC (fi)));
7996bcec
AC		 1196 fprintf_unfiltered (file,
1197 "gdbarch_dump: DEPRECATED_FRAME_SAVED_PC = <0x%08lx>\n",
1198 (long) current_gdbarch->deprecated_frame_saved_pc
1199 /*DEPRECATED_FRAME_SAVED_PC ()*/);
8bedc050 1200#endif
129c1cd6
AC		 1201#ifdef DEPRECATED_GET_SAVED_REGISTER_P
1202 fprintf_unfiltered (file,
1203 "gdbarch_dump: %s # %s\n",
1204 "DEPRECATED_GET_SAVED_REGISTER_P()",
1205 XSTRING (DEPRECATED_GET_SAVED_REGISTER_P ()));
1206 fprintf_unfiltered (file,
1207 "gdbarch_dump: DEPRECATED_GET_SAVED_REGISTER_P() = %d\n",
1208 DEPRECATED_GET_SAVED_REGISTER_P ());
1209#endif
1210#ifdef DEPRECATED_GET_SAVED_REGISTER
129c1cd6
AC		 1211 fprintf_unfiltered (file,
1212 "gdbarch_dump: %s # %s\n",
1213 "DEPRECATED_GET_SAVED_REGISTER(raw_buffer, optimized, addrp, frame, regnum, lval)",
1214 XSTRING (DEPRECATED_GET_SAVED_REGISTER (raw_buffer, optimized, addrp, frame, regnum, lval)));
7996bcec
AC		 1215 fprintf_unfiltered (file,
1216 "gdbarch_dump: DEPRECATED_GET_SAVED_REGISTER = <0x%08lx>\n",
1217 (long) current_gdbarch->deprecated_get_saved_register
1218 /*DEPRECATED_GET_SAVED_REGISTER ()*/);
129c1cd6 1219#endif
e9582e71
AC		 1220#ifdef DEPRECATED_INIT_EXTRA_FRAME_INFO_P
1221 fprintf_unfiltered (file,
1222 "gdbarch_dump: %s # %s\n",
1223 "DEPRECATED_INIT_EXTRA_FRAME_INFO_P()",
1224 XSTRING (DEPRECATED_INIT_EXTRA_FRAME_INFO_P ()));
1225 fprintf_unfiltered (file,
1226 "gdbarch_dump: DEPRECATED_INIT_EXTRA_FRAME_INFO_P() = %d\n",
1227 DEPRECATED_INIT_EXTRA_FRAME_INFO_P ());
1228#endif
1229#ifdef DEPRECATED_INIT_EXTRA_FRAME_INFO
e9582e71
AC		 1230 fprintf_unfiltered (file,
1231 "gdbarch_dump: %s # %s\n",
1232 "DEPRECATED_INIT_EXTRA_FRAME_INFO(fromleaf, frame)",
1233 XSTRING (DEPRECATED_INIT_EXTRA_FRAME_INFO (fromleaf, frame)));
7996bcec
AC		 1234 fprintf_unfiltered (file,
1235 "gdbarch_dump: DEPRECATED_INIT_EXTRA_FRAME_INFO = <0x%08lx>\n",
1236 (long) current_gdbarch->deprecated_init_extra_frame_info
1237 /*DEPRECATED_INIT_EXTRA_FRAME_INFO ()*/);
e9582e71 1238#endif
a5afb99f
AC		 1239#ifdef DEPRECATED_INIT_FRAME_PC_P
1240 fprintf_unfiltered (file,
1241 "gdbarch_dump: %s # %s\n",
1242 "DEPRECATED_INIT_FRAME_PC_P()",
1243 XSTRING (DEPRECATED_INIT_FRAME_PC_P ()));
1244 fprintf_unfiltered (file,
1245 "gdbarch_dump: DEPRECATED_INIT_FRAME_PC_P() = %d\n",
1246 DEPRECATED_INIT_FRAME_PC_P ());
1247#endif
1248#ifdef DEPRECATED_INIT_FRAME_PC
1249 fprintf_unfiltered (file,
1250 "gdbarch_dump: %s # %s\n",
1251 "DEPRECATED_INIT_FRAME_PC(fromleaf, prev)",
1252 XSTRING (DEPRECATED_INIT_FRAME_PC (fromleaf, prev)));
7996bcec
AC		 1253 fprintf_unfiltered (file,
1254 "gdbarch_dump: DEPRECATED_INIT_FRAME_PC = <0x%08lx>\n",
1255 (long) current_gdbarch->deprecated_init_frame_pc
1256 /*DEPRECATED_INIT_FRAME_PC ()*/);
a5afb99f 1257#endif
a0ed5532
AC		 1258#ifdef DEPRECATED_MAX_REGISTER_RAW_SIZE_P
1259 fprintf_unfiltered (file,
1260 "gdbarch_dump: %s # %s\n",
1261 "DEPRECATED_MAX_REGISTER_RAW_SIZE_P()",
1262 XSTRING (DEPRECATED_MAX_REGISTER_RAW_SIZE_P ()));
1263 fprintf_unfiltered (file,
1264 "gdbarch_dump: DEPRECATED_MAX_REGISTER_RAW_SIZE_P() = %d\n",
1265 DEPRECATED_MAX_REGISTER_RAW_SIZE_P ());
1266#endif
1267#ifdef DEPRECATED_MAX_REGISTER_RAW_SIZE
1268 fprintf_unfiltered (file,
1269 "gdbarch_dump: DEPRECATED_MAX_REGISTER_RAW_SIZE # %s\n",
1270 XSTRING (DEPRECATED_MAX_REGISTER_RAW_SIZE));
1271 fprintf_unfiltered (file,
1272 "gdbarch_dump: DEPRECATED_MAX_REGISTER_RAW_SIZE = %d\n",
1273 DEPRECATED_MAX_REGISTER_RAW_SIZE);
1274#endif
1275#ifdef DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P
1276 fprintf_unfiltered (file,
1277 "gdbarch_dump: %s # %s\n",
1278 "DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P()",
1279 XSTRING (DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P ()));
1280 fprintf_unfiltered (file,
1281 "gdbarch_dump: DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P() = %d\n",
1282 DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P ());
1283#endif
1284#ifdef DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE
1285 fprintf_unfiltered (file,
1286 "gdbarch_dump: DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE # %s\n",
1287 XSTRING (DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE));
1288 fprintf_unfiltered (file,
1289 "gdbarch_dump: DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE = %d\n",
1290 DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE);
1291#endif
1e9f55d0
AC		 1292#ifdef DEPRECATED_PC_IN_CALL_DUMMY_P
1293 fprintf_unfiltered (file,
1294 "gdbarch_dump: %s # %s\n",
1295 "DEPRECATED_PC_IN_CALL_DUMMY_P()",
1296 XSTRING (DEPRECATED_PC_IN_CALL_DUMMY_P ()));
1297 fprintf_unfiltered (file,
1298 "gdbarch_dump: DEPRECATED_PC_IN_CALL_DUMMY_P() = %d\n",
1299 DEPRECATED_PC_IN_CALL_DUMMY_P ());
1300#endif
ae45cd16
AC		 1301#ifdef DEPRECATED_PC_IN_CALL_DUMMY
1302 fprintf_unfiltered (file,
1303 "gdbarch_dump: %s # %s\n",
1304 "DEPRECATED_PC_IN_CALL_DUMMY(pc, sp, frame_address)",
1305 XSTRING (DEPRECATED_PC_IN_CALL_DUMMY (pc, sp, frame_address)));
7996bcec
AC		 1306 fprintf_unfiltered (file,
1307 "gdbarch_dump: DEPRECATED_PC_IN_CALL_DUMMY = <0x%08lx>\n",
1308 (long) current_gdbarch->deprecated_pc_in_call_dummy
1309 /*DEPRECATED_PC_IN_CALL_DUMMY ()*/);
ae45cd16 1310#endif
f561f026
AC		 1311#ifdef DEPRECATED_PC_IN_SIGTRAMP_P
1312 fprintf_unfiltered (file,
1313 "gdbarch_dump: %s # %s\n",
1314 "DEPRECATED_PC_IN_SIGTRAMP_P()",
1315 XSTRING (DEPRECATED_PC_IN_SIGTRAMP_P ()));
1316 fprintf_unfiltered (file,
1317 "gdbarch_dump: DEPRECATED_PC_IN_SIGTRAMP_P() = %d\n",
1318 DEPRECATED_PC_IN_SIGTRAMP_P ());
1319#endif
1320#ifdef DEPRECATED_PC_IN_SIGTRAMP
1321 fprintf_unfiltered (file,
1322 "gdbarch_dump: %s # %s\n",
1323 "DEPRECATED_PC_IN_SIGTRAMP(pc, name)",
1324 XSTRING (DEPRECATED_PC_IN_SIGTRAMP (pc, name)));
1325 fprintf_unfiltered (file,
1326 "gdbarch_dump: DEPRECATED_PC_IN_SIGTRAMP = <0x%08lx>\n",
1327 (long) current_gdbarch->deprecated_pc_in_sigtramp
1328 /*DEPRECATED_PC_IN_SIGTRAMP ()*/);
1329#endif
749b82f6
AC		 1330#ifdef DEPRECATED_POP_FRAME_P
1331 fprintf_unfiltered (file,
1332 "gdbarch_dump: %s # %s\n",
1333 "DEPRECATED_POP_FRAME_P()",
1334 XSTRING (DEPRECATED_POP_FRAME_P ()));
1335 fprintf_unfiltered (file,
1336 "gdbarch_dump: DEPRECATED_POP_FRAME_P() = %d\n",
1337 DEPRECATED_POP_FRAME_P ());
1338#endif
1339#ifdef DEPRECATED_POP_FRAME
749b82f6
AC		 1340 fprintf_unfiltered (file,
1341 "gdbarch_dump: %s # %s\n",
1342 "DEPRECATED_POP_FRAME(-)",
1343 XSTRING (DEPRECATED_POP_FRAME (-)));
7996bcec
AC		 1344 fprintf_unfiltered (file,
1345 "gdbarch_dump: DEPRECATED_POP_FRAME = <0x%08lx>\n",
1346 (long) current_gdbarch->deprecated_pop_frame
1347 /*DEPRECATED_POP_FRAME ()*/);
749b82f6 1348#endif
b81774d8
AC		 1349#ifdef DEPRECATED_PUSH_ARGUMENTS_P
1350 fprintf_unfiltered (file,
1351 "gdbarch_dump: %s # %s\n",
1352 "DEPRECATED_PUSH_ARGUMENTS_P()",
1353 XSTRING (DEPRECATED_PUSH_ARGUMENTS_P ()));
1354 fprintf_unfiltered (file,
1355 "gdbarch_dump: DEPRECATED_PUSH_ARGUMENTS_P() = %d\n",
1356 DEPRECATED_PUSH_ARGUMENTS_P ());
1357#endif
1358#ifdef DEPRECATED_PUSH_ARGUMENTS
1359 fprintf_unfiltered (file,
1360 "gdbarch_dump: %s # %s\n",
1361 "DEPRECATED_PUSH_ARGUMENTS(nargs, args, sp, struct_return, struct_addr)",
1362 XSTRING (DEPRECATED_PUSH_ARGUMENTS (nargs, args, sp, struct_return, struct_addr)));
7996bcec
AC		 1363 fprintf_unfiltered (file,
1364 "gdbarch_dump: DEPRECATED_PUSH_ARGUMENTS = <0x%08lx>\n",
1365 (long) current_gdbarch->deprecated_push_arguments
1366 /*DEPRECATED_PUSH_ARGUMENTS ()*/);
b81774d8 1367#endif
f3824013
AC		 1368#ifdef DEPRECATED_PUSH_DUMMY_FRAME_P
1369 fprintf_unfiltered (file,
1370 "gdbarch_dump: %s # %s\n",
1371 "DEPRECATED_PUSH_DUMMY_FRAME_P()",
1372 XSTRING (DEPRECATED_PUSH_DUMMY_FRAME_P ()));
1373 fprintf_unfiltered (file,
1374 "gdbarch_dump: DEPRECATED_PUSH_DUMMY_FRAME_P() = %d\n",
1375 DEPRECATED_PUSH_DUMMY_FRAME_P ());
1376#endif
1377#ifdef DEPRECATED_PUSH_DUMMY_FRAME
f3824013
AC		 1378 fprintf_unfiltered (file,
1379 "gdbarch_dump: %s # %s\n",
1380 "DEPRECATED_PUSH_DUMMY_FRAME(-)",
1381 XSTRING (DEPRECATED_PUSH_DUMMY_FRAME (-)));
7996bcec
AC		 1382 fprintf_unfiltered (file,
1383 "gdbarch_dump: DEPRECATED_PUSH_DUMMY_FRAME = <0x%08lx>\n",
1384 (long) current_gdbarch->deprecated_push_dummy_frame
1385 /*DEPRECATED_PUSH_DUMMY_FRAME ()*/);
f3824013 1386#endif
28f617b3
AC		 1387#ifdef DEPRECATED_PUSH_RETURN_ADDRESS_P
1388 fprintf_unfiltered (file,
1389 "gdbarch_dump: %s # %s\n",
1390 "DEPRECATED_PUSH_RETURN_ADDRESS_P()",
1391 XSTRING (DEPRECATED_PUSH_RETURN_ADDRESS_P ()));
1392 fprintf_unfiltered (file,
1393 "gdbarch_dump: DEPRECATED_PUSH_RETURN_ADDRESS_P() = %d\n",
1394 DEPRECATED_PUSH_RETURN_ADDRESS_P ());
1395#endif
1396#ifdef DEPRECATED_PUSH_RETURN_ADDRESS
1397 fprintf_unfiltered (file,
1398 "gdbarch_dump: %s # %s\n",
1399 "DEPRECATED_PUSH_RETURN_ADDRESS(pc, sp)",
1400 XSTRING (DEPRECATED_PUSH_RETURN_ADDRESS (pc, sp)));
7996bcec
AC		 1401 fprintf_unfiltered (file,
1402 "gdbarch_dump: DEPRECATED_PUSH_RETURN_ADDRESS = <0x%08lx>\n",
1403 (long) current_gdbarch->deprecated_push_return_address
1404 /*DEPRECATED_PUSH_RETURN_ADDRESS ()*/);
28f617b3 1405#endif
62700349
AC		 1406#ifdef DEPRECATED_REGISTER_BYTE_P
1407 fprintf_unfiltered (file,
1408 "gdbarch_dump: %s # %s\n",
1409 "DEPRECATED_REGISTER_BYTE_P()",
1410 XSTRING (DEPRECATED_REGISTER_BYTE_P ()));
1411 fprintf_unfiltered (file,
1412 "gdbarch_dump: DEPRECATED_REGISTER_BYTE_P() = %d\n",
1413 DEPRECATED_REGISTER_BYTE_P ());
1414#endif
1415#ifdef DEPRECATED_REGISTER_BYTE
1416 fprintf_unfiltered (file,
1417 "gdbarch_dump: %s # %s\n",
1418 "DEPRECATED_REGISTER_BYTE(reg_nr)",
1419 XSTRING (DEPRECATED_REGISTER_BYTE (reg_nr)));
1420 fprintf_unfiltered (file,
1421 "gdbarch_dump: DEPRECATED_REGISTER_BYTE = <0x%08lx>\n",
1422 (long) current_gdbarch->deprecated_register_byte
1423 /*DEPRECATED_REGISTER_BYTE ()*/);
1424#endif
b8b527c5
AC		 1425#ifdef DEPRECATED_REGISTER_BYTES
1426 fprintf_unfiltered (file,
1427 "gdbarch_dump: DEPRECATED_REGISTER_BYTES # %s\n",
1428 XSTRING (DEPRECATED_REGISTER_BYTES));
1429 fprintf_unfiltered (file,
1430 "gdbarch_dump: DEPRECATED_REGISTER_BYTES = %d\n",
1431 DEPRECATED_REGISTER_BYTES);
1432#endif
cd0bfa36
AC		 1433#ifdef DEPRECATED_REGISTER_CONVERTIBLE_P
1434 fprintf_unfiltered (file,
1435 "gdbarch_dump: %s # %s\n",
1436 "DEPRECATED_REGISTER_CONVERTIBLE_P()",
1437 XSTRING (DEPRECATED_REGISTER_CONVERTIBLE_P ()));
1438 fprintf_unfiltered (file,
1439 "gdbarch_dump: DEPRECATED_REGISTER_CONVERTIBLE_P() = %d\n",
1440 DEPRECATED_REGISTER_CONVERTIBLE_P ());
1441#endif
781a750d
AC		 1442#ifdef DEPRECATED_REGISTER_CONVERTIBLE
1443 fprintf_unfiltered (file,
1444 "gdbarch_dump: %s # %s\n",
1445 "DEPRECATED_REGISTER_CONVERTIBLE(nr)",
1446 XSTRING (DEPRECATED_REGISTER_CONVERTIBLE (nr)));
7996bcec
AC		 1447 fprintf_unfiltered (file,
1448 "gdbarch_dump: DEPRECATED_REGISTER_CONVERTIBLE = <0x%08lx>\n",
1449 (long) current_gdbarch->deprecated_register_convertible
1450 /*DEPRECATED_REGISTER_CONVERTIBLE ()*/);
781a750d
AC		 1451#endif
1452#ifdef DEPRECATED_REGISTER_CONVERT_TO_RAW
781a750d
AC		 1453 fprintf_unfiltered (file,
1454 "gdbarch_dump: %s # %s\n",
1455 "DEPRECATED_REGISTER_CONVERT_TO_RAW(type, regnum, from, to)",
1456 XSTRING (DEPRECATED_REGISTER_CONVERT_TO_RAW (type, regnum, from, to)));
7996bcec
AC		 1457 fprintf_unfiltered (file,
1458 "gdbarch_dump: DEPRECATED_REGISTER_CONVERT_TO_RAW = <0x%08lx>\n",
1459 (long) current_gdbarch->deprecated_register_convert_to_raw
1460 /*DEPRECATED_REGISTER_CONVERT_TO_RAW ()*/);
781a750d
AC		 1461#endif
1462#ifdef DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL
781a750d
AC		 1463 fprintf_unfiltered (file,
1464 "gdbarch_dump: %s # %s\n",
1465 "DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL(regnum, type, from, to)",
1466 XSTRING (DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL (regnum, type, from, to)));
7996bcec
AC		 1467 fprintf_unfiltered (file,
1468 "gdbarch_dump: DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL = <0x%08lx>\n",
1469 (long) current_gdbarch->deprecated_register_convert_to_virtual
1470 /*DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL ()*/);
781a750d 1471#endif
12c266ea
AC		 1472#ifdef DEPRECATED_REGISTER_RAW_SIZE_P
1473 fprintf_unfiltered (file,
1474 "gdbarch_dump: %s # %s\n",
1475 "DEPRECATED_REGISTER_RAW_SIZE_P()",
1476 XSTRING (DEPRECATED_REGISTER_RAW_SIZE_P ()));
1477 fprintf_unfiltered (file,
1478 "gdbarch_dump: DEPRECATED_REGISTER_RAW_SIZE_P() = %d\n",
1479 DEPRECATED_REGISTER_RAW_SIZE_P ());
1480#endif
1481#ifdef DEPRECATED_REGISTER_RAW_SIZE
1482 fprintf_unfiltered (file,
1483 "gdbarch_dump: %s # %s\n",
1484 "DEPRECATED_REGISTER_RAW_SIZE(reg_nr)",
1485 XSTRING (DEPRECATED_REGISTER_RAW_SIZE (reg_nr)));
1486 fprintf_unfiltered (file,
1487 "gdbarch_dump: DEPRECATED_REGISTER_RAW_SIZE = <0x%08lx>\n",
1488 (long) current_gdbarch->deprecated_register_raw_size
1489 /*DEPRECATED_REGISTER_RAW_SIZE ()*/);
1490#endif
b1e29e33
AC		 1491#ifdef DEPRECATED_REGISTER_SIZE
1492 fprintf_unfiltered (file,
1493 "gdbarch_dump: DEPRECATED_REGISTER_SIZE # %s\n",
1494 XSTRING (DEPRECATED_REGISTER_SIZE));
1495 fprintf_unfiltered (file,
1496 "gdbarch_dump: DEPRECATED_REGISTER_SIZE = %d\n",
1497 DEPRECATED_REGISTER_SIZE);
1498#endif
f30992d4
AC		 1499#ifdef DEPRECATED_REGISTER_VIRTUAL_SIZE_P
1500 fprintf_unfiltered (file,
1501 "gdbarch_dump: %s # %s\n",
1502 "DEPRECATED_REGISTER_VIRTUAL_SIZE_P()",
1503 XSTRING (DEPRECATED_REGISTER_VIRTUAL_SIZE_P ()));
1504 fprintf_unfiltered (file,
1505 "gdbarch_dump: DEPRECATED_REGISTER_VIRTUAL_SIZE_P() = %d\n",
1506 DEPRECATED_REGISTER_VIRTUAL_SIZE_P ());
1507#endif
1508#ifdef DEPRECATED_REGISTER_VIRTUAL_SIZE
1509 fprintf_unfiltered (file,
1510 "gdbarch_dump: %s # %s\n",
1511 "DEPRECATED_REGISTER_VIRTUAL_SIZE(reg_nr)",
1512 XSTRING (DEPRECATED_REGISTER_VIRTUAL_SIZE (reg_nr)));
1513 fprintf_unfiltered (file,
1514 "gdbarch_dump: DEPRECATED_REGISTER_VIRTUAL_SIZE = <0x%08lx>\n",
1515 (long) current_gdbarch->deprecated_register_virtual_size
1516 /*DEPRECATED_REGISTER_VIRTUAL_SIZE ()*/);
1517#endif
2e092625
AC		 1518#ifdef DEPRECATED_REGISTER_VIRTUAL_TYPE_P
1519 fprintf_unfiltered (file,
1520 "gdbarch_dump: %s # %s\n",
1521 "DEPRECATED_REGISTER_VIRTUAL_TYPE_P()",
1522 XSTRING (DEPRECATED_REGISTER_VIRTUAL_TYPE_P ()));
1523 fprintf_unfiltered (file,
1524 "gdbarch_dump: DEPRECATED_REGISTER_VIRTUAL_TYPE_P() = %d\n",
1525 DEPRECATED_REGISTER_VIRTUAL_TYPE_P ());
1526#endif
1527#ifdef DEPRECATED_REGISTER_VIRTUAL_TYPE
1528 fprintf_unfiltered (file,
1529 "gdbarch_dump: %s # %s\n",
1530 "DEPRECATED_REGISTER_VIRTUAL_TYPE(reg_nr)",
1531 XSTRING (DEPRECATED_REGISTER_VIRTUAL_TYPE (reg_nr)));
1532 fprintf_unfiltered (file,
1533 "gdbarch_dump: DEPRECATED_REGISTER_VIRTUAL_TYPE = <0x%08lx>\n",
1534 (long) current_gdbarch->deprecated_register_virtual_type
1535 /*DEPRECATED_REGISTER_VIRTUAL_TYPE ()*/);
1536#endif
88d89dbb
MK		 1537#ifdef DEPRECATED_REG_STRUCT_HAS_ADDR_P
1538 fprintf_unfiltered (file,
1539 "gdbarch_dump: %s # %s\n",
1540 "DEPRECATED_REG_STRUCT_HAS_ADDR_P()",
1541 XSTRING (DEPRECATED_REG_STRUCT_HAS_ADDR_P ()));
1542 fprintf_unfiltered (file,
1543 "gdbarch_dump: DEPRECATED_REG_STRUCT_HAS_ADDR_P() = %d\n",
1544 DEPRECATED_REG_STRUCT_HAS_ADDR_P ());
1545#endif
1546#ifdef DEPRECATED_REG_STRUCT_HAS_ADDR
1547 fprintf_unfiltered (file,
1548 "gdbarch_dump: %s # %s\n",
1549 "DEPRECATED_REG_STRUCT_HAS_ADDR(gcc_p, type)",
1550 XSTRING (DEPRECATED_REG_STRUCT_HAS_ADDR (gcc_p, type)));
1551 fprintf_unfiltered (file,
1552 "gdbarch_dump: DEPRECATED_REG_STRUCT_HAS_ADDR = <0x%08lx>\n",
1553 (long) current_gdbarch->deprecated_reg_struct_has_addr
1554 /*DEPRECATED_REG_STRUCT_HAS_ADDR ()*/);
1555#endif
6913c89a
AC		 1556#ifdef DEPRECATED_SAVED_PC_AFTER_CALL_P
1557 fprintf_unfiltered (file,
1558 "gdbarch_dump: %s # %s\n",
1559 "DEPRECATED_SAVED_PC_AFTER_CALL_P()",
1560 XSTRING (DEPRECATED_SAVED_PC_AFTER_CALL_P ()));
1561 fprintf_unfiltered (file,
1562 "gdbarch_dump: DEPRECATED_SAVED_PC_AFTER_CALL_P() = %d\n",
1563 DEPRECATED_SAVED_PC_AFTER_CALL_P ());
1564#endif
1565#ifdef DEPRECATED_SAVED_PC_AFTER_CALL
1566 fprintf_unfiltered (file,
1567 "gdbarch_dump: %s # %s\n",
1568 "DEPRECATED_SAVED_PC_AFTER_CALL(frame)",
1569 XSTRING (DEPRECATED_SAVED_PC_AFTER_CALL (frame)));
7996bcec
AC		 1570 fprintf_unfiltered (file,
1571 "gdbarch_dump: DEPRECATED_SAVED_PC_AFTER_CALL = <0x%08lx>\n",
1572 (long) current_gdbarch->deprecated_saved_pc_after_call
1573 /*DEPRECATED_SAVED_PC_AFTER_CALL ()*/);
6913c89a 1574#endif
a59fe496
AC		 1575#ifdef DEPRECATED_SAVE_DUMMY_FRAME_TOS_P
1576 fprintf_unfiltered (file,
1577 "gdbarch_dump: %s # %s\n",
1578 "DEPRECATED_SAVE_DUMMY_FRAME_TOS_P()",
1579 XSTRING (DEPRECATED_SAVE_DUMMY_FRAME_TOS_P ()));
1580 fprintf_unfiltered (file,
1581 "gdbarch_dump: DEPRECATED_SAVE_DUMMY_FRAME_TOS_P() = %d\n",
1582 DEPRECATED_SAVE_DUMMY_FRAME_TOS_P ());
1583#endif
1584#ifdef DEPRECATED_SAVE_DUMMY_FRAME_TOS
a59fe496
AC		 1585 fprintf_unfiltered (file,
1586 "gdbarch_dump: %s # %s\n",
1587 "DEPRECATED_SAVE_DUMMY_FRAME_TOS(sp)",
1588 XSTRING (DEPRECATED_SAVE_DUMMY_FRAME_TOS (sp)));
7996bcec
AC		 1589 fprintf_unfiltered (file,
1590 "gdbarch_dump: DEPRECATED_SAVE_DUMMY_FRAME_TOS = <0x%08lx>\n",
1591 (long) current_gdbarch->deprecated_save_dummy_frame_tos
1592 /*DEPRECATED_SAVE_DUMMY_FRAME_TOS ()*/);
a59fe496 1593#endif
aa2a3f87
AC		 1594#ifdef DEPRECATED_SIGTRAMP_END_P
1595 fprintf_unfiltered (file,
1596 "gdbarch_dump: %s # %s\n",
1597 "DEPRECATED_SIGTRAMP_END_P()",
1598 XSTRING (DEPRECATED_SIGTRAMP_END_P ()));
1599 fprintf_unfiltered (file,
1600 "gdbarch_dump: DEPRECATED_SIGTRAMP_END_P() = %d\n",
1601 DEPRECATED_SIGTRAMP_END_P ());
1602#endif
1603#ifdef DEPRECATED_SIGTRAMP_END
1604 fprintf_unfiltered (file,
1605 "gdbarch_dump: %s # %s\n",
1606 "DEPRECATED_SIGTRAMP_END(pc)",
1607 XSTRING (DEPRECATED_SIGTRAMP_END (pc)));
1608 fprintf_unfiltered (file,
1609 "gdbarch_dump: DEPRECATED_SIGTRAMP_END = <0x%08lx>\n",
1610 (long) current_gdbarch->deprecated_sigtramp_end
1611 /*DEPRECATED_SIGTRAMP_END ()*/);
1612#endif
1613#ifdef DEPRECATED_SIGTRAMP_START_P
1614 fprintf_unfiltered (file,
1615 "gdbarch_dump: %s # %s\n",
1616 "DEPRECATED_SIGTRAMP_START_P()",
1617 XSTRING (DEPRECATED_SIGTRAMP_START_P ()));
1618 fprintf_unfiltered (file,
1619 "gdbarch_dump: DEPRECATED_SIGTRAMP_START_P() = %d\n",
1620 DEPRECATED_SIGTRAMP_START_P ());
1621#endif
1622#ifdef DEPRECATED_SIGTRAMP_START
1623 fprintf_unfiltered (file,
1624 "gdbarch_dump: %s # %s\n",
1625 "DEPRECATED_SIGTRAMP_START(pc)",
1626 XSTRING (DEPRECATED_SIGTRAMP_START (pc)));
1627 fprintf_unfiltered (file,
1628 "gdbarch_dump: DEPRECATED_SIGTRAMP_START = <0x%08lx>\n",
1629 (long) current_gdbarch->deprecated_sigtramp_start
1630 /*DEPRECATED_SIGTRAMP_START ()*/);
1631#endif
b1e29e33
AC		 1632#ifdef DEPRECATED_SIZEOF_CALL_DUMMY_WORDS
1633 fprintf_unfiltered (file,
1634 "gdbarch_dump: DEPRECATED_SIZEOF_CALL_DUMMY_WORDS # %s\n",
1635 XSTRING (DEPRECATED_SIZEOF_CALL_DUMMY_WORDS));
1636 fprintf_unfiltered (file,
1637 "gdbarch_dump: DEPRECATED_SIZEOF_CALL_DUMMY_WORDS = %d\n",
1638 DEPRECATED_SIZEOF_CALL_DUMMY_WORDS);
1639#endif
f27dd7fd
AC		 1640#ifdef DEPRECATED_STACK_ALIGN_P
1641 fprintf_unfiltered (file,
1642 "gdbarch_dump: %s # %s\n",
1643 "DEPRECATED_STACK_ALIGN_P()",
1644 XSTRING (DEPRECATED_STACK_ALIGN_P ()));
1645 fprintf_unfiltered (file,
1646 "gdbarch_dump: DEPRECATED_STACK_ALIGN_P() = %d\n",
1647 DEPRECATED_STACK_ALIGN_P ());
1648#endif
1649#ifdef DEPRECATED_STACK_ALIGN
1650 fprintf_unfiltered (file,
1651 "gdbarch_dump: %s # %s\n",
1652 "DEPRECATED_STACK_ALIGN(sp)",
1653 XSTRING (DEPRECATED_STACK_ALIGN (sp)));
1654 fprintf_unfiltered (file,
1655 "gdbarch_dump: DEPRECATED_STACK_ALIGN = <0x%08lx>\n",
1656 (long) current_gdbarch->deprecated_stack_align
1657 /*DEPRECATED_STACK_ALIGN ()*/);
1658#endif
ebba8386 1659#ifdef DEPRECATED_STORE_RETURN_VALUE
ebba8386
AC		 1660 fprintf_unfiltered (file,
1661 "gdbarch_dump: %s # %s\n",
1662 "DEPRECATED_STORE_RETURN_VALUE(type, valbuf)",
1663 XSTRING (DEPRECATED_STORE_RETURN_VALUE (type, valbuf)));
7996bcec
AC		 1664 fprintf_unfiltered (file,
1665 "gdbarch_dump: DEPRECATED_STORE_RETURN_VALUE = <0x%08lx>\n",
1666 (long) current_gdbarch->deprecated_store_return_value
1667 /*DEPRECATED_STORE_RETURN_VALUE ()*/);
ebba8386 1668#endif
4183d812
AC		 1669#ifdef DEPRECATED_STORE_STRUCT_RETURN_P
1670 fprintf_unfiltered (file,
1671 "gdbarch_dump: %s # %s\n",
1672 "DEPRECATED_STORE_STRUCT_RETURN_P()",
1673 XSTRING (DEPRECATED_STORE_STRUCT_RETURN_P ()));
1674 fprintf_unfiltered (file,
1675 "gdbarch_dump: DEPRECATED_STORE_STRUCT_RETURN_P() = %d\n",
1676 DEPRECATED_STORE_STRUCT_RETURN_P ());
1677#endif
1678#ifdef DEPRECATED_STORE_STRUCT_RETURN
4183d812
AC		 1679 fprintf_unfiltered (file,
1680 "gdbarch_dump: %s # %s\n",
1681 "DEPRECATED_STORE_STRUCT_RETURN(addr, sp)",
1682 XSTRING (DEPRECATED_STORE_STRUCT_RETURN (addr, sp)));
7996bcec
AC		 1683 fprintf_unfiltered (file,
1684 "gdbarch_dump: DEPRECATED_STORE_STRUCT_RETURN = <0x%08lx>\n",
1685 (long) current_gdbarch->deprecated_store_struct_return
1686 /*DEPRECATED_STORE_STRUCT_RETURN ()*/);
4183d812 1687#endif
0ba6dca9
AC		 1688#ifdef DEPRECATED_TARGET_READ_FP_P
1689 fprintf_unfiltered (file,
1690 "gdbarch_dump: %s # %s\n",
1691 "DEPRECATED_TARGET_READ_FP_P()",
1692 XSTRING (DEPRECATED_TARGET_READ_FP_P ()));
1693 fprintf_unfiltered (file,
1694 "gdbarch_dump: DEPRECATED_TARGET_READ_FP_P() = %d\n",
1695 DEPRECATED_TARGET_READ_FP_P ());
1696#endif
1697#ifdef DEPRECATED_TARGET_READ_FP
1698 fprintf_unfiltered (file,
1699 "gdbarch_dump: %s # %s\n",
1700 "DEPRECATED_TARGET_READ_FP()",
1701 XSTRING (DEPRECATED_TARGET_READ_FP ()));
7996bcec
AC		 1702 fprintf_unfiltered (file,
1703 "gdbarch_dump: DEPRECATED_TARGET_READ_FP = <0x%08lx>\n",
1704 (long) current_gdbarch->deprecated_target_read_fp
1705 /*DEPRECATED_TARGET_READ_FP ()*/);
0ba6dca9 1706#endif
07555a72
AC		 1707#ifdef DEPRECATED_USE_GENERIC_DUMMY_FRAMES
1708 fprintf_unfiltered (file,
1709 "gdbarch_dump: DEPRECATED_USE_GENERIC_DUMMY_FRAMES # %s\n",
1710 XSTRING (DEPRECATED_USE_GENERIC_DUMMY_FRAMES));
1711 fprintf_unfiltered (file,
1712 "gdbarch_dump: DEPRECATED_USE_GENERIC_DUMMY_FRAMES = %d\n",
1713 DEPRECATED_USE_GENERIC_DUMMY_FRAMES);
1714#endif
08e45a40 1715#ifdef DWARF2_REG_TO_REGNUM
4b9b3959 1716 fprintf_unfiltered (file,
08e45a40
AC		 1717 "gdbarch_dump: %s # %s\n",
1718 "DWARF2_REG_TO_REGNUM(dwarf2_regnr)",
1719 XSTRING (DWARF2_REG_TO_REGNUM (dwarf2_regnr)));
7996bcec
AC		 1720 fprintf_unfiltered (file,
1721 "gdbarch_dump: DWARF2_REG_TO_REGNUM = <0x%08lx>\n",
1722 (long) current_gdbarch->dwarf2_reg_to_regnum
1723 /*DWARF2_REG_TO_REGNUM ()*/);
4b9b3959 1724#endif
08e45a40 1725#ifdef DWARF_REG_TO_REGNUM
88c72b7d
AC		 1726 fprintf_unfiltered (file,
1727 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 1728 "DWARF_REG_TO_REGNUM(dwarf_regnr)",
1729 XSTRING (DWARF_REG_TO_REGNUM (dwarf_regnr)));
7996bcec
AC		 1730 fprintf_unfiltered (file,
1731 "gdbarch_dump: DWARF_REG_TO_REGNUM = <0x%08lx>\n",
1732 (long) current_gdbarch->dwarf_reg_to_regnum
1733 /*DWARF_REG_TO_REGNUM ()*/);
88c72b7d
AC		 1734#endif
1735#ifdef ECOFF_REG_TO_REGNUM
1736 fprintf_unfiltered (file,
1737 "gdbarch_dump: %s # %s\n",
1738 "ECOFF_REG_TO_REGNUM(ecoff_regnr)",
1739 XSTRING (ECOFF_REG_TO_REGNUM (ecoff_regnr)));
7996bcec
AC		 1740 fprintf_unfiltered (file,
1741 "gdbarch_dump: ECOFF_REG_TO_REGNUM = <0x%08lx>\n",
1742 (long) current_gdbarch->ecoff_reg_to_regnum
1743 /*ECOFF_REG_TO_REGNUM ()*/);
88c72b7d 1744#endif
a2cf933a 1745#ifdef ELF_MAKE_MSYMBOL_SPECIAL
a2cf933a
EZ		 1746 fprintf_unfiltered (file,
1747 "gdbarch_dump: %s # %s\n",
1748 "ELF_MAKE_MSYMBOL_SPECIAL(sym, msym)",
1749 XSTRING (ELF_MAKE_MSYMBOL_SPECIAL (sym, msym)));
7996bcec
AC		 1750 fprintf_unfiltered (file,
1751 "gdbarch_dump: ELF_MAKE_MSYMBOL_SPECIAL = <0x%08lx>\n",
1752 (long) current_gdbarch->elf_make_msymbol_special
1753 /*ELF_MAKE_MSYMBOL_SPECIAL ()*/);
a2cf933a 1754#endif
049ee0e4 1755#ifdef EXTRACT_RETURN_VALUE
049ee0e4
AC		 1756 fprintf_unfiltered (file,
1757 "gdbarch_dump: %s # %s\n",
1758 "EXTRACT_RETURN_VALUE(type, regcache, valbuf)",
1759 XSTRING (EXTRACT_RETURN_VALUE (type, regcache, valbuf)));
7996bcec
AC		 1760 fprintf_unfiltered (file,
1761 "gdbarch_dump: EXTRACT_RETURN_VALUE = <0x%08lx>\n",
1762 (long) current_gdbarch->extract_return_value
1763 /*EXTRACT_RETURN_VALUE ()*/);
049ee0e4 1764#endif
143985b7
AF		 1765#ifdef FETCH_POINTER_ARGUMENT_P
1766 fprintf_unfiltered (file,
1767 "gdbarch_dump: %s # %s\n",
1768 "FETCH_POINTER_ARGUMENT_P()",
1769 XSTRING (FETCH_POINTER_ARGUMENT_P ()));
1770 fprintf_unfiltered (file,
1771 "gdbarch_dump: FETCH_POINTER_ARGUMENT_P() = %d\n",
1772 FETCH_POINTER_ARGUMENT_P ());
1773#endif
1774#ifdef FETCH_POINTER_ARGUMENT
1775 fprintf_unfiltered (file,
1776 "gdbarch_dump: %s # %s\n",
1777 "FETCH_POINTER_ARGUMENT(frame, argi, type)",
1778 XSTRING (FETCH_POINTER_ARGUMENT (frame, argi, type)));
7996bcec
AC		 1779 fprintf_unfiltered (file,
1780 "gdbarch_dump: FETCH_POINTER_ARGUMENT = <0x%08lx>\n",
1781 (long) current_gdbarch->fetch_pointer_argument
1782 /*FETCH_POINTER_ARGUMENT ()*/);
143985b7 1783#endif
08e45a40 1784#ifdef FP0_REGNUM
4b9b3959 1785 fprintf_unfiltered (file,
08e45a40
AC		 1786 "gdbarch_dump: FP0_REGNUM # %s\n",
1787 XSTRING (FP0_REGNUM));
1788 fprintf_unfiltered (file,
06b25f14
AC		 1789 "gdbarch_dump: FP0_REGNUM = %d\n",
1790 FP0_REGNUM);
4b9b3959 1791#endif
08e45a40 1792#ifdef FRAME_ARGS_SKIP
4b9b3959 1793 fprintf_unfiltered (file,
08e45a40
AC		 1794 "gdbarch_dump: FRAME_ARGS_SKIP # %s\n",
1795 XSTRING (FRAME_ARGS_SKIP));
4b9b3959 1796 fprintf_unfiltered (file,
08e45a40
AC		 1797 "gdbarch_dump: FRAME_ARGS_SKIP = %ld\n",
1798 (long) FRAME_ARGS_SKIP);
4b9b3959 1799#endif
983a287a
AC		 1800#ifdef FRAME_NUM_ARGS_P
1801 fprintf_unfiltered (file,
1802 "gdbarch_dump: %s # %s\n",
1803 "FRAME_NUM_ARGS_P()",
1804 XSTRING (FRAME_NUM_ARGS_P ()));
1805 fprintf_unfiltered (file,
1806 "gdbarch_dump: FRAME_NUM_ARGS_P() = %d\n",
1807 FRAME_NUM_ARGS_P ());
1808#endif
08e45a40 1809#ifdef FRAME_NUM_ARGS
01fb7433
AC		 1810 fprintf_unfiltered (file,
1811 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 1812 "FRAME_NUM_ARGS(frame)",
1813 XSTRING (FRAME_NUM_ARGS (frame)));
7996bcec
AC		 1814 fprintf_unfiltered (file,
1815 "gdbarch_dump: FRAME_NUM_ARGS = <0x%08lx>\n",
1816 (long) current_gdbarch->frame_num_args
1817 /*FRAME_NUM_ARGS ()*/);
01fb7433 1818#endif
8b148df9
AC		 1819#ifdef FRAME_RED_ZONE_SIZE
1820 fprintf_unfiltered (file,
1821 "gdbarch_dump: FRAME_RED_ZONE_SIZE # %s\n",
1822 XSTRING (FRAME_RED_ZONE_SIZE));
1823 fprintf_unfiltered (file,
1824 "gdbarch_dump: FRAME_RED_ZONE_SIZE = %d\n",
1825 FRAME_RED_ZONE_SIZE);
1826#endif
08e45a40 1827#ifdef FUNCTION_START_OFFSET
4b9b3959 1828 fprintf_unfiltered (file,
08e45a40
AC		 1829 "gdbarch_dump: FUNCTION_START_OFFSET # %s\n",
1830 XSTRING (FUNCTION_START_OFFSET));
4b9b3959 1831 fprintf_unfiltered (file,
08e45a40
AC		 1832 "gdbarch_dump: FUNCTION_START_OFFSET = %ld\n",
1833 (long) FUNCTION_START_OFFSET);
4b9b3959 1834#endif
1e9f55d0
AC		 1835#ifdef GET_LONGJMP_TARGET_P
1836 fprintf_unfiltered (file,
1837 "gdbarch_dump: %s # %s\n",
1838 "GET_LONGJMP_TARGET_P()",
1839 XSTRING (GET_LONGJMP_TARGET_P ()));
1840 fprintf_unfiltered (file,
1841 "gdbarch_dump: GET_LONGJMP_TARGET_P() = %d\n",
1842 GET_LONGJMP_TARGET_P ());
1843#endif
9df628e0
RE		 1844#ifdef GET_LONGJMP_TARGET
1845 fprintf_unfiltered (file,
1846 "gdbarch_dump: %s # %s\n",
1847 "GET_LONGJMP_TARGET(pc)",
1848 XSTRING (GET_LONGJMP_TARGET (pc)));
7996bcec
AC		 1849 fprintf_unfiltered (file,
1850 "gdbarch_dump: GET_LONGJMP_TARGET = <0x%08lx>\n",
1851 (long) current_gdbarch->get_longjmp_target
1852 /*GET_LONGJMP_TARGET ()*/);
9df628e0 1853#endif
967c0d83 1854#ifdef HAVE_NONSTEPPABLE_WATCHPOINT
f74fa174 1855 fprintf_unfiltered (file,
967c0d83
MM		 1856 "gdbarch_dump: HAVE_NONSTEPPABLE_WATCHPOINT # %s\n",
1857 XSTRING (HAVE_NONSTEPPABLE_WATCHPOINT));
f74fa174 1858 fprintf_unfiltered (file,
967c0d83
MM		 1859 "gdbarch_dump: HAVE_NONSTEPPABLE_WATCHPOINT = %d\n",
1860 HAVE_NONSTEPPABLE_WATCHPOINT);
f74fa174 1861#endif
08e45a40 1862#ifdef INNER_THAN
10312cc4
AC		 1863 fprintf_unfiltered (file,
1864 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 1865 "INNER_THAN(lhs, rhs)",
1866 XSTRING (INNER_THAN (lhs, rhs)));
7996bcec
AC		 1867 fprintf_unfiltered (file,
1868 "gdbarch_dump: INNER_THAN = <0x%08lx>\n",
1869 (long) current_gdbarch->inner_than
1870 /*INNER_THAN ()*/);
10312cc4 1871#endif
1e9f55d0
AC		 1872#ifdef INTEGER_TO_ADDRESS_P
1873 fprintf_unfiltered (file,
1874 "gdbarch_dump: %s # %s\n",
1875 "INTEGER_TO_ADDRESS_P()",
1876 XSTRING (INTEGER_TO_ADDRESS_P ()));
1877 fprintf_unfiltered (file,
1878 "gdbarch_dump: INTEGER_TO_ADDRESS_P() = %d\n",
1879 INTEGER_TO_ADDRESS_P ());
1880#endif
fc0c74b1
AC		 1881#ifdef INTEGER_TO_ADDRESS
1882 fprintf_unfiltered (file,
1883 "gdbarch_dump: %s # %s\n",
1884 "INTEGER_TO_ADDRESS(type, buf)",
1885 XSTRING (INTEGER_TO_ADDRESS (type, buf)));
7996bcec
AC		 1886 fprintf_unfiltered (file,
1887 "gdbarch_dump: INTEGER_TO_ADDRESS = <0x%08lx>\n",
1888 (long) current_gdbarch->integer_to_address
1889 /*INTEGER_TO_ADDRESS ()*/);
fc0c74b1 1890#endif
5e74b15c
RE		 1891#ifdef IN_SOLIB_CALL_TRAMPOLINE
1892 fprintf_unfiltered (file,
1893 "gdbarch_dump: %s # %s\n",
1894 "IN_SOLIB_CALL_TRAMPOLINE(pc, name)",
1895 XSTRING (IN_SOLIB_CALL_TRAMPOLINE (pc, name)));
7996bcec
AC		 1896 fprintf_unfiltered (file,
1897 "gdbarch_dump: IN_SOLIB_CALL_TRAMPOLINE = <0x%08lx>\n",
1898 (long) current_gdbarch->in_solib_call_trampoline
1899 /*IN_SOLIB_CALL_TRAMPOLINE ()*/);
5e74b15c 1900#endif
d50355b6
MS		 1901#ifdef IN_SOLIB_RETURN_TRAMPOLINE
1902 fprintf_unfiltered (file,
1903 "gdbarch_dump: %s # %s\n",
1904 "IN_SOLIB_RETURN_TRAMPOLINE(pc, name)",
1905 XSTRING (IN_SOLIB_RETURN_TRAMPOLINE (pc, name)));
7996bcec
AC		 1906 fprintf_unfiltered (file,
1907 "gdbarch_dump: IN_SOLIB_RETURN_TRAMPOLINE = <0x%08lx>\n",
1908 (long) current_gdbarch->in_solib_return_trampoline
1909 /*IN_SOLIB_RETURN_TRAMPOLINE ()*/);
d50355b6 1910#endif
08e45a40 1911#ifdef MEMORY_INSERT_BREAKPOINT
4b9b3959
AC		 1912 fprintf_unfiltered (file,
1913 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 1914 "MEMORY_INSERT_BREAKPOINT(addr, contents_cache)",
1915 XSTRING (MEMORY_INSERT_BREAKPOINT (addr, contents_cache)));
7996bcec
AC		 1916 fprintf_unfiltered (file,
1917 "gdbarch_dump: MEMORY_INSERT_BREAKPOINT = <0x%08lx>\n",
1918 (long) current_gdbarch->memory_insert_breakpoint
1919 /*MEMORY_INSERT_BREAKPOINT ()*/);
4b9b3959 1920#endif
08e45a40 1921#ifdef MEMORY_REMOVE_BREAKPOINT
4b9b3959
AC		 1922 fprintf_unfiltered (file,
1923 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 1924 "MEMORY_REMOVE_BREAKPOINT(addr, contents_cache)",
1925 XSTRING (MEMORY_REMOVE_BREAKPOINT (addr, contents_cache)));
7996bcec
AC		 1926 fprintf_unfiltered (file,
1927 "gdbarch_dump: MEMORY_REMOVE_BREAKPOINT = <0x%08lx>\n",
1928 (long) current_gdbarch->memory_remove_breakpoint
1929 /*MEMORY_REMOVE_BREAKPOINT ()*/);
4b9b3959 1930#endif
5720643c
JB		 1931#ifdef NAME_OF_MALLOC
1932 fprintf_unfiltered (file,
1933 "gdbarch_dump: NAME_OF_MALLOC # %s\n",
1934 XSTRING (NAME_OF_MALLOC));
1935 fprintf_unfiltered (file,
31deffe5
AC		 1936 "gdbarch_dump: NAME_OF_MALLOC = %s\n",
1937 NAME_OF_MALLOC);
5720643c 1938#endif
08e45a40 1939#ifdef NUM_PSEUDO_REGS
4b9b3959 1940 fprintf_unfiltered (file,
08e45a40
AC		 1941 "gdbarch_dump: NUM_PSEUDO_REGS # %s\n",
1942 XSTRING (NUM_PSEUDO_REGS));
1943 fprintf_unfiltered (file,
06b25f14
AC		 1944 "gdbarch_dump: NUM_PSEUDO_REGS = %d\n",
1945 NUM_PSEUDO_REGS);
4b9b3959 1946#endif
08e45a40 1947#ifdef NUM_REGS
7f1b2585 1948 fprintf_unfiltered (file,
08e45a40
AC		 1949 "gdbarch_dump: NUM_REGS # %s\n",
1950 XSTRING (NUM_REGS));
1951 fprintf_unfiltered (file,
06b25f14
AC		 1952 "gdbarch_dump: NUM_REGS = %d\n",
1953 NUM_REGS);
7f1b2585 1954#endif
08e45a40
AC		 1955#ifdef PARM_BOUNDARY
1956 fprintf_unfiltered (file,
1957 "gdbarch_dump: PARM_BOUNDARY # %s\n",
1958 XSTRING (PARM_BOUNDARY));
1959 fprintf_unfiltered (file,
06b25f14
AC		 1960 "gdbarch_dump: PARM_BOUNDARY = %d\n",
1961 PARM_BOUNDARY);
08e45a40 1962#endif
08e45a40
AC		 1963#ifdef PC_REGNUM
1964 fprintf_unfiltered (file,
1965 "gdbarch_dump: PC_REGNUM # %s\n",
1966 XSTRING (PC_REGNUM));
1967 fprintf_unfiltered (file,
06b25f14
AC		 1968 "gdbarch_dump: PC_REGNUM = %d\n",
1969 PC_REGNUM);
7f1b2585 1970#endif
4b9b3959
AC		 1971#ifdef POINTER_TO_ADDRESS
1972 fprintf_unfiltered (file,
1973 "gdbarch_dump: %s # %s\n",
1974 "POINTER_TO_ADDRESS(type, buf)",
1975 XSTRING (POINTER_TO_ADDRESS (type, buf)));
7996bcec
AC		 1976 fprintf_unfiltered (file,
1977 "gdbarch_dump: POINTER_TO_ADDRESS = <0x%08lx>\n",
1978 (long) current_gdbarch->pointer_to_address
1979 /*POINTER_TO_ADDRESS ()*/);
5e74b15c 1980#endif
7996bcec
AC		 1981 fprintf_unfiltered (file,
1982 "gdbarch_dump: gdbarch_print_float_info_p() = %d\n",
1983 gdbarch_print_float_info_p (current_gdbarch));
1984 fprintf_unfiltered (file,
1985 "gdbarch_dump: print_float_info = 0x%08lx\n",
1986 (long) current_gdbarch->print_float_info);
1987 fprintf_unfiltered (file,
1988 "gdbarch_dump: print_registers_info = 0x%08lx\n",
1989 (long) current_gdbarch->print_registers_info);
1990 fprintf_unfiltered (file,
1991 "gdbarch_dump: gdbarch_print_vector_info_p() = %d\n",
1992 gdbarch_print_vector_info_p (current_gdbarch));
1993 fprintf_unfiltered (file,
1994 "gdbarch_dump: print_vector_info = 0x%08lx\n",
1995 (long) current_gdbarch->print_vector_info);
c2169756
AC		 1996#ifdef PS_REGNUM
1997 fprintf_unfiltered (file,
1998 "gdbarch_dump: PS_REGNUM # %s\n",
1999 XSTRING (PS_REGNUM));
2000 fprintf_unfiltered (file,
2001 "gdbarch_dump: PS_REGNUM = %d\n",
2002 PS_REGNUM);
2003#endif
7996bcec
AC		 2004 fprintf_unfiltered (file,
2005 "gdbarch_dump: gdbarch_push_dummy_call_p() = %d\n",
2006 gdbarch_push_dummy_call_p (current_gdbarch));
2007 fprintf_unfiltered (file,
2008 "gdbarch_dump: push_dummy_call = 0x%08lx\n",
2009 (long) current_gdbarch->push_dummy_call);
2010 fprintf_unfiltered (file,
2011 "gdbarch_dump: gdbarch_push_dummy_code_p() = %d\n",
2012 gdbarch_push_dummy_code_p (current_gdbarch));
2013 fprintf_unfiltered (file,
2014 "gdbarch_dump: push_dummy_code = 0x%08lx\n",
2015 (long) current_gdbarch->push_dummy_code);
1e9f55d0
AC		 2016#ifdef REGISTER_BYTES_OK_P
2017 fprintf_unfiltered (file,
2018 "gdbarch_dump: %s # %s\n",
2019 "REGISTER_BYTES_OK_P()",
2020 XSTRING (REGISTER_BYTES_OK_P ()));
2021 fprintf_unfiltered (file,
2022 "gdbarch_dump: REGISTER_BYTES_OK_P() = %d\n",
2023 REGISTER_BYTES_OK_P ());
2024#endif
08e45a40 2025#ifdef REGISTER_BYTES_OK
4b9b3959
AC		 2026 fprintf_unfiltered (file,
2027 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 2028 "REGISTER_BYTES_OK(nr_bytes)",
2029 XSTRING (REGISTER_BYTES_OK (nr_bytes)));
7996bcec
AC		 2030 fprintf_unfiltered (file,
2031 "gdbarch_dump: REGISTER_BYTES_OK = <0x%08lx>\n",
2032 (long) current_gdbarch->register_bytes_ok
2033 /*REGISTER_BYTES_OK ()*/);
4b9b3959 2034#endif
08e45a40 2035#ifdef REGISTER_NAME
4b9b3959
AC		 2036 fprintf_unfiltered (file,
2037 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 2038 "REGISTER_NAME(regnr)",
2039 XSTRING (REGISTER_NAME (regnr)));
7996bcec
AC		 2040 fprintf_unfiltered (file,
2041 "gdbarch_dump: REGISTER_NAME = <0x%08lx>\n",
2042 (long) current_gdbarch->register_name
2043 /*REGISTER_NAME ()*/);
4b9b3959 2044#endif
08e45a40 2045#ifdef REGISTER_SIM_REGNO
4b9b3959
AC		 2046 fprintf_unfiltered (file,
2047 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 2048 "REGISTER_SIM_REGNO(reg_nr)",
2049 XSTRING (REGISTER_SIM_REGNO (reg_nr)));
7996bcec
AC		 2050 fprintf_unfiltered (file,
2051 "gdbarch_dump: REGISTER_SIM_REGNO = <0x%08lx>\n",
2052 (long) current_gdbarch->register_sim_regno
2053 /*REGISTER_SIM_REGNO ()*/);
4b9b3959 2054#endif
13d01224 2055#ifdef REGISTER_TO_VALUE
13d01224
AC		 2056 fprintf_unfiltered (file,
2057 "gdbarch_dump: %s # %s\n",
ff2e87ac
AC		 2058 "REGISTER_TO_VALUE(frame, regnum, type, buf)",
2059 XSTRING (REGISTER_TO_VALUE (frame, regnum, type, buf)));
7996bcec
AC		 2060 fprintf_unfiltered (file,
2061 "gdbarch_dump: REGISTER_TO_VALUE = <0x%08lx>\n",
2062 (long) current_gdbarch->register_to_value
2063 /*REGISTER_TO_VALUE ()*/);
13d01224 2064#endif
7996bcec
AC		 2065 fprintf_unfiltered (file,
2066 "gdbarch_dump: gdbarch_register_type_p() = %d\n",
2067 gdbarch_register_type_p (current_gdbarch));
2068 fprintf_unfiltered (file,
2069 "gdbarch_dump: register_type = 0x%08lx\n",
2070 (long) current_gdbarch->register_type);
7996bcec
AC		 2071 fprintf_unfiltered (file,
2072 "gdbarch_dump: remote_translate_xfer_address = 0x%08lx\n",
2073 (long) current_gdbarch->remote_translate_xfer_address);
08e45a40 2074#ifdef RETURN_VALUE_ON_STACK
4b9b3959
AC		 2075 fprintf_unfiltered (file,
2076 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 2077 "RETURN_VALUE_ON_STACK(type)",
2078 XSTRING (RETURN_VALUE_ON_STACK (type)));
7996bcec
AC		 2079 fprintf_unfiltered (file,
2080 "gdbarch_dump: RETURN_VALUE_ON_STACK = <0x%08lx>\n",
2081 (long) current_gdbarch->return_value_on_stack
2082 /*RETURN_VALUE_ON_STACK ()*/);
4b9b3959 2083#endif
08e45a40 2084#ifdef SDB_REG_TO_REGNUM
4b9b3959
AC		 2085 fprintf_unfiltered (file,
2086 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 2087 "SDB_REG_TO_REGNUM(sdb_regnr)",
2088 XSTRING (SDB_REG_TO_REGNUM (sdb_regnr)));
7996bcec
AC		 2089 fprintf_unfiltered (file,
2090 "gdbarch_dump: SDB_REG_TO_REGNUM = <0x%08lx>\n",
2091 (long) current_gdbarch->sdb_reg_to_regnum
2092 /*SDB_REG_TO_REGNUM ()*/);
4b9b3959 2093#endif
08e45a40 2094#ifdef SKIP_PROLOGUE
4b9b3959
AC		 2095 fprintf_unfiltered (file,
2096 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 2097 "SKIP_PROLOGUE(ip)",
2098 XSTRING (SKIP_PROLOGUE (ip)));
7996bcec
AC		 2099 fprintf_unfiltered (file,
2100 "gdbarch_dump: SKIP_PROLOGUE = <0x%08lx>\n",
2101 (long) current_gdbarch->skip_prologue
2102 /*SKIP_PROLOGUE ()*/);
4b9b3959 2103#endif
dea0c52f 2104 fprintf_unfiltered (file,
4c8c40e6
MK		 2105 "gdbarch_dump: skip_solib_resolver = 0x%08lx\n",
2106 (long) current_gdbarch->skip_solib_resolver);
08e45a40 2107#ifdef SKIP_TRAMPOLINE_CODE
4b9b3959
AC		 2108 fprintf_unfiltered (file,
2109 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 2110 "SKIP_TRAMPOLINE_CODE(pc)",
2111 XSTRING (SKIP_TRAMPOLINE_CODE (pc)));
7996bcec
AC		 2112 fprintf_unfiltered (file,
2113 "gdbarch_dump: SKIP_TRAMPOLINE_CODE = <0x%08lx>\n",
2114 (long) current_gdbarch->skip_trampoline_code
2115 /*SKIP_TRAMPOLINE_CODE ()*/);
4b9b3959 2116#endif
181c1381
RE		 2117#ifdef SMASH_TEXT_ADDRESS
2118 fprintf_unfiltered (file,
2119 "gdbarch_dump: %s # %s\n",
2120 "SMASH_TEXT_ADDRESS(addr)",
2121 XSTRING (SMASH_TEXT_ADDRESS (addr)));
7996bcec
AC		 2122 fprintf_unfiltered (file,
2123 "gdbarch_dump: SMASH_TEXT_ADDRESS = <0x%08lx>\n",
2124 (long) current_gdbarch->smash_text_address
2125 /*SMASH_TEXT_ADDRESS ()*/);
181c1381 2126#endif
1e9f55d0
AC		 2127#ifdef SOFTWARE_SINGLE_STEP_P
2128 fprintf_unfiltered (file,
2129 "gdbarch_dump: %s # %s\n",
2130 "SOFTWARE_SINGLE_STEP_P()",
2131 XSTRING (SOFTWARE_SINGLE_STEP_P ()));
2132 fprintf_unfiltered (file,
2133 "gdbarch_dump: SOFTWARE_SINGLE_STEP_P() = %d\n",
2134 SOFTWARE_SINGLE_STEP_P ());
2135#endif
08e45a40 2136#ifdef SOFTWARE_SINGLE_STEP
4b9b3959
AC		 2137 fprintf_unfiltered (file,
2138 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 2139 "SOFTWARE_SINGLE_STEP(sig, insert_breakpoints_p)",
2140 XSTRING (SOFTWARE_SINGLE_STEP (sig, insert_breakpoints_p)));
7996bcec
AC		 2141 fprintf_unfiltered (file,
2142 "gdbarch_dump: SOFTWARE_SINGLE_STEP = <0x%08lx>\n",
2143 (long) current_gdbarch->software_single_step
2144 /*SOFTWARE_SINGLE_STEP ()*/);
08e45a40
AC		 2145#endif
2146#ifdef SP_REGNUM
1dd4193b 2147 fprintf_unfiltered (file,
08e45a40
AC		 2148 "gdbarch_dump: SP_REGNUM # %s\n",
2149 XSTRING (SP_REGNUM));
2150 fprintf_unfiltered (file,
06b25f14
AC		 2151 "gdbarch_dump: SP_REGNUM = %d\n",
2152 SP_REGNUM);
1dd4193b 2153#endif
08e45a40 2154#ifdef STAB_REG_TO_REGNUM
4b9b3959
AC		 2155 fprintf_unfiltered (file,
2156 "gdbarch_dump: %s # %s\n",
08e45a40
AC		 2157 "STAB_REG_TO_REGNUM(stab_regnr)",
2158 XSTRING (STAB_REG_TO_REGNUM (stab_regnr)));
7996bcec
AC		 2159 fprintf_unfiltered (file,
2160 "gdbarch_dump: STAB_REG_TO_REGNUM = <0x%08lx>\n",
2161 (long) current_gdbarch->stab_reg_to_regnum
2162 /*STAB_REG_TO_REGNUM ()*/);
4b9b3959 2163#endif
08e45a40 2164#ifdef STORE_RETURN_VALUE
f517ea4e
PS		 2165 fprintf_unfiltered (file,
2166 "gdbarch_dump: %s # %s\n",
ebba8386
AC		 2167 "STORE_RETURN_VALUE(type, regcache, valbuf)",
2168 XSTRING (STORE_RETURN_VALUE (type, regcache, valbuf)));
7996bcec
AC		 2169 fprintf_unfiltered (file,
2170 "gdbarch_dump: STORE_RETURN_VALUE = <0x%08lx>\n",
2171 (long) current_gdbarch->store_return_value
2172 /*STORE_RETURN_VALUE ()*/);
875e1767 2173#endif
08e45a40 2174#ifdef TARGET_ADDR_BIT
bdcd319a 2175 fprintf_unfiltered (file,
08e45a40
AC		 2176 "gdbarch_dump: TARGET_ADDR_BIT # %s\n",
2177 XSTRING (TARGET_ADDR_BIT));
2178 fprintf_unfiltered (file,
06b25f14
AC		 2179 "gdbarch_dump: TARGET_ADDR_BIT = %d\n",
2180 TARGET_ADDR_BIT);
bdcd319a 2181#endif
381323f4 2182#ifdef TARGET_ARCHITECTURE
08e45a40
AC		 2183 fprintf_unfiltered (file,
2184 "gdbarch_dump: TARGET_ARCHITECTURE # %s\n",
2185 XSTRING (TARGET_ARCHITECTURE));
0f71a2f6 2186 if (TARGET_ARCHITECTURE != NULL)
4b9b3959
AC		 2187 fprintf_unfiltered (file,
2188 "gdbarch_dump: TARGET_ARCHITECTURE = %s\n",
adf40b2e 2189 TARGET_ARCHITECTURE->printable_name);
381323f4 2190#endif
08e45a40
AC		 2191#ifdef TARGET_BFD_VMA_BIT
2192 fprintf_unfiltered (file,
2193 "gdbarch_dump: TARGET_BFD_VMA_BIT # %s\n",
2194 XSTRING (TARGET_BFD_VMA_BIT));
2195 fprintf_unfiltered (file,
06b25f14
AC		 2196 "gdbarch_dump: TARGET_BFD_VMA_BIT = %d\n",
2197 TARGET_BFD_VMA_BIT);
08e45a40 2198#endif
381323f4 2199#ifdef TARGET_BYTE_ORDER
08e45a40
AC		 2200 fprintf_unfiltered (file,
2201 "gdbarch_dump: TARGET_BYTE_ORDER # %s\n",
2202 XSTRING (TARGET_BYTE_ORDER));
4b9b3959
AC		 2203 fprintf_unfiltered (file,
2204 "gdbarch_dump: TARGET_BYTE_ORDER = %ld\n",
adf40b2e 2205 (long) TARGET_BYTE_ORDER);
381323f4 2206#endif
4e409299
JB		 2207#ifdef TARGET_CHAR_SIGNED
2208 fprintf_unfiltered (file,
2209 "gdbarch_dump: TARGET_CHAR_SIGNED # %s\n",
2210 XSTRING (TARGET_CHAR_SIGNED));
2211 fprintf_unfiltered (file,
06b25f14
AC		 2212 "gdbarch_dump: TARGET_CHAR_SIGNED = %d\n",
2213 TARGET_CHAR_SIGNED);
4e409299 2214#endif
08e45a40 2215#ifdef TARGET_DOUBLE_BIT
4b9b3959 2216 fprintf_unfiltered (file,
08e45a40
AC		 2217 "gdbarch_dump: TARGET_DOUBLE_BIT # %s\n",
2218 XSTRING (TARGET_DOUBLE_BIT));
4b9b3959 2219 fprintf_unfiltered (file,
06b25f14
AC		 2220 "gdbarch_dump: TARGET_DOUBLE_BIT = %d\n",
2221 TARGET_DOUBLE_BIT);
381323f4 2222#endif
08e45a40 2223#ifdef TARGET_DOUBLE_FORMAT
4b9b3959 2224 fprintf_unfiltered (file,
08e45a40
AC		 2225 "gdbarch_dump: TARGET_DOUBLE_FORMAT # %s\n",
2226 XSTRING (TARGET_DOUBLE_FORMAT));
4b9b3959 2227 fprintf_unfiltered (file,
f09cffaa 2228 "gdbarch_dump: TARGET_DOUBLE_FORMAT = %s\n",
52f87c51 2229 (TARGET_DOUBLE_FORMAT)->name);
381323f4
AC		 2230#endif
2231#ifdef TARGET_FLOAT_BIT
08e45a40
AC		 2232 fprintf_unfiltered (file,
2233 "gdbarch_dump: TARGET_FLOAT_BIT # %s\n",
2234 XSTRING (TARGET_FLOAT_BIT));
4b9b3959 2235 fprintf_unfiltered (file,
06b25f14
AC		 2236 "gdbarch_dump: TARGET_FLOAT_BIT = %d\n",
2237 TARGET_FLOAT_BIT);
381323f4 2238#endif
08e45a40 2239#ifdef TARGET_FLOAT_FORMAT
4b9b3959 2240 fprintf_unfiltered (file,
08e45a40
AC		 2241 "gdbarch_dump: TARGET_FLOAT_FORMAT # %s\n",
2242 XSTRING (TARGET_FLOAT_FORMAT));
2243 fprintf_unfiltered (file,
f09cffaa 2244 "gdbarch_dump: TARGET_FLOAT_FORMAT = %s\n",
52f87c51 2245 (TARGET_FLOAT_FORMAT)->name);
08e45a40
AC		 2246#endif
2247#ifdef TARGET_INT_BIT
2248 fprintf_unfiltered (file,
2249 "gdbarch_dump: TARGET_INT_BIT # %s\n",
2250 XSTRING (TARGET_INT_BIT));
2251 fprintf_unfiltered (file,
06b25f14
AC		 2252 "gdbarch_dump: TARGET_INT_BIT = %d\n",
2253 TARGET_INT_BIT);
08e45a40
AC		 2254#endif
2255#ifdef TARGET_LONG_BIT
2256 fprintf_unfiltered (file,
2257 "gdbarch_dump: TARGET_LONG_BIT # %s\n",
2258 XSTRING (TARGET_LONG_BIT));
2259 fprintf_unfiltered (file,
06b25f14
AC		 2260 "gdbarch_dump: TARGET_LONG_BIT = %d\n",
2261 TARGET_LONG_BIT);
381323f4
AC		 2262#endif
2263#ifdef TARGET_LONG_DOUBLE_BIT
08e45a40
AC		 2264 fprintf_unfiltered (file,
2265 "gdbarch_dump: TARGET_LONG_DOUBLE_BIT # %s\n",
2266 XSTRING (TARGET_LONG_DOUBLE_BIT));
4b9b3959 2267 fprintf_unfiltered (file,
06b25f14
AC		 2268 "gdbarch_dump: TARGET_LONG_DOUBLE_BIT = %d\n",
2269 TARGET_LONG_DOUBLE_BIT);
381323f4 2270#endif
08e45a40 2271#ifdef TARGET_LONG_DOUBLE_FORMAT
66b43ecb 2272 fprintf_unfiltered (file,
08e45a40
AC		 2273 "gdbarch_dump: TARGET_LONG_DOUBLE_FORMAT # %s\n",
2274 XSTRING (TARGET_LONG_DOUBLE_FORMAT));
52204a0b 2275 fprintf_unfiltered (file,
f09cffaa 2276 "gdbarch_dump: TARGET_LONG_DOUBLE_FORMAT = %s\n",
52f87c51 2277 (TARGET_LONG_DOUBLE_FORMAT)->name);
52204a0b 2278#endif
08e45a40 2279#ifdef TARGET_LONG_LONG_BIT
66b43ecb 2280 fprintf_unfiltered (file,
08e45a40
AC		 2281 "gdbarch_dump: TARGET_LONG_LONG_BIT # %s\n",
2282 XSTRING (TARGET_LONG_LONG_BIT));
4b9b3959 2283 fprintf_unfiltered (file,
06b25f14
AC		 2284 "gdbarch_dump: TARGET_LONG_LONG_BIT = %d\n",
2285 TARGET_LONG_LONG_BIT);
381323f4 2286#endif
4be87837
DJ		 2287#ifdef TARGET_OSABI
2288 fprintf_unfiltered (file,
2289 "gdbarch_dump: TARGET_OSABI # %s\n",
2290 XSTRING (TARGET_OSABI));
2291 fprintf_unfiltered (file,
2292 "gdbarch_dump: TARGET_OSABI = %ld\n",
2293 (long) TARGET_OSABI);
2294#endif
08e45a40
AC		 2295#ifdef TARGET_PRINT_INSN
2296 fprintf_unfiltered (file,
2297 "gdbarch_dump: %s # %s\n",
2298 "TARGET_PRINT_INSN(vma, info)",
2299 XSTRING (TARGET_PRINT_INSN (vma, info)));
7996bcec
AC		 2300 fprintf_unfiltered (file,
2301 "gdbarch_dump: TARGET_PRINT_INSN = <0x%08lx>\n",
2302 (long) current_gdbarch->print_insn
2303 /*TARGET_PRINT_INSN ()*/);
381323f4 2304#endif
08e45a40
AC		 2305#ifdef TARGET_PTR_BIT
2306 fprintf_unfiltered (file,
2307 "gdbarch_dump: TARGET_PTR_BIT # %s\n",
2308 XSTRING (TARGET_PTR_BIT));
2309 fprintf_unfiltered (file,
06b25f14
AC		 2310 "gdbarch_dump: TARGET_PTR_BIT = %d\n",
2311 TARGET_PTR_BIT);
381323f4 2312#endif
cde9ea48
AC		 2313#ifdef TARGET_READ_PC_P
2314 fprintf_unfiltered (file,
2315 "gdbarch_dump: %s # %s\n",
2316 "TARGET_READ_PC_P()",
2317 XSTRING (TARGET_READ_PC_P ()));
2318 fprintf_unfiltered (file,
2319 "gdbarch_dump: TARGET_READ_PC_P() = %d\n",
2320 TARGET_READ_PC_P ());
2321#endif
08e45a40
AC		 2322#ifdef TARGET_READ_PC
2323 fprintf_unfiltered (file,
2324 "gdbarch_dump: %s # %s\n",
2325 "TARGET_READ_PC(ptid)",
2326 XSTRING (TARGET_READ_PC (ptid)));
7996bcec
AC		 2327 fprintf_unfiltered (file,
2328 "gdbarch_dump: TARGET_READ_PC = <0x%08lx>\n",
2329 (long) current_gdbarch->read_pc
2330 /*TARGET_READ_PC ()*/);
381323f4 2331#endif
bd1ce8ba
AC		 2332#ifdef TARGET_READ_SP_P
2333 fprintf_unfiltered (file,
2334 "gdbarch_dump: %s # %s\n",
2335 "TARGET_READ_SP_P()",
2336 XSTRING (TARGET_READ_SP_P ()));
2337 fprintf_unfiltered (file,
2338 "gdbarch_dump: TARGET_READ_SP_P() = %d\n",
2339 TARGET_READ_SP_P ());
2340#endif
381323f4 2341#ifdef TARGET_READ_SP
08e45a40
AC		 2342 fprintf_unfiltered (file,
2343 "gdbarch_dump: %s # %s\n",
2344 "TARGET_READ_SP()",
2345 XSTRING (TARGET_READ_SP ()));
7996bcec
AC		 2346 fprintf_unfiltered (file,
2347 "gdbarch_dump: TARGET_READ_SP = <0x%08lx>\n",
2348 (long) current_gdbarch->read_sp
2349 /*TARGET_READ_SP ()*/);
381323f4 2350#endif
08e45a40
AC		 2351#ifdef TARGET_SHORT_BIT
2352 fprintf_unfiltered (file,
2353 "gdbarch_dump: TARGET_SHORT_BIT # %s\n",
2354 XSTRING (TARGET_SHORT_BIT));
2355 fprintf_unfiltered (file,
06b25f14
AC		 2356 "gdbarch_dump: TARGET_SHORT_BIT = %d\n",
2357 TARGET_SHORT_BIT);
39d4ef09
AC		 2358#endif
2359#ifdef TARGET_VIRTUAL_FRAME_POINTER
08e45a40
AC		 2360 fprintf_unfiltered (file,
2361 "gdbarch_dump: %s # %s\n",
2362 "TARGET_VIRTUAL_FRAME_POINTER(pc, frame_regnum, frame_offset)",
2363 XSTRING (TARGET_VIRTUAL_FRAME_POINTER (pc, frame_regnum, frame_offset)));
7996bcec
AC		 2364 fprintf_unfiltered (file,
2365 "gdbarch_dump: TARGET_VIRTUAL_FRAME_POINTER = <0x%08lx>\n",
2366 (long) current_gdbarch->virtual_frame_pointer
2367 /*TARGET_VIRTUAL_FRAME_POINTER ()*/);
381323f4 2368#endif
08e45a40 2369#ifdef TARGET_WRITE_PC
4b9b3959 2370 fprintf_unfiltered (file,
08e45a40
AC		 2371 "gdbarch_dump: %s # %s\n",
2372 "TARGET_WRITE_PC(val, ptid)",
2373 XSTRING (TARGET_WRITE_PC (val, ptid)));
7996bcec
AC		 2374 fprintf_unfiltered (file,
2375 "gdbarch_dump: TARGET_WRITE_PC = <0x%08lx>\n",
2376 (long) current_gdbarch->write_pc
2377 /*TARGET_WRITE_PC ()*/);
381323f4 2378#endif
7996bcec
AC		 2379 fprintf_unfiltered (file,
2380 "gdbarch_dump: gdbarch_unwind_dummy_id_p() = %d\n",
2381 gdbarch_unwind_dummy_id_p (current_gdbarch));
2382 fprintf_unfiltered (file,
2383 "gdbarch_dump: unwind_dummy_id = 0x%08lx\n",
2384 (long) current_gdbarch->unwind_dummy_id);
2385 fprintf_unfiltered (file,
2386 "gdbarch_dump: gdbarch_unwind_pc_p() = %d\n",
2387 gdbarch_unwind_pc_p (current_gdbarch));
2388 fprintf_unfiltered (file,
2389 "gdbarch_dump: unwind_pc = 0x%08lx\n",
2390 (long) current_gdbarch->unwind_pc);
2391 fprintf_unfiltered (file,
2392 "gdbarch_dump: gdbarch_unwind_sp_p() = %d\n",
2393 gdbarch_unwind_sp_p (current_gdbarch));
2394 fprintf_unfiltered (file,
2395 "gdbarch_dump: unwind_sp = 0x%08lx\n",
2396 (long) current_gdbarch->unwind_sp);
08e45a40 2397#ifdef USE_STRUCT_CONVENTION
4b9b3959 2398 fprintf_unfiltered (file,
08e45a40
AC		 2399 "gdbarch_dump: %s # %s\n",
2400 "USE_STRUCT_CONVENTION(gcc_p, value_type)",
2401 XSTRING (USE_STRUCT_CONVENTION (gcc_p, value_type)));
7996bcec
AC		 2402 fprintf_unfiltered (file,
2403 "gdbarch_dump: USE_STRUCT_CONVENTION = <0x%08lx>\n",
2404 (long) current_gdbarch->use_struct_convention
2405 /*USE_STRUCT_CONVENTION ()*/);
13d01224
AC		 2406#endif
2407#ifdef VALUE_TO_REGISTER
13d01224
AC		 2408 fprintf_unfiltered (file,
2409 "gdbarch_dump: %s # %s\n",
ff2e87ac
AC		 2410 "VALUE_TO_REGISTER(frame, regnum, type, buf)",
2411 XSTRING (VALUE_TO_REGISTER (frame, regnum, type, buf)));
7996bcec
AC		 2412 fprintf_unfiltered (file,
2413 "gdbarch_dump: VALUE_TO_REGISTER = <0x%08lx>\n",
2414 (long) current_gdbarch->value_to_register
2415 /*VALUE_TO_REGISTER ()*/);
381323f4 2416#endif
4b9b3959
AC		 2417 if (current_gdbarch->dump_tdep != NULL)
2418 current_gdbarch->dump_tdep (current_gdbarch, file);
0f71a2f6
JM		 2419}
2420
2421struct gdbarch_tdep *
104c1213 2422gdbarch_tdep (struct gdbarch *gdbarch)
0f71a2f6
JM		 2423{
2424 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2425 fprintf_unfiltered (gdb_stdlog, "gdbarch_tdep called\n");
2426 return gdbarch->tdep;
2427}
2428
2429
2430const struct bfd_arch_info *
104c1213 2431gdbarch_bfd_arch_info (struct gdbarch *gdbarch)
0f71a2f6 2432{
8de9bdc4 2433 gdb_assert (gdbarch != NULL);
0f71a2f6 2434 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2435 fprintf_unfiltered (gdb_stdlog, "gdbarch_bfd_arch_info called\n");
2436 return gdbarch->bfd_arch_info;
2437}
2438
2439int
104c1213 2440gdbarch_byte_order (struct gdbarch *gdbarch)
0f71a2f6 2441{
8de9bdc4 2442 gdb_assert (gdbarch != NULL);
0f71a2f6 2443 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2444 fprintf_unfiltered (gdb_stdlog, "gdbarch_byte_order called\n");
2445 return gdbarch->byte_order;
2446}
2447
4be87837
DJ		 2448enum gdb_osabi
2449gdbarch_osabi (struct gdbarch *gdbarch)
2450{
2451 gdb_assert (gdbarch != NULL);
2452 if (gdbarch_debug >= 2)
2453 fprintf_unfiltered (gdb_stdlog, "gdbarch_osabi called\n");
2454 return gdbarch->osabi;
2455}
2456
0f71a2f6 2457int
104c1213 2458gdbarch_short_bit (struct gdbarch *gdbarch)
0f71a2f6 2459{
8de9bdc4 2460 gdb_assert (gdbarch != NULL);
66b43ecb 2461 /* Skip verify of short_bit, invalid_p == 0 */
0f71a2f6 2462 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2463 fprintf_unfiltered (gdb_stdlog, "gdbarch_short_bit called\n");
2464 return gdbarch->short_bit;
2465}
2466
2467void
104c1213
JM		 2468set_gdbarch_short_bit (struct gdbarch *gdbarch,
2469 int short_bit)
0f71a2f6
JM		 2470{
2471 gdbarch->short_bit = short_bit;
2472}
2473
2474int
104c1213 2475gdbarch_int_bit (struct gdbarch *gdbarch)
0f71a2f6 2476{
8de9bdc4 2477 gdb_assert (gdbarch != NULL);
66b43ecb 2478 /* Skip verify of int_bit, invalid_p == 0 */
0f71a2f6 2479 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2480 fprintf_unfiltered (gdb_stdlog, "gdbarch_int_bit called\n");
2481 return gdbarch->int_bit;
2482}
2483
2484void
104c1213
JM		 2485set_gdbarch_int_bit (struct gdbarch *gdbarch,
2486 int int_bit)
0f71a2f6
JM		 2487{
2488 gdbarch->int_bit = int_bit;
2489}
2490
2491int
104c1213 2492gdbarch_long_bit (struct gdbarch *gdbarch)
0f71a2f6 2493{
8de9bdc4 2494 gdb_assert (gdbarch != NULL);
66b43ecb 2495 /* Skip verify of long_bit, invalid_p == 0 */
0f71a2f6 2496 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2497 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_bit called\n");
2498 return gdbarch->long_bit;
2499}
2500
2501void
104c1213
JM		 2502set_gdbarch_long_bit (struct gdbarch *gdbarch,
2503 int long_bit)
0f71a2f6
JM		 2504{
2505 gdbarch->long_bit = long_bit;
2506}
2507
2508int
104c1213 2509gdbarch_long_long_bit (struct gdbarch *gdbarch)
0f71a2f6 2510{
8de9bdc4 2511 gdb_assert (gdbarch != NULL);
66b43ecb 2512 /* Skip verify of long_long_bit, invalid_p == 0 */
0f71a2f6 2513 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2514 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_long_bit called\n");
2515 return gdbarch->long_long_bit;
2516}
2517
2518void
104c1213
JM		 2519set_gdbarch_long_long_bit (struct gdbarch *gdbarch,
2520 int long_long_bit)
0f71a2f6
JM		 2521{
2522 gdbarch->long_long_bit = long_long_bit;
2523}
2524
2525int
104c1213 2526gdbarch_float_bit (struct gdbarch *gdbarch)
0f71a2f6 2527{
8de9bdc4 2528 gdb_assert (gdbarch != NULL);
66b43ecb 2529 /* Skip verify of float_bit, invalid_p == 0 */
0f71a2f6 2530 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2531 fprintf_unfiltered (gdb_stdlog, "gdbarch_float_bit called\n");
2532 return gdbarch->float_bit;
2533}
2534
2535void
104c1213
JM		 2536set_gdbarch_float_bit (struct gdbarch *gdbarch,
2537 int float_bit)
0f71a2f6
JM		 2538{
2539 gdbarch->float_bit = float_bit;
2540}
2541
2542int
104c1213 2543gdbarch_double_bit (struct gdbarch *gdbarch)
0f71a2f6 2544{
8de9bdc4 2545 gdb_assert (gdbarch != NULL);
66b43ecb 2546 /* Skip verify of double_bit, invalid_p == 0 */
0f71a2f6 2547 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2548 fprintf_unfiltered (gdb_stdlog, "gdbarch_double_bit called\n");
2549 return gdbarch->double_bit;
2550}
2551
2552void
104c1213
JM		 2553set_gdbarch_double_bit (struct gdbarch *gdbarch,
2554 int double_bit)
0f71a2f6
JM		 2555{
2556 gdbarch->double_bit = double_bit;
2557}
2558
2559int
104c1213 2560gdbarch_long_double_bit (struct gdbarch *gdbarch)
0f71a2f6 2561{
8de9bdc4 2562 gdb_assert (gdbarch != NULL);
66b43ecb 2563 /* Skip verify of long_double_bit, invalid_p == 0 */
0f71a2f6 2564 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2565 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_double_bit called\n");
2566 return gdbarch->long_double_bit;
2567}
2568
2569void
104c1213
JM		 2570set_gdbarch_long_double_bit (struct gdbarch *gdbarch,
2571 int long_double_bit)
0f71a2f6
JM		 2572{
2573 gdbarch->long_double_bit = long_double_bit;
2574}
2575
66b43ecb
AC		 2576int
2577gdbarch_ptr_bit (struct gdbarch *gdbarch)
2578{
8de9bdc4 2579 gdb_assert (gdbarch != NULL);
66b43ecb
AC		 2580 /* Skip verify of ptr_bit, invalid_p == 0 */
2581 if (gdbarch_debug >= 2)
2582 fprintf_unfiltered (gdb_stdlog, "gdbarch_ptr_bit called\n");
2583 return gdbarch->ptr_bit;
2584}
2585
2586void
2587set_gdbarch_ptr_bit (struct gdbarch *gdbarch,
2588 int ptr_bit)
2589{
2590 gdbarch->ptr_bit = ptr_bit;
2591}
2592
52204a0b
DT		 2593int
2594gdbarch_addr_bit (struct gdbarch *gdbarch)
2595{
8de9bdc4 2596 gdb_assert (gdbarch != NULL);
956ac328
AC		 2597 /* Check variable changed from pre-default. */
2598 gdb_assert (gdbarch->addr_bit != 0);
52204a0b
DT		 2599 if (gdbarch_debug >= 2)
2600 fprintf_unfiltered (gdb_stdlog, "gdbarch_addr_bit called\n");
2601 return gdbarch->addr_bit;
2602}
2603
2604void
2605set_gdbarch_addr_bit (struct gdbarch *gdbarch,
2606 int addr_bit)
2607{
2608 gdbarch->addr_bit = addr_bit;
2609}
2610
66b43ecb
AC		 2611int
2612gdbarch_bfd_vma_bit (struct gdbarch *gdbarch)
2613{
8de9bdc4 2614 gdb_assert (gdbarch != NULL);
66b43ecb
AC		 2615 /* Skip verify of bfd_vma_bit, invalid_p == 0 */
2616 if (gdbarch_debug >= 2)
2617 fprintf_unfiltered (gdb_stdlog, "gdbarch_bfd_vma_bit called\n");
2618 return gdbarch->bfd_vma_bit;
2619}
2620
2621void
2622set_gdbarch_bfd_vma_bit (struct gdbarch *gdbarch,
2623 int bfd_vma_bit)
2624{
2625 gdbarch->bfd_vma_bit = bfd_vma_bit;
2626}
2627
4e409299
JB		 2628int
2629gdbarch_char_signed (struct gdbarch *gdbarch)
2630{
8de9bdc4 2631 gdb_assert (gdbarch != NULL);
956ac328
AC		 2632 /* Check variable changed from pre-default. */
2633 gdb_assert (gdbarch->char_signed != -1);
4e409299
JB		 2634 if (gdbarch_debug >= 2)
2635 fprintf_unfiltered (gdb_stdlog, "gdbarch_char_signed called\n");
2636 return gdbarch->char_signed;
2637}
2638
2639void
2640set_gdbarch_char_signed (struct gdbarch *gdbarch,
2641 int char_signed)
2642{
2643 gdbarch->char_signed = char_signed;
2644}
2645
cde9ea48
AC		 2646int
2647gdbarch_read_pc_p (struct gdbarch *gdbarch)
2648{
2649 gdb_assert (gdbarch != NULL);
956ac328 2650 return gdbarch->read_pc != NULL;
cde9ea48
AC		 2651}
2652
0f71a2f6 2653CORE_ADDR
39f77062 2654gdbarch_read_pc (struct gdbarch *gdbarch, ptid_t ptid)
0f71a2f6 2655{
8de9bdc4 2656 gdb_assert (gdbarch != NULL);
956ac328 2657 gdb_assert (gdbarch->read_pc != NULL);
0f71a2f6 2658 if (gdbarch_debug >= 2)
0f71a2f6 2659 fprintf_unfiltered (gdb_stdlog, "gdbarch_read_pc called\n");
39f77062 2660 return gdbarch->read_pc (ptid);
0f71a2f6
JM		 2661}
2662
2663void
104c1213
JM		 2664set_gdbarch_read_pc (struct gdbarch *gdbarch,
2665 gdbarch_read_pc_ftype read_pc)
0f71a2f6
JM		 2666{
2667 gdbarch->read_pc = read_pc;
2668}
2669
2670void
39f77062 2671gdbarch_write_pc (struct gdbarch *gdbarch, CORE_ADDR val, ptid_t ptid)
0f71a2f6 2672{
8de9bdc4 2673 gdb_assert (gdbarch != NULL);
956ac328 2674 gdb_assert (gdbarch->write_pc != NULL);
0f71a2f6 2675 if (gdbarch_debug >= 2)
0f71a2f6 2676 fprintf_unfiltered (gdb_stdlog, "gdbarch_write_pc called\n");
39f77062 2677 gdbarch->write_pc (val, ptid);
0f71a2f6
JM		 2678}
2679
2680void
104c1213
JM		 2681set_gdbarch_write_pc (struct gdbarch *gdbarch,
2682 gdbarch_write_pc_ftype write_pc)
0f71a2f6
JM		 2683{
2684 gdbarch->write_pc = write_pc;
2685}
2686
bd1ce8ba
AC		 2687int
2688gdbarch_read_sp_p (struct gdbarch *gdbarch)
2689{
2690 gdb_assert (gdbarch != NULL);
956ac328 2691 return gdbarch->read_sp != NULL;
bd1ce8ba
AC		 2692}
2693
0f71a2f6
JM		 2694CORE_ADDR
2695gdbarch_read_sp (struct gdbarch *gdbarch)
2696{
8de9bdc4 2697 gdb_assert (gdbarch != NULL);
956ac328 2698 gdb_assert (gdbarch->read_sp != NULL);
0f71a2f6 2699 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2700 fprintf_unfiltered (gdb_stdlog, "gdbarch_read_sp called\n");
2701 return gdbarch->read_sp ();
2702}
2703
2704void
104c1213
JM		 2705set_gdbarch_read_sp (struct gdbarch *gdbarch,
2706 gdbarch_read_sp_ftype read_sp)
0f71a2f6
JM		 2707{
2708 gdbarch->read_sp = read_sp;
2709}
2710
39d4ef09
AC		 2711void
2712gdbarch_virtual_frame_pointer (struct gdbarch *gdbarch, CORE_ADDR pc, int *frame_regnum, LONGEST *frame_offset)
2713{
8de9bdc4 2714 gdb_assert (gdbarch != NULL);
956ac328 2715 gdb_assert (gdbarch->virtual_frame_pointer != NULL);
39d4ef09
AC		 2716 if (gdbarch_debug >= 2)
2717 fprintf_unfiltered (gdb_stdlog, "gdbarch_virtual_frame_pointer called\n");
2718 gdbarch->virtual_frame_pointer (pc, frame_regnum, frame_offset);
2719}
2720
2721void
2722set_gdbarch_virtual_frame_pointer (struct gdbarch *gdbarch,
2723 gdbarch_virtual_frame_pointer_ftype virtual_frame_pointer)
2724{
2725 gdbarch->virtual_frame_pointer = virtual_frame_pointer;
2726}
2727
61a0eb5b 2728int
d8124050 2729gdbarch_pseudo_register_read_p (struct gdbarch *gdbarch)
61a0eb5b 2730{
8de9bdc4 2731 gdb_assert (gdbarch != NULL);
956ac328 2732 return gdbarch->pseudo_register_read != NULL;
61a0eb5b
AC		 2733}
2734
2735void
d8124050 2736gdbarch_pseudo_register_read (struct gdbarch *gdbarch, struct regcache *regcache, int cookednum, void *buf)
61a0eb5b 2737{
8de9bdc4 2738 gdb_assert (gdbarch != NULL);
956ac328 2739 gdb_assert (gdbarch->pseudo_register_read != NULL);
61a0eb5b 2740 if (gdbarch_debug >= 2)
d8124050
AC		 2741 fprintf_unfiltered (gdb_stdlog, "gdbarch_pseudo_register_read called\n");
2742 gdbarch->pseudo_register_read (gdbarch, regcache, cookednum, buf);
61a0eb5b
AC		 2743}
2744
2745void
d8124050
AC		 2746set_gdbarch_pseudo_register_read (struct gdbarch *gdbarch,
2747 gdbarch_pseudo_register_read_ftype pseudo_register_read)
61a0eb5b 2748{
d8124050 2749 gdbarch->pseudo_register_read = pseudo_register_read;
61a0eb5b
AC		 2750}
2751
2752int
d8124050 2753gdbarch_pseudo_register_write_p (struct gdbarch *gdbarch)
61a0eb5b 2754{
8de9bdc4 2755 gdb_assert (gdbarch != NULL);
956ac328 2756 return gdbarch->pseudo_register_write != NULL;
61a0eb5b
AC		 2757}
2758
2759void
d8124050 2760gdbarch_pseudo_register_write (struct gdbarch *gdbarch, struct regcache *regcache, int cookednum, const void *buf)
61a0eb5b 2761{
8de9bdc4 2762 gdb_assert (gdbarch != NULL);
956ac328 2763 gdb_assert (gdbarch->pseudo_register_write != NULL);
61a0eb5b 2764 if (gdbarch_debug >= 2)
d8124050
AC		 2765 fprintf_unfiltered (gdb_stdlog, "gdbarch_pseudo_register_write called\n");
2766 gdbarch->pseudo_register_write (gdbarch, regcache, cookednum, buf);
61a0eb5b
AC		 2767}
2768
2769void
d8124050
AC		 2770set_gdbarch_pseudo_register_write (struct gdbarch *gdbarch,
2771 gdbarch_pseudo_register_write_ftype pseudo_register_write)
61a0eb5b 2772{
d8124050 2773 gdbarch->pseudo_register_write = pseudo_register_write;
61a0eb5b
AC		 2774}
2775
0f71a2f6 2776int
104c1213 2777gdbarch_num_regs (struct gdbarch *gdbarch)
0f71a2f6 2778{
8de9bdc4 2779 gdb_assert (gdbarch != NULL);
956ac328
AC		 2780 /* Check variable changed from pre-default. */
2781 gdb_assert (gdbarch->num_regs != -1);
0f71a2f6 2782 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2783 fprintf_unfiltered (gdb_stdlog, "gdbarch_num_regs called\n");
2784 return gdbarch->num_regs;
2785}
2786
2787void
104c1213
JM		 2788set_gdbarch_num_regs (struct gdbarch *gdbarch,
2789 int num_regs)
0f71a2f6
JM		 2790{
2791 gdbarch->num_regs = num_regs;
2792}
2793
0aba1244
EZ		 2794int
2795gdbarch_num_pseudo_regs (struct gdbarch *gdbarch)
2796{
8de9bdc4 2797 gdb_assert (gdbarch != NULL);
0aba1244
EZ		 2798 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
2799 if (gdbarch_debug >= 2)
2800 fprintf_unfiltered (gdb_stdlog, "gdbarch_num_pseudo_regs called\n");
2801 return gdbarch->num_pseudo_regs;
2802}
2803
2804void
2805set_gdbarch_num_pseudo_regs (struct gdbarch *gdbarch,
2806 int num_pseudo_regs)
2807{
2808 gdbarch->num_pseudo_regs = num_pseudo_regs;
2809}
2810
0f71a2f6 2811int
104c1213 2812gdbarch_sp_regnum (struct gdbarch *gdbarch)
0f71a2f6 2813{
8de9bdc4 2814 gdb_assert (gdbarch != NULL);
1200cd6e 2815 /* Skip verify of sp_regnum, invalid_p == 0 */
0f71a2f6 2816 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2817 fprintf_unfiltered (gdb_stdlog, "gdbarch_sp_regnum called\n");
2818 return gdbarch->sp_regnum;
2819}
2820
2821void
104c1213
JM		 2822set_gdbarch_sp_regnum (struct gdbarch *gdbarch,
2823 int sp_regnum)
0f71a2f6
JM		 2824{
2825 gdbarch->sp_regnum = sp_regnum;
2826}
2827
0f71a2f6 2828int
104c1213 2829gdbarch_pc_regnum (struct gdbarch *gdbarch)
0f71a2f6 2830{
8de9bdc4 2831 gdb_assert (gdbarch != NULL);
1200cd6e 2832 /* Skip verify of pc_regnum, invalid_p == 0 */
0f71a2f6 2833 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2834 fprintf_unfiltered (gdb_stdlog, "gdbarch_pc_regnum called\n");
2835 return gdbarch->pc_regnum;
2836}
2837
2838void
104c1213
JM		 2839set_gdbarch_pc_regnum (struct gdbarch *gdbarch,
2840 int pc_regnum)
0f71a2f6
JM		 2841{
2842 gdbarch->pc_regnum = pc_regnum;
2843}
2844
c2169756
AC		 2845int
2846gdbarch_ps_regnum (struct gdbarch *gdbarch)
2847{
8de9bdc4 2848 gdb_assert (gdbarch != NULL);
c2169756
AC		 2849 /* Skip verify of ps_regnum, invalid_p == 0 */
2850 if (gdbarch_debug >= 2)
2851 fprintf_unfiltered (gdb_stdlog, "gdbarch_ps_regnum called\n");
2852 return gdbarch->ps_regnum;
2853}
2854
2855void
2856set_gdbarch_ps_regnum (struct gdbarch *gdbarch,
2857 int ps_regnum)
2858{
2859 gdbarch->ps_regnum = ps_regnum;
2860}
2861
60054393
MS		 2862int
2863gdbarch_fp0_regnum (struct gdbarch *gdbarch)
2864{
8de9bdc4 2865 gdb_assert (gdbarch != NULL);
60054393
MS		 2866 /* Skip verify of fp0_regnum, invalid_p == 0 */
2867 if (gdbarch_debug >= 2)
2868 fprintf_unfiltered (gdb_stdlog, "gdbarch_fp0_regnum called\n");
2869 return gdbarch->fp0_regnum;
2870}
2871
2872void
2873set_gdbarch_fp0_regnum (struct gdbarch *gdbarch,
2874 int fp0_regnum)
2875{
2876 gdbarch->fp0_regnum = fp0_regnum;
2877}
2878
88c72b7d
AC		 2879int
2880gdbarch_stab_reg_to_regnum (struct gdbarch *gdbarch, int stab_regnr)
2881{
8de9bdc4 2882 gdb_assert (gdbarch != NULL);
956ac328 2883 gdb_assert (gdbarch->stab_reg_to_regnum != NULL);
88c72b7d
AC		 2884 if (gdbarch_debug >= 2)
2885 fprintf_unfiltered (gdb_stdlog, "gdbarch_stab_reg_to_regnum called\n");
2886 return gdbarch->stab_reg_to_regnum (stab_regnr);
2887}
2888
2889void
2890set_gdbarch_stab_reg_to_regnum (struct gdbarch *gdbarch,
2891 gdbarch_stab_reg_to_regnum_ftype stab_reg_to_regnum)
2892{
2893 gdbarch->stab_reg_to_regnum = stab_reg_to_regnum;
2894}
2895
2896int
2897gdbarch_ecoff_reg_to_regnum (struct gdbarch *gdbarch, int ecoff_regnr)
2898{
8de9bdc4 2899 gdb_assert (gdbarch != NULL);
956ac328 2900 gdb_assert (gdbarch->ecoff_reg_to_regnum != NULL);
88c72b7d
AC		 2901 if (gdbarch_debug >= 2)
2902 fprintf_unfiltered (gdb_stdlog, "gdbarch_ecoff_reg_to_regnum called\n");
2903 return gdbarch->ecoff_reg_to_regnum (ecoff_regnr);
2904}
2905
2906void
2907set_gdbarch_ecoff_reg_to_regnum (struct gdbarch *gdbarch,
2908 gdbarch_ecoff_reg_to_regnum_ftype ecoff_reg_to_regnum)
2909{
2910 gdbarch->ecoff_reg_to_regnum = ecoff_reg_to_regnum;
2911}
2912
2913int
2914gdbarch_dwarf_reg_to_regnum (struct gdbarch *gdbarch, int dwarf_regnr)
2915{
8de9bdc4 2916 gdb_assert (gdbarch != NULL);
956ac328 2917 gdb_assert (gdbarch->dwarf_reg_to_regnum != NULL);
88c72b7d
AC		 2918 if (gdbarch_debug >= 2)
2919 fprintf_unfiltered (gdb_stdlog, "gdbarch_dwarf_reg_to_regnum called\n");
2920 return gdbarch->dwarf_reg_to_regnum (dwarf_regnr);
2921}
2922
2923void
2924set_gdbarch_dwarf_reg_to_regnum (struct gdbarch *gdbarch,
2925 gdbarch_dwarf_reg_to_regnum_ftype dwarf_reg_to_regnum)
2926{
2927 gdbarch->dwarf_reg_to_regnum = dwarf_reg_to_regnum;
2928}
2929
2930int
2931gdbarch_sdb_reg_to_regnum (struct gdbarch *gdbarch, int sdb_regnr)
2932{
8de9bdc4 2933 gdb_assert (gdbarch != NULL);
956ac328 2934 gdb_assert (gdbarch->sdb_reg_to_regnum != NULL);
88c72b7d
AC		 2935 if (gdbarch_debug >= 2)
2936 fprintf_unfiltered (gdb_stdlog, "gdbarch_sdb_reg_to_regnum called\n");
2937 return gdbarch->sdb_reg_to_regnum (sdb_regnr);
2938}
2939
2940void
2941set_gdbarch_sdb_reg_to_regnum (struct gdbarch *gdbarch,
2942 gdbarch_sdb_reg_to_regnum_ftype sdb_reg_to_regnum)
2943{
2944 gdbarch->sdb_reg_to_regnum = sdb_reg_to_regnum;
2945}
2946
2947int
2948gdbarch_dwarf2_reg_to_regnum (struct gdbarch *gdbarch, int dwarf2_regnr)
2949{
8de9bdc4 2950 gdb_assert (gdbarch != NULL);
956ac328 2951 gdb_assert (gdbarch->dwarf2_reg_to_regnum != NULL);
88c72b7d
AC		 2952 if (gdbarch_debug >= 2)
2953 fprintf_unfiltered (gdb_stdlog, "gdbarch_dwarf2_reg_to_regnum called\n");
2954 return gdbarch->dwarf2_reg_to_regnum (dwarf2_regnr);
2955}
2956
2957void
2958set_gdbarch_dwarf2_reg_to_regnum (struct gdbarch *gdbarch,
2959 gdbarch_dwarf2_reg_to_regnum_ftype dwarf2_reg_to_regnum)
2960{
2961 gdbarch->dwarf2_reg_to_regnum = dwarf2_reg_to_regnum;
2962}
2963
fa88f677 2964const char *
0f71a2f6
JM		 2965gdbarch_register_name (struct gdbarch *gdbarch, int regnr)
2966{
8de9bdc4 2967 gdb_assert (gdbarch != NULL);
956ac328 2968 gdb_assert (gdbarch->register_name != NULL);
0f71a2f6 2969 if (gdbarch_debug >= 2)
0f71a2f6
JM		 2970 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_name called\n");
2971 return gdbarch->register_name (regnr);
2972}
2973
2974void
104c1213
JM		 2975set_gdbarch_register_name (struct gdbarch *gdbarch,
2976 gdbarch_register_name_ftype register_name)
0f71a2f6
JM		 2977{
2978 gdbarch->register_name = register_name;
2979}
2980
0f71a2f6 2981int
9c04cab7 2982gdbarch_register_type_p (struct gdbarch *gdbarch)
0f71a2f6 2983{
8de9bdc4 2984 gdb_assert (gdbarch != NULL);
956ac328 2985 return gdbarch->register_type != NULL;
9c04cab7
AC		 2986}
2987
2988struct type *
2989gdbarch_register_type (struct gdbarch *gdbarch, int reg_nr)
2990{
2991 gdb_assert (gdbarch != NULL);
956ac328 2992 gdb_assert (gdbarch->register_type != NULL);
0f71a2f6 2993 if (gdbarch_debug >= 2)
9c04cab7
AC		 2994 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_type called\n");
2995 return gdbarch->register_type (gdbarch, reg_nr);
0f71a2f6
JM		 2996}
2997
2998void
9c04cab7
AC		 2999set_gdbarch_register_type (struct gdbarch *gdbarch,
3000 gdbarch_register_type_ftype register_type)
0f71a2f6 3001{
9c04cab7 3002 gdbarch->register_type = register_type;
0f71a2f6
JM		 3003}
3004
46654a5b 3005int
9c04cab7 3006gdbarch_deprecated_register_virtual_type_p (struct gdbarch *gdbarch)
46654a5b
AC		 3007{
3008 gdb_assert (gdbarch != NULL);
956ac328 3009 return gdbarch->deprecated_register_virtual_type != NULL;
46654a5b
AC		 3010}
3011
9c04cab7
AC		 3012struct type *
3013gdbarch_deprecated_register_virtual_type (struct gdbarch *gdbarch, int reg_nr)
0f71a2f6 3014{
8de9bdc4 3015 gdb_assert (gdbarch != NULL);
956ac328 3016 gdb_assert (gdbarch->deprecated_register_virtual_type != NULL);
0f71a2f6 3017 if (gdbarch_debug >= 2)
9c04cab7
AC		 3018 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_register_virtual_type called\n");
3019 return gdbarch->deprecated_register_virtual_type (reg_nr);
0f71a2f6
JM		 3020}
3021
3022void
9c04cab7
AC		 3023set_gdbarch_deprecated_register_virtual_type (struct gdbarch *gdbarch,
3024 gdbarch_deprecated_register_virtual_type_ftype deprecated_register_virtual_type)
0f71a2f6 3025{
9c04cab7 3026 gdbarch->deprecated_register_virtual_type = deprecated_register_virtual_type;
0f71a2f6
JM		 3027}
3028
3029int
9c04cab7 3030gdbarch_deprecated_register_bytes (struct gdbarch *gdbarch)
0f71a2f6 3031{
8de9bdc4 3032 gdb_assert (gdbarch != NULL);
0f71a2f6 3033 if (gdbarch_debug >= 2)
9c04cab7
AC		 3034 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_register_bytes called\n");
3035 return gdbarch->deprecated_register_bytes;
0f71a2f6
JM		 3036}
3037
3038void
9c04cab7
AC		 3039set_gdbarch_deprecated_register_bytes (struct gdbarch *gdbarch,
3040 int deprecated_register_bytes)
0f71a2f6 3041{
9c04cab7 3042 gdbarch->deprecated_register_bytes = deprecated_register_bytes;
0f71a2f6
JM		 3043}
3044
3045int
9c04cab7 3046gdbarch_deprecated_register_byte_p (struct gdbarch *gdbarch)
a0ed5532
AC		 3047{
3048 gdb_assert (gdbarch != NULL);
9c04cab7 3049 return gdbarch->deprecated_register_byte != generic_register_byte;
a0ed5532
AC		 3050}
3051
3052int
9c04cab7 3053gdbarch_deprecated_register_byte (struct gdbarch *gdbarch, int reg_nr)
0f71a2f6 3054{
8de9bdc4 3055 gdb_assert (gdbarch != NULL);
956ac328
AC		 3056 gdb_assert (gdbarch->deprecated_register_byte != NULL);
3057 /* Do not check predicate: gdbarch->deprecated_register_byte != generic_register_byte, allow call. */
0f71a2f6 3058 if (gdbarch_debug >= 2)
9c04cab7
AC		 3059 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_register_byte called\n");
3060 return gdbarch->deprecated_register_byte (reg_nr);
0f71a2f6
JM		 3061}
3062
3063void
9c04cab7
AC		 3064set_gdbarch_deprecated_register_byte (struct gdbarch *gdbarch,
3065 gdbarch_deprecated_register_byte_ftype deprecated_register_byte)
0f71a2f6 3066{
9c04cab7 3067 gdbarch->deprecated_register_byte = deprecated_register_byte;
0f71a2f6
JM		 3068}
3069
dadd712e
AC		 3070int
3071gdbarch_deprecated_register_raw_size_p (struct gdbarch *gdbarch)
3072{
3073 gdb_assert (gdbarch != NULL);
3074 return gdbarch->deprecated_register_raw_size != generic_register_size;
3075}
3076
0f71a2f6 3077int
9c04cab7 3078gdbarch_deprecated_register_raw_size (struct gdbarch *gdbarch, int reg_nr)
0f71a2f6 3079{
8de9bdc4 3080 gdb_assert (gdbarch != NULL);
956ac328
AC		 3081 gdb_assert (gdbarch->deprecated_register_raw_size != NULL);
3082 /* Do not check predicate: gdbarch->deprecated_register_raw_size != generic_register_size, allow call. */
0f71a2f6 3083 if (gdbarch_debug >= 2)
9c04cab7
AC		 3084 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_register_raw_size called\n");
3085 return gdbarch->deprecated_register_raw_size (reg_nr);
0f71a2f6
JM		 3086}
3087
3088void
9c04cab7
AC		 3089set_gdbarch_deprecated_register_raw_size (struct gdbarch *gdbarch,
3090 gdbarch_deprecated_register_raw_size_ftype deprecated_register_raw_size)
0f71a2f6 3091{
9c04cab7 3092 gdbarch->deprecated_register_raw_size = deprecated_register_raw_size;
0f71a2f6
JM		 3093}
3094
dadd712e
AC		 3095int
3096gdbarch_deprecated_register_virtual_size_p (struct gdbarch *gdbarch)
3097{
3098 gdb_assert (gdbarch != NULL);
3099 return gdbarch->deprecated_register_virtual_size != generic_register_size;
3100}
3101
0f71a2f6 3102int
9c04cab7 3103gdbarch_deprecated_register_virtual_size (struct gdbarch *gdbarch, int reg_nr)
0f71a2f6 3104{
8de9bdc4 3105 gdb_assert (gdbarch != NULL);
956ac328
AC		 3106 gdb_assert (gdbarch->deprecated_register_virtual_size != NULL);
3107 /* Do not check predicate: gdbarch->deprecated_register_virtual_size != generic_register_size, allow call. */
0f71a2f6 3108 if (gdbarch_debug >= 2)
9c04cab7
AC		 3109 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_register_virtual_size called\n");
3110 return gdbarch->deprecated_register_virtual_size (reg_nr);
0f71a2f6
JM		 3111}
3112
3113void
9c04cab7
AC		 3114set_gdbarch_deprecated_register_virtual_size (struct gdbarch *gdbarch,
3115 gdbarch_deprecated_register_virtual_size_ftype deprecated_register_virtual_size)
0f71a2f6 3116{
9c04cab7 3117 gdbarch->deprecated_register_virtual_size = deprecated_register_virtual_size;
0f71a2f6
JM		 3118}
3119
35cac7cf 3120int
9c04cab7 3121gdbarch_deprecated_max_register_raw_size_p (struct gdbarch *gdbarch)
35cac7cf
AC		 3122{
3123 gdb_assert (gdbarch != NULL);
ae99b398 3124 return gdbarch->deprecated_max_register_raw_size != 0;
35cac7cf
AC		 3125}
3126
9c04cab7
AC		 3127int
3128gdbarch_deprecated_max_register_raw_size (struct gdbarch *gdbarch)
0f71a2f6 3129{
8de9bdc4 3130 gdb_assert (gdbarch != NULL);
0f71a2f6 3131 if (gdbarch_debug >= 2)
9c04cab7
AC		 3132 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_max_register_raw_size called\n");
3133 return gdbarch->deprecated_max_register_raw_size;
0f71a2f6
JM		 3134}
3135
3136void
9c04cab7
AC		 3137set_gdbarch_deprecated_max_register_raw_size (struct gdbarch *gdbarch,
3138 int deprecated_max_register_raw_size)
0f71a2f6 3139{
9c04cab7 3140 gdbarch->deprecated_max_register_raw_size = deprecated_max_register_raw_size;
0f71a2f6
JM		 3141}
3142
35cac7cf 3143int
9c04cab7 3144gdbarch_deprecated_max_register_virtual_size_p (struct gdbarch *gdbarch)
35cac7cf
AC		 3145{
3146 gdb_assert (gdbarch != NULL);
ae99b398 3147 return gdbarch->deprecated_max_register_virtual_size != 0;
35cac7cf
AC		 3148}
3149
9c04cab7
AC		 3150int
3151gdbarch_deprecated_max_register_virtual_size (struct gdbarch *gdbarch)
35cac7cf
AC		 3152{
3153 gdb_assert (gdbarch != NULL);
35cac7cf 3154 if (gdbarch_debug >= 2)
9c04cab7
AC		 3155 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_max_register_virtual_size called\n");
3156 return gdbarch->deprecated_max_register_virtual_size;
35cac7cf
AC		 3157}
3158
3159void
9c04cab7
AC		 3160set_gdbarch_deprecated_max_register_virtual_size (struct gdbarch *gdbarch,
3161 int deprecated_max_register_virtual_size)
35cac7cf 3162{
9c04cab7 3163 gdbarch->deprecated_max_register_virtual_size = deprecated_max_register_virtual_size;
35cac7cf
AC		 3164}
3165
f3be58bc
AC		 3166int
3167gdbarch_unwind_dummy_id_p (struct gdbarch *gdbarch)
3168{
3169 gdb_assert (gdbarch != NULL);
956ac328 3170 return gdbarch->unwind_dummy_id != NULL;
f3be58bc
AC		 3171}
3172
3173struct frame_id
3174gdbarch_unwind_dummy_id (struct gdbarch *gdbarch, struct frame_info *info)
3175{
3176 gdb_assert (gdbarch != NULL);
956ac328 3177 gdb_assert (gdbarch->unwind_dummy_id != NULL);
f3be58bc
AC		 3178 if (gdbarch_debug >= 2)
3179 fprintf_unfiltered (gdb_stdlog, "gdbarch_unwind_dummy_id called\n");
3180 return gdbarch->unwind_dummy_id (gdbarch, info);
3181}
3182
3183void
3184set_gdbarch_unwind_dummy_id (struct gdbarch *gdbarch,
3185 gdbarch_unwind_dummy_id_ftype unwind_dummy_id)
3186{
3187 gdbarch->unwind_dummy_id = unwind_dummy_id;
3188}
3189
3190int
a59fe496 3191gdbarch_deprecated_save_dummy_frame_tos_p (struct gdbarch *gdbarch)
f3be58bc
AC		 3192{
3193 gdb_assert (gdbarch != NULL);
956ac328 3194 return gdbarch->deprecated_save_dummy_frame_tos != NULL;
f3be58bc
AC		 3195}
3196
3197void
a59fe496 3198gdbarch_deprecated_save_dummy_frame_tos (struct gdbarch *gdbarch, CORE_ADDR sp)
f3be58bc
AC		 3199{
3200 gdb_assert (gdbarch != NULL);
956ac328 3201 gdb_assert (gdbarch->deprecated_save_dummy_frame_tos != NULL);
f3be58bc 3202 if (gdbarch_debug >= 2)
a59fe496
AC		 3203 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_save_dummy_frame_tos called\n");
3204 gdbarch->deprecated_save_dummy_frame_tos (sp);
f3be58bc
AC		 3205}
3206
3207void
a59fe496
AC		 3208set_gdbarch_deprecated_save_dummy_frame_tos (struct gdbarch *gdbarch,
3209 gdbarch_deprecated_save_dummy_frame_tos_ftype deprecated_save_dummy_frame_tos)
f3be58bc 3210{
a59fe496 3211 gdbarch->deprecated_save_dummy_frame_tos = deprecated_save_dummy_frame_tos;
f3be58bc
AC		 3212}
3213
3214int
3215gdbarch_deprecated_fp_regnum (struct gdbarch *gdbarch)
3216{
3217 gdb_assert (gdbarch != NULL);
3218 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
3219 if (gdbarch_debug >= 2)
3220 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_fp_regnum called\n");
3221 return gdbarch->deprecated_fp_regnum;
3222}
3223
3224void
3225set_gdbarch_deprecated_fp_regnum (struct gdbarch *gdbarch,
3226 int deprecated_fp_regnum)
3227{
3228 gdbarch->deprecated_fp_regnum = deprecated_fp_regnum;
3229}
3230
3231int
3232gdbarch_deprecated_target_read_fp_p (struct gdbarch *gdbarch)
3233{
3234 gdb_assert (gdbarch != NULL);
956ac328 3235 return gdbarch->deprecated_target_read_fp != NULL;
f3be58bc
AC		 3236}
3237
3238CORE_ADDR
3239gdbarch_deprecated_target_read_fp (struct gdbarch *gdbarch)
3240{
3241 gdb_assert (gdbarch != NULL);
956ac328 3242 gdb_assert (gdbarch->deprecated_target_read_fp != NULL);
f3be58bc
AC		 3243 if (gdbarch_debug >= 2)
3244 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_target_read_fp called\n");
3245 return gdbarch->deprecated_target_read_fp ();
3246}
3247
3248void
3249set_gdbarch_deprecated_target_read_fp (struct gdbarch *gdbarch,
3250 gdbarch_deprecated_target_read_fp_ftype deprecated_target_read_fp)
3251{
3252 gdbarch->deprecated_target_read_fp = deprecated_target_read_fp;
3253}
3254
0ab7a791 3255int
b8de8283 3256gdbarch_push_dummy_call_p (struct gdbarch *gdbarch)
0ab7a791
AC		 3257{
3258 gdb_assert (gdbarch != NULL);
956ac328 3259 return gdbarch->push_dummy_call != NULL;
0ab7a791
AC		 3260}
3261
b8de8283
AC		 3262CORE_ADDR
3263gdbarch_push_dummy_call (struct gdbarch *gdbarch, CORE_ADDR func_addr, struct regcache *regcache, CORE_ADDR bp_addr, int nargs, struct value **args, CORE_ADDR sp, int struct_return, CORE_ADDR struct_addr)
666e11c5 3264{
8de9bdc4 3265 gdb_assert (gdbarch != NULL);
956ac328 3266 gdb_assert (gdbarch->push_dummy_call != NULL);
666e11c5 3267 if (gdbarch_debug >= 2)
b8de8283
AC		 3268 fprintf_unfiltered (gdb_stdlog, "gdbarch_push_dummy_call called\n");
3269 return gdbarch->push_dummy_call (gdbarch, func_addr, regcache, bp_addr, nargs, args, sp, struct_return, struct_addr);
666e11c5
EZ		 3270}
3271
3272void
b8de8283
AC		 3273set_gdbarch_push_dummy_call (struct gdbarch *gdbarch,
3274 gdbarch_push_dummy_call_ftype push_dummy_call)
666e11c5 3275{
b8de8283 3276 gdbarch->push_dummy_call = push_dummy_call;
666e11c5
EZ		 3277}
3278
b8de8283
AC		 3279int
3280gdbarch_deprecated_push_arguments_p (struct gdbarch *gdbarch)
0ab7a791
AC		 3281{
3282 gdb_assert (gdbarch != NULL);
956ac328 3283 return gdbarch->deprecated_push_arguments != NULL;
b8de8283
AC		 3284}
3285
3286CORE_ADDR
3287gdbarch_deprecated_push_arguments (struct gdbarch *gdbarch, int nargs, struct value **args, CORE_ADDR sp, int struct_return, CORE_ADDR struct_addr)
3288{
3289 gdb_assert (gdbarch != NULL);
956ac328 3290 gdb_assert (gdbarch->deprecated_push_arguments != NULL);
0ab7a791 3291 if (gdbarch_debug >= 2)
b8de8283
AC		 3292 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_push_arguments called\n");
3293 return gdbarch->deprecated_push_arguments (nargs, args, sp, struct_return, struct_addr);
0ab7a791
AC		 3294}
3295
3296void
b8de8283
AC		 3297set_gdbarch_deprecated_push_arguments (struct gdbarch *gdbarch,
3298 gdbarch_deprecated_push_arguments_ftype deprecated_push_arguments)
0ab7a791 3299{
b8de8283 3300 gdbarch->deprecated_push_arguments = deprecated_push_arguments;
0ab7a791
AC		 3301}
3302
23e3a7ac 3303int
b8de8283 3304gdbarch_deprecated_use_generic_dummy_frames (struct gdbarch *gdbarch)
23e3a7ac
AC		 3305{
3306 gdb_assert (gdbarch != NULL);
b8de8283
AC		 3307 /* Skip verify of deprecated_use_generic_dummy_frames, invalid_p == 0 */
3308 if (gdbarch_debug >= 2)
3309 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_use_generic_dummy_frames called\n");
3310 return gdbarch->deprecated_use_generic_dummy_frames;
23e3a7ac
AC		 3311}
3312
5e74b15c 3313void
b8de8283
AC		 3314set_gdbarch_deprecated_use_generic_dummy_frames (struct gdbarch *gdbarch,
3315 int deprecated_use_generic_dummy_frames)
3316{
3317 gdbarch->deprecated_use_generic_dummy_frames = deprecated_use_generic_dummy_frames;
3318}
3319
3320int
3321gdbarch_deprecated_push_return_address_p (struct gdbarch *gdbarch)
5e74b15c 3322{
8de9bdc4 3323 gdb_assert (gdbarch != NULL);
956ac328 3324 return gdbarch->deprecated_push_return_address != NULL;
b8de8283
AC		 3325}
3326
3327CORE_ADDR
3328gdbarch_deprecated_push_return_address (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR sp)
3329{
3330 gdb_assert (gdbarch != NULL);
956ac328 3331 gdb_assert (gdbarch->deprecated_push_return_address != NULL);
5e74b15c 3332 if (gdbarch_debug >= 2)
b8de8283
AC		 3333 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_push_return_address called\n");
3334 return gdbarch->deprecated_push_return_address (pc, sp);
5e74b15c
RE		 3335}
3336
3337void
b8de8283
AC		 3338set_gdbarch_deprecated_push_return_address (struct gdbarch *gdbarch,
3339 gdbarch_deprecated_push_return_address_ftype deprecated_push_return_address)
5e74b15c 3340{
b8de8283 3341 gdbarch->deprecated_push_return_address = deprecated_push_return_address;
5e74b15c
RE		 3342}
3343
e76f1f2e 3344int
b8de8283 3345gdbarch_deprecated_dummy_write_sp_p (struct gdbarch *gdbarch)
e76f1f2e
AC		 3346{
3347 gdb_assert (gdbarch != NULL);
956ac328 3348 return gdbarch->deprecated_dummy_write_sp != NULL;
e76f1f2e
AC		 3349}
3350
3351void
b8de8283 3352gdbarch_deprecated_dummy_write_sp (struct gdbarch *gdbarch, CORE_ADDR val)
e76f1f2e
AC		 3353{
3354 gdb_assert (gdbarch != NULL);
956ac328 3355 gdb_assert (gdbarch->deprecated_dummy_write_sp != NULL);
e76f1f2e 3356 if (gdbarch_debug >= 2)
b8de8283
AC		 3357 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_dummy_write_sp called\n");
3358 gdbarch->deprecated_dummy_write_sp (val);
e76f1f2e
AC		 3359}
3360
3361void
b8de8283
AC		 3362set_gdbarch_deprecated_dummy_write_sp (struct gdbarch *gdbarch,
3363 gdbarch_deprecated_dummy_write_sp_ftype deprecated_dummy_write_sp)
e76f1f2e 3364{
b8de8283 3365 gdbarch->deprecated_dummy_write_sp = deprecated_dummy_write_sp;
e76f1f2e
AC		 3366}
3367
7c7651b2 3368int
b8de8283 3369gdbarch_deprecated_register_size (struct gdbarch *gdbarch)
7c7651b2 3370{
8de9bdc4 3371 gdb_assert (gdbarch != NULL);
7c7651b2 3372 if (gdbarch_debug >= 2)
b8de8283
AC		 3373 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_register_size called\n");
3374 return gdbarch->deprecated_register_size;
7c7651b2
AC		 3375}
3376
3377void
b8de8283
AC		 3378set_gdbarch_deprecated_register_size (struct gdbarch *gdbarch,
3379 int deprecated_register_size)
7c7651b2 3380{
b8de8283 3381 gdbarch->deprecated_register_size = deprecated_register_size;
7c7651b2
AC		 3382}
3383
2649061d 3384int
b8de8283 3385gdbarch_call_dummy_location (struct gdbarch *gdbarch)
2649061d 3386{
8de9bdc4 3387 gdb_assert (gdbarch != NULL);
b8de8283
AC		 3388 /* Skip verify of call_dummy_location, invalid_p == 0 */
3389 if (gdbarch_debug >= 2)
3390 fprintf_unfiltered (gdb_stdlog, "gdbarch_call_dummy_location called\n");
3391 return gdbarch->call_dummy_location;
2649061d
AC		 3392}
3393
b8de8283
AC		 3394void
3395set_gdbarch_call_dummy_location (struct gdbarch *gdbarch,
3396 int call_dummy_location)
3397{
3398 gdbarch->call_dummy_location = call_dummy_location;
3399}
3400
b8de8283
AC		 3401CORE_ADDR
3402gdbarch_deprecated_call_dummy_start_offset (struct gdbarch *gdbarch)
3403{
3404 gdb_assert (gdbarch != NULL);
3405 if (gdbarch_debug >= 2)
3406 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_call_dummy_start_offset called\n");
3407 return gdbarch->deprecated_call_dummy_start_offset;
3408}
3409
3410void
3411set_gdbarch_deprecated_call_dummy_start_offset (struct gdbarch *gdbarch,
3412 CORE_ADDR deprecated_call_dummy_start_offset)
3413{
3414 gdbarch->deprecated_call_dummy_start_offset = deprecated_call_dummy_start_offset;
3415}
3416
3417CORE_ADDR
3418gdbarch_deprecated_call_dummy_breakpoint_offset (struct gdbarch *gdbarch)
3419{
3420 gdb_assert (gdbarch != NULL);
3421 if (gdbarch_debug >= 2)
3422 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_call_dummy_breakpoint_offset called\n");
3423 return gdbarch->deprecated_call_dummy_breakpoint_offset;
3424}
3425
3426void
3427set_gdbarch_deprecated_call_dummy_breakpoint_offset (struct gdbarch *gdbarch,
3428 CORE_ADDR deprecated_call_dummy_breakpoint_offset)
3429{
3430 gdbarch->deprecated_call_dummy_breakpoint_offset = deprecated_call_dummy_breakpoint_offset;
2649061d
AC		 3431}
3432
b8de8283
AC		 3433LONGEST *
3434gdbarch_deprecated_call_dummy_words (struct gdbarch *gdbarch)
3435{
3436 gdb_assert (gdbarch != NULL);
3437 /* Skip verify of deprecated_call_dummy_words, invalid_p == 0 */
3438 if (gdbarch_debug >= 2)
3439 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_call_dummy_words called\n");
3440 return gdbarch->deprecated_call_dummy_words;
3441}
3442
3443void
3444set_gdbarch_deprecated_call_dummy_words (struct gdbarch *gdbarch,
3445 LONGEST * deprecated_call_dummy_words)
3446{
3447 gdbarch->deprecated_call_dummy_words = deprecated_call_dummy_words;
01fb7433
AC		 3448}
3449
3450int
b8de8283 3451gdbarch_deprecated_sizeof_call_dummy_words (struct gdbarch *gdbarch)
01fb7433 3452{
8de9bdc4 3453 gdb_assert (gdbarch != NULL);
b8de8283 3454 /* Skip verify of deprecated_sizeof_call_dummy_words, invalid_p == 0 */
01fb7433 3455 if (gdbarch_debug >= 2)
b8de8283
AC		 3456 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_sizeof_call_dummy_words called\n");
3457 return gdbarch->deprecated_sizeof_call_dummy_words;
01fb7433
AC		 3458}
3459
3460void
b8de8283
AC		 3461set_gdbarch_deprecated_sizeof_call_dummy_words (struct gdbarch *gdbarch,
3462 int deprecated_sizeof_call_dummy_words)
01fb7433 3463{
b8de8283 3464 gdbarch->deprecated_sizeof_call_dummy_words = deprecated_sizeof_call_dummy_words;
01fb7433
AC		 3465}
3466
0f71a2f6 3467int
b8de8283 3468gdbarch_deprecated_fix_call_dummy_p (struct gdbarch *gdbarch)
0f71a2f6 3469{
8de9bdc4 3470 gdb_assert (gdbarch != NULL);
956ac328 3471 return gdbarch->deprecated_fix_call_dummy != NULL;
b8de8283
AC		 3472}
3473
3474void
3475gdbarch_deprecated_fix_call_dummy (struct gdbarch *gdbarch, char *dummy, CORE_ADDR pc, CORE_ADDR fun, int nargs, struct value **args, struct type *type, int gcc_p)
3476{
3477 gdb_assert (gdbarch != NULL);
956ac328 3478 gdb_assert (gdbarch->deprecated_fix_call_dummy != NULL);
0f71a2f6 3479 if (gdbarch_debug >= 2)
b8de8283
AC		 3480 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_fix_call_dummy called\n");
3481 gdbarch->deprecated_fix_call_dummy (dummy, pc, fun, nargs, args, type, gcc_p);
0f71a2f6
JM		 3482}
3483
3484void
b8de8283
AC		 3485set_gdbarch_deprecated_fix_call_dummy (struct gdbarch *gdbarch,
3486 gdbarch_deprecated_fix_call_dummy_ftype deprecated_fix_call_dummy)
0f71a2f6 3487{
b8de8283 3488 gdbarch->deprecated_fix_call_dummy = deprecated_fix_call_dummy;
0f71a2f6
JM		 3489}
3490
3491int
b8de8283 3492gdbarch_push_dummy_code_p (struct gdbarch *gdbarch)
0f71a2f6 3493{
8de9bdc4 3494 gdb_assert (gdbarch != NULL);
956ac328 3495 return gdbarch->push_dummy_code != NULL;
b8de8283
AC		 3496}
3497
3498CORE_ADDR
3499gdbarch_push_dummy_code (struct gdbarch *gdbarch, CORE_ADDR sp, CORE_ADDR funaddr, int using_gcc, struct value **args, int nargs, struct type *value_type, CORE_ADDR *real_pc, CORE_ADDR *bp_addr)
3500{
3501 gdb_assert (gdbarch != NULL);
956ac328 3502 gdb_assert (gdbarch->push_dummy_code != NULL);
0f71a2f6 3503 if (gdbarch_debug >= 2)
b8de8283
AC		 3504 fprintf_unfiltered (gdb_stdlog, "gdbarch_push_dummy_code called\n");
3505 return gdbarch->push_dummy_code (gdbarch, sp, funaddr, using_gcc, args, nargs, value_type, real_pc, bp_addr);
0f71a2f6
JM		 3506}
3507
3508void
b8de8283
AC		 3509set_gdbarch_push_dummy_code (struct gdbarch *gdbarch,
3510 gdbarch_push_dummy_code_ftype push_dummy_code)
0f71a2f6 3511{
b8de8283 3512 gdbarch->push_dummy_code = push_dummy_code;
0f71a2f6
JM		 3513}
3514
b8de8283
AC		 3515int
3516gdbarch_deprecated_push_dummy_frame_p (struct gdbarch *gdbarch)
0f71a2f6 3517{
8de9bdc4 3518 gdb_assert (gdbarch != NULL);
956ac328 3519 return gdbarch->deprecated_push_dummy_frame != NULL;
b8de8283
AC		 3520}
3521
3522void
3523gdbarch_deprecated_push_dummy_frame (struct gdbarch *gdbarch)
3524{
3525 gdb_assert (gdbarch != NULL);
956ac328 3526 gdb_assert (gdbarch->deprecated_push_dummy_frame != NULL);
0f71a2f6 3527 if (gdbarch_debug >= 2)
b8de8283
AC		 3528 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_push_dummy_frame called\n");
3529 gdbarch->deprecated_push_dummy_frame ();
0f71a2f6
JM		 3530}
3531
3532void
b8de8283
AC		 3533set_gdbarch_deprecated_push_dummy_frame (struct gdbarch *gdbarch,
3534 gdbarch_deprecated_push_dummy_frame_ftype deprecated_push_dummy_frame)
0f71a2f6 3535{
b8de8283 3536 gdbarch->deprecated_push_dummy_frame = deprecated_push_dummy_frame;
0f71a2f6
JM		 3537}
3538
b8de8283
AC		 3539int
3540gdbarch_deprecated_do_registers_info_p (struct gdbarch *gdbarch)
0f71a2f6 3541{
8de9bdc4 3542 gdb_assert (gdbarch != NULL);
956ac328 3543 return gdbarch->deprecated_do_registers_info != NULL;
b8de8283
AC		 3544}
3545
3546void
3547gdbarch_deprecated_do_registers_info (struct gdbarch *gdbarch, int reg_nr, int fpregs)
3548{
3549 gdb_assert (gdbarch != NULL);
956ac328 3550 gdb_assert (gdbarch->deprecated_do_registers_info != NULL);
0f71a2f6 3551 if (gdbarch_debug >= 2)
b8de8283
AC		 3552 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_do_registers_info called\n");
3553 gdbarch->deprecated_do_registers_info (reg_nr, fpregs);
0f71a2f6
JM		 3554}
3555
3556void
b8de8283
AC		 3557set_gdbarch_deprecated_do_registers_info (struct gdbarch *gdbarch,
3558 gdbarch_deprecated_do_registers_info_ftype deprecated_do_registers_info)
0f71a2f6 3559{
b8de8283
AC		 3560 gdbarch->deprecated_do_registers_info = deprecated_do_registers_info;
3561}
3562
3563void
3564gdbarch_print_registers_info (struct gdbarch *gdbarch, struct ui_file *file, struct frame_info *frame, int regnum, int all)
3565{
3566 gdb_assert (gdbarch != NULL);
956ac328 3567 gdb_assert (gdbarch->print_registers_info != NULL);
b8de8283
AC		 3568 if (gdbarch_debug >= 2)
3569 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_registers_info called\n");
3570 gdbarch->print_registers_info (gdbarch, file, frame, regnum, all);
3571}
3572
3573void
3574set_gdbarch_print_registers_info (struct gdbarch *gdbarch,
3575 gdbarch_print_registers_info_ftype print_registers_info)
3576{
3577 gdbarch->print_registers_info = print_registers_info;
0f71a2f6
JM		 3578}
3579
0f71a2f6 3580int
b8de8283
AC		 3581gdbarch_print_float_info_p (struct gdbarch *gdbarch)
3582{
3583 gdb_assert (gdbarch != NULL);
956ac328 3584 return gdbarch->print_float_info != NULL;
b8de8283
AC		 3585}
3586
3587void
3588gdbarch_print_float_info (struct gdbarch *gdbarch, struct ui_file *file, struct frame_info *frame, const char *args)
0f71a2f6 3589{
8de9bdc4 3590 gdb_assert (gdbarch != NULL);
956ac328 3591 gdb_assert (gdbarch->print_float_info != NULL);
0f71a2f6 3592 if (gdbarch_debug >= 2)
b8de8283
AC		 3593 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_float_info called\n");
3594 gdbarch->print_float_info (gdbarch, file, frame, args);
0f71a2f6
JM		 3595}
3596
3597void
b8de8283
AC		 3598set_gdbarch_print_float_info (struct gdbarch *gdbarch,
3599 gdbarch_print_float_info_ftype print_float_info)
0f71a2f6 3600{
b8de8283
AC		 3601 gdbarch->print_float_info = print_float_info;
3602}
3603
3604int
3605gdbarch_print_vector_info_p (struct gdbarch *gdbarch)
3606{
3607 gdb_assert (gdbarch != NULL);
956ac328 3608 return gdbarch->print_vector_info != NULL;
b8de8283
AC		 3609}
3610
3611void
3612gdbarch_print_vector_info (struct gdbarch *gdbarch, struct ui_file *file, struct frame_info *frame, const char *args)
3613{
3614 gdb_assert (gdbarch != NULL);
956ac328 3615 gdb_assert (gdbarch->print_vector_info != NULL);
b8de8283
AC		 3616 if (gdbarch_debug >= 2)
3617 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_vector_info called\n");
3618 gdbarch->print_vector_info (gdbarch, file, frame, args);
0f71a2f6
JM		 3619}
3620
b8de8283
AC		 3621void
3622set_gdbarch_print_vector_info (struct gdbarch *gdbarch,
3623 gdbarch_print_vector_info_ftype print_vector_info)
ae45cd16 3624{
b8de8283 3625 gdbarch->print_vector_info = print_vector_info;
ae45cd16
AC		 3626}
3627
3628int
b8de8283 3629gdbarch_register_sim_regno (struct gdbarch *gdbarch, int reg_nr)
0f71a2f6 3630{
8de9bdc4 3631 gdb_assert (gdbarch != NULL);
956ac328 3632 gdb_assert (gdbarch->register_sim_regno != NULL);
0f71a2f6 3633 if (gdbarch_debug >= 2)
b8de8283
AC		 3634 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_sim_regno called\n");
3635 return gdbarch->register_sim_regno (reg_nr);
0f71a2f6
JM		 3636}
3637
3638void
b8de8283
AC		 3639set_gdbarch_register_sim_regno (struct gdbarch *gdbarch,
3640 gdbarch_register_sim_regno_ftype register_sim_regno)
0f71a2f6 3641{
b8de8283 3642 gdbarch->register_sim_regno = register_sim_regno;
0f71a2f6
JM		 3643}
3644
b8de8283
AC		 3645int
3646gdbarch_register_bytes_ok_p (struct gdbarch *gdbarch)
0f71a2f6 3647{
8de9bdc4 3648 gdb_assert (gdbarch != NULL);
956ac328 3649 return gdbarch->register_bytes_ok != NULL;
0f71a2f6
JM		 3650}
3651
3652int
b8de8283 3653gdbarch_register_bytes_ok (struct gdbarch *gdbarch, long nr_bytes)
0f71a2f6 3654{
8de9bdc4 3655 gdb_assert (gdbarch != NULL);
956ac328 3656 gdb_assert (gdbarch->register_bytes_ok != NULL);
0f71a2f6 3657 if (gdbarch_debug >= 2)
b8de8283
AC		 3658 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_bytes_ok called\n");
3659 return gdbarch->register_bytes_ok (nr_bytes);
0f71a2f6
JM		 3660}
3661
3662void
b8de8283
AC		 3663set_gdbarch_register_bytes_ok (struct gdbarch *gdbarch,
3664 gdbarch_register_bytes_ok_ftype register_bytes_ok)
0f71a2f6 3665{
b8de8283 3666 gdbarch->register_bytes_ok = register_bytes_ok;
0f71a2f6
JM		 3667}
3668
3669int
b8de8283 3670gdbarch_cannot_fetch_register (struct gdbarch *gdbarch, int regnum)
0f71a2f6 3671{
8de9bdc4 3672 gdb_assert (gdbarch != NULL);
956ac328 3673 gdb_assert (gdbarch->cannot_fetch_register != NULL);
b8de8283
AC		 3674 if (gdbarch_debug >= 2)
3675 fprintf_unfiltered (gdb_stdlog, "gdbarch_cannot_fetch_register called\n");
3676 return gdbarch->cannot_fetch_register (regnum);
3677}
3678
3679void
3680set_gdbarch_cannot_fetch_register (struct gdbarch *gdbarch,
3681 gdbarch_cannot_fetch_register_ftype cannot_fetch_register)
3682{
3683 gdbarch->cannot_fetch_register = cannot_fetch_register;
0f71a2f6
JM		 3684}
3685
3686int
b8de8283 3687gdbarch_cannot_store_register (struct gdbarch *gdbarch, int regnum)
0f71a2f6 3688{
8de9bdc4 3689 gdb_assert (gdbarch != NULL);
956ac328 3690 gdb_assert (gdbarch->cannot_store_register != NULL);
0f71a2f6 3691 if (gdbarch_debug >= 2)
b8de8283
AC		 3692 fprintf_unfiltered (gdb_stdlog, "gdbarch_cannot_store_register called\n");
3693 return gdbarch->cannot_store_register (regnum);
0f71a2f6
JM		 3694}
3695
3696void
b8de8283
AC		 3697set_gdbarch_cannot_store_register (struct gdbarch *gdbarch,
3698 gdbarch_cannot_store_register_ftype cannot_store_register)
0f71a2f6 3699{
b8de8283 3700 gdbarch->cannot_store_register = cannot_store_register;
0f71a2f6
JM		 3701}
3702
e8ab51f7 3703int
b8de8283 3704gdbarch_get_longjmp_target_p (struct gdbarch *gdbarch)
e8ab51f7
AC		 3705{
3706 gdb_assert (gdbarch != NULL);
956ac328 3707 return gdbarch->get_longjmp_target != NULL;
e8ab51f7
AC		 3708}
3709
b8de8283
AC		 3710int
3711gdbarch_get_longjmp_target (struct gdbarch *gdbarch, CORE_ADDR *pc)
0f71a2f6 3712{
8de9bdc4 3713 gdb_assert (gdbarch != NULL);
956ac328 3714 gdb_assert (gdbarch->get_longjmp_target != NULL);
0f71a2f6 3715 if (gdbarch_debug >= 2)
b8de8283
AC		 3716 fprintf_unfiltered (gdb_stdlog, "gdbarch_get_longjmp_target called\n");
3717 return gdbarch->get_longjmp_target (pc);
0f71a2f6
JM		 3718}
3719
3720void
b8de8283
AC		 3721set_gdbarch_get_longjmp_target (struct gdbarch *gdbarch,
3722 gdbarch_get_longjmp_target_ftype get_longjmp_target)
0f71a2f6 3723{
b8de8283 3724 gdbarch->get_longjmp_target = get_longjmp_target;
0f71a2f6
JM		 3725}
3726
7043d8dc 3727int
b8de8283 3728gdbarch_deprecated_pc_in_call_dummy_p (struct gdbarch *gdbarch)
7043d8dc
AC		 3729{
3730 gdb_assert (gdbarch != NULL);
90ba813f 3731 return gdbarch->deprecated_pc_in_call_dummy != deprecated_pc_in_call_dummy;
7043d8dc
AC		 3732}
3733
b8de8283
AC		 3734int
3735gdbarch_deprecated_pc_in_call_dummy (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR sp, CORE_ADDR frame_address)
7043d8dc
AC		 3736{
3737 gdb_assert (gdbarch != NULL);
956ac328 3738 gdb_assert (gdbarch->deprecated_pc_in_call_dummy != NULL);
90ba813f 3739 /* Do not check predicate: gdbarch->deprecated_pc_in_call_dummy != deprecated_pc_in_call_dummy, allow call. */
7043d8dc 3740 if (gdbarch_debug >= 2)
b8de8283
AC		 3741 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_pc_in_call_dummy called\n");
3742 return gdbarch->deprecated_pc_in_call_dummy (pc, sp, frame_address);
7043d8dc
AC		 3743}
3744
3745void
b8de8283
AC		 3746set_gdbarch_deprecated_pc_in_call_dummy (struct gdbarch *gdbarch,
3747 gdbarch_deprecated_pc_in_call_dummy_ftype deprecated_pc_in_call_dummy)
7043d8dc 3748{
b8de8283 3749 gdbarch->deprecated_pc_in_call_dummy = deprecated_pc_in_call_dummy;
7043d8dc
AC		 3750}
3751
a5afb99f
AC		 3752int
3753gdbarch_deprecated_init_frame_pc_p (struct gdbarch *gdbarch)
3754{
3755 gdb_assert (gdbarch != NULL);
956ac328 3756 return gdbarch->deprecated_init_frame_pc != NULL;
a5afb99f
AC		 3757}
3758
97f46953 3759CORE_ADDR
a5afb99f 3760gdbarch_deprecated_init_frame_pc (struct gdbarch *gdbarch, int fromleaf, struct frame_info *prev)
10312cc4 3761{
8de9bdc4 3762 gdb_assert (gdbarch != NULL);
956ac328 3763 gdb_assert (gdbarch->deprecated_init_frame_pc != NULL);
10312cc4 3764 if (gdbarch_debug >= 2)
a5afb99f
AC		 3765 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_init_frame_pc called\n");
3766 return gdbarch->deprecated_init_frame_pc (fromleaf, prev);
10312cc4
AC		 3767}
3768
3769void
a5afb99f
AC		 3770set_gdbarch_deprecated_init_frame_pc (struct gdbarch *gdbarch,
3771 gdbarch_deprecated_init_frame_pc_ftype deprecated_init_frame_pc)
10312cc4 3772{
a5afb99f 3773 gdbarch->deprecated_init_frame_pc = deprecated_init_frame_pc;
10312cc4
AC		 3774}
3775
0f71a2f6 3776int
104c1213 3777gdbarch_believe_pcc_promotion (struct gdbarch *gdbarch)
0f71a2f6 3778{
8de9bdc4 3779 gdb_assert (gdbarch != NULL);
0f71a2f6 3780 if (gdbarch_debug >= 2)
0f71a2f6
JM		 3781 fprintf_unfiltered (gdb_stdlog, "gdbarch_believe_pcc_promotion called\n");
3782 return gdbarch->believe_pcc_promotion;
3783}
3784
3785void
104c1213
JM		 3786set_gdbarch_believe_pcc_promotion (struct gdbarch *gdbarch,
3787 int believe_pcc_promotion)
0f71a2f6
JM		 3788{
3789 gdbarch->believe_pcc_promotion = believe_pcc_promotion;
3790}
3791
3792int
104c1213 3793gdbarch_believe_pcc_promotion_type (struct gdbarch *gdbarch)
0f71a2f6 3794{
8de9bdc4 3795 gdb_assert (gdbarch != NULL);
0f71a2f6 3796 if (gdbarch_debug >= 2)
0f71a2f6
JM		 3797 fprintf_unfiltered (gdb_stdlog, "gdbarch_believe_pcc_promotion_type called\n");
3798 return gdbarch->believe_pcc_promotion_type;
3799}
3800
3801void
104c1213
JM		 3802set_gdbarch_believe_pcc_promotion_type (struct gdbarch *gdbarch,
3803 int believe_pcc_promotion_type)
0f71a2f6
JM		 3804{
3805 gdbarch->believe_pcc_promotion_type = believe_pcc_promotion_type;
3806}
3807
a216a322 3808int
129c1cd6 3809gdbarch_deprecated_get_saved_register_p (struct gdbarch *gdbarch)
a216a322
AC		 3810{
3811 gdb_assert (gdbarch != NULL);
956ac328 3812 return gdbarch->deprecated_get_saved_register != NULL;
a216a322
AC		 3813}
3814
0f71a2f6 3815void
129c1cd6 3816gdbarch_deprecated_get_saved_register (struct gdbarch *gdbarch, char *raw_buffer, int *optimized, CORE_ADDR *addrp, struct frame_info *frame, int regnum, enum lval_type *lval)
0f71a2f6 3817{
8de9bdc4 3818 gdb_assert (gdbarch != NULL);
956ac328 3819 gdb_assert (gdbarch->deprecated_get_saved_register != NULL);
0f71a2f6 3820 if (gdbarch_debug >= 2)
129c1cd6
AC		 3821 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_get_saved_register called\n");
3822 gdbarch->deprecated_get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lval);
0f71a2f6
JM		 3823}
3824
3825void
129c1cd6
AC		 3826set_gdbarch_deprecated_get_saved_register (struct gdbarch *gdbarch,
3827 gdbarch_deprecated_get_saved_register_ftype deprecated_get_saved_register)
0f71a2f6 3828{
129c1cd6 3829 gdbarch->deprecated_get_saved_register = deprecated_get_saved_register;
0f71a2f6
JM		 3830}
3831
cd0bfa36
AC		 3832int
3833gdbarch_deprecated_register_convertible_p (struct gdbarch *gdbarch)
3834{
3835 gdb_assert (gdbarch != NULL);
3836 return gdbarch->deprecated_register_convertible != NULL;
3837}
3838
0f71a2f6 3839int
781a750d 3840gdbarch_deprecated_register_convertible (struct gdbarch *gdbarch, int nr)
0f71a2f6 3841{
8de9bdc4 3842 gdb_assert (gdbarch != NULL);
956ac328 3843 gdb_assert (gdbarch->deprecated_register_convertible != NULL);
0f71a2f6 3844 if (gdbarch_debug >= 2)
781a750d
AC		 3845 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_register_convertible called\n");
3846 return gdbarch->deprecated_register_convertible (nr);
0f71a2f6
JM		 3847}
3848
3849void
781a750d
AC		 3850set_gdbarch_deprecated_register_convertible (struct gdbarch *gdbarch,
3851 gdbarch_deprecated_register_convertible_ftype deprecated_register_convertible)
0f71a2f6 3852{
781a750d 3853 gdbarch->deprecated_register_convertible = deprecated_register_convertible;
0f71a2f6
JM		 3854}
3855
3856void
781a750d 3857gdbarch_deprecated_register_convert_to_virtual (struct gdbarch *gdbarch, int regnum, struct type *type, char *from, char *to)
0f71a2f6 3858{
8de9bdc4 3859 gdb_assert (gdbarch != NULL);
956ac328 3860 gdb_assert (gdbarch->deprecated_register_convert_to_virtual != NULL);
0f71a2f6 3861 if (gdbarch_debug >= 2)
781a750d
AC		 3862 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_register_convert_to_virtual called\n");
3863 gdbarch->deprecated_register_convert_to_virtual (regnum, type, from, to);
0f71a2f6
JM		 3864}
3865
3866void
781a750d
AC		 3867set_gdbarch_deprecated_register_convert_to_virtual (struct gdbarch *gdbarch,
3868 gdbarch_deprecated_register_convert_to_virtual_ftype deprecated_register_convert_to_virtual)
0f71a2f6 3869{
781a750d 3870 gdbarch->deprecated_register_convert_to_virtual = deprecated_register_convert_to_virtual;
0f71a2f6
JM		 3871}
3872
3873void
781a750d 3874gdbarch_deprecated_register_convert_to_raw (struct gdbarch *gdbarch, struct type *type, int regnum, const char *from, char *to)
0f71a2f6 3875{
8de9bdc4 3876 gdb_assert (gdbarch != NULL);
956ac328 3877 gdb_assert (gdbarch->deprecated_register_convert_to_raw != NULL);
0f71a2f6 3878 if (gdbarch_debug >= 2)
781a750d
AC		 3879 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_register_convert_to_raw called\n");
3880 gdbarch->deprecated_register_convert_to_raw (type, regnum, from, to);
0f71a2f6
JM		 3881}
3882
3883void
781a750d
AC		 3884set_gdbarch_deprecated_register_convert_to_raw (struct gdbarch *gdbarch,
3885 gdbarch_deprecated_register_convert_to_raw_ftype deprecated_register_convert_to_raw)
0f71a2f6 3886{
781a750d 3887 gdbarch->deprecated_register_convert_to_raw = deprecated_register_convert_to_raw;
0f71a2f6
JM		 3888}
3889
13d01224 3890int
ff2e87ac 3891gdbarch_convert_register_p (struct gdbarch *gdbarch, int regnum, struct type *type)
13d01224
AC		 3892{
3893 gdb_assert (gdbarch != NULL);
956ac328 3894 gdb_assert (gdbarch->convert_register_p != NULL);
13d01224
AC		 3895 if (gdbarch_debug >= 2)
3896 fprintf_unfiltered (gdb_stdlog, "gdbarch_convert_register_p called\n");
ff2e87ac 3897 return gdbarch->convert_register_p (regnum, type);
13d01224
AC		 3898}
3899
3900void
3901set_gdbarch_convert_register_p (struct gdbarch *gdbarch,
3902 gdbarch_convert_register_p_ftype convert_register_p)
3903{
3904 gdbarch->convert_register_p = convert_register_p;
3905}
3906
3907void
ff2e87ac 3908gdbarch_register_to_value (struct gdbarch *gdbarch, struct frame_info *frame, int regnum, struct type *type, void *buf)
13d01224
AC		 3909{
3910 gdb_assert (gdbarch != NULL);
956ac328 3911 gdb_assert (gdbarch->register_to_value != NULL);
13d01224
AC		 3912 if (gdbarch_debug >= 2)
3913 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_to_value called\n");
ff2e87ac 3914 gdbarch->register_to_value (frame, regnum, type, buf);
13d01224
AC		 3915}
3916
3917void
3918set_gdbarch_register_to_value (struct gdbarch *gdbarch,
3919 gdbarch_register_to_value_ftype register_to_value)
3920{
3921 gdbarch->register_to_value = register_to_value;
3922}
3923
3924void
ff2e87ac 3925gdbarch_value_to_register (struct gdbarch *gdbarch, struct frame_info *frame, int regnum, struct type *type, const void *buf)
13d01224
AC		 3926{
3927 gdb_assert (gdbarch != NULL);
956ac328 3928 gdb_assert (gdbarch->value_to_register != NULL);
13d01224
AC		 3929 if (gdbarch_debug >= 2)
3930 fprintf_unfiltered (gdb_stdlog, "gdbarch_value_to_register called\n");
ff2e87ac 3931 gdbarch->value_to_register (frame, regnum, type, buf);
13d01224
AC		 3932}
3933
3934void
3935set_gdbarch_value_to_register (struct gdbarch *gdbarch,
3936 gdbarch_value_to_register_ftype value_to_register)
3937{
3938 gdbarch->value_to_register = value_to_register;
3939}
3940
4478b372 3941CORE_ADDR
66140c26 3942gdbarch_pointer_to_address (struct gdbarch *gdbarch, struct type *type, const void *buf)
4478b372 3943{
8de9bdc4 3944 gdb_assert (gdbarch != NULL);
956ac328 3945 gdb_assert (gdbarch->pointer_to_address != NULL);
4478b372
JB		 3946 if (gdbarch_debug >= 2)
3947 fprintf_unfiltered (gdb_stdlog, "gdbarch_pointer_to_address called\n");
3948 return gdbarch->pointer_to_address (type, buf);
3949}
3950
3951void
3952set_gdbarch_pointer_to_address (struct gdbarch *gdbarch,
3953 gdbarch_pointer_to_address_ftype pointer_to_address)
3954{
3955 gdbarch->pointer_to_address = pointer_to_address;
3956}
3957
3958void
ac2e2ef7 3959gdbarch_address_to_pointer (struct gdbarch *gdbarch, struct type *type, void *buf, CORE_ADDR addr)
4478b372 3960{
8de9bdc4 3961 gdb_assert (gdbarch != NULL);
956ac328 3962 gdb_assert (gdbarch->address_to_pointer != NULL);
4478b372
JB		 3963 if (gdbarch_debug >= 2)
3964 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_to_pointer called\n");
3965 gdbarch->address_to_pointer (type, buf, addr);
3966}
3967
3968void
3969set_gdbarch_address_to_pointer (struct gdbarch *gdbarch,
3970 gdbarch_address_to_pointer_ftype address_to_pointer)
3971{
3972 gdbarch->address_to_pointer = address_to_pointer;
3973}
3974
fc0c74b1
AC		 3975int
3976gdbarch_integer_to_address_p (struct gdbarch *gdbarch)
3977{
8de9bdc4 3978 gdb_assert (gdbarch != NULL);
956ac328 3979 return gdbarch->integer_to_address != NULL;
fc0c74b1
AC		 3980}
3981
3982CORE_ADDR
3983gdbarch_integer_to_address (struct gdbarch *gdbarch, struct type *type, void *buf)
3984{
8de9bdc4 3985 gdb_assert (gdbarch != NULL);
956ac328 3986 gdb_assert (gdbarch->integer_to_address != NULL);
fc0c74b1
AC		 3987 if (gdbarch_debug >= 2)
3988 fprintf_unfiltered (gdb_stdlog, "gdbarch_integer_to_address called\n");
3989 return gdbarch->integer_to_address (type, buf);
3990}
3991
3992void
3993set_gdbarch_integer_to_address (struct gdbarch *gdbarch,
3994 gdbarch_integer_to_address_ftype integer_to_address)
3995{
3996 gdbarch->integer_to_address = integer_to_address;
3997}
3998
dedc2a2b 3999int
749b82f6 4000gdbarch_deprecated_pop_frame_p (struct gdbarch *gdbarch)
dedc2a2b
AC		 4001{
4002 gdb_assert (gdbarch != NULL);
956ac328 4003 return gdbarch->deprecated_pop_frame != NULL;
dedc2a2b
AC		 4004}
4005
0f71a2f6 4006void
749b82f6 4007gdbarch_deprecated_pop_frame (struct gdbarch *gdbarch)
0f71a2f6 4008{
8de9bdc4 4009 gdb_assert (gdbarch != NULL);
956ac328 4010 gdb_assert (gdbarch->deprecated_pop_frame != NULL);
0f71a2f6 4011 if (gdbarch_debug >= 2)
749b82f6
AC		 4012 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_pop_frame called\n");
4013 gdbarch->deprecated_pop_frame ();
0f71a2f6
JM		 4014}
4015
4016void
749b82f6
AC		 4017set_gdbarch_deprecated_pop_frame (struct gdbarch *gdbarch,
4018 gdbarch_deprecated_pop_frame_ftype deprecated_pop_frame)
0f71a2f6 4019{
749b82f6 4020 gdbarch->deprecated_pop_frame = deprecated_pop_frame;
0f71a2f6
JM		 4021}
4022
4183d812
AC		 4023int
4024gdbarch_deprecated_store_struct_return_p (struct gdbarch *gdbarch)
4025{
4026 gdb_assert (gdbarch != NULL);
956ac328 4027 return gdbarch->deprecated_store_struct_return != NULL;
4183d812
AC		 4028}
4029
0f71a2f6 4030void
4183d812 4031gdbarch_deprecated_store_struct_return (struct gdbarch *gdbarch, CORE_ADDR addr, CORE_ADDR sp)
0f71a2f6 4032{
8de9bdc4 4033 gdb_assert (gdbarch != NULL);
956ac328 4034 gdb_assert (gdbarch->deprecated_store_struct_return != NULL);
0f71a2f6 4035 if (gdbarch_debug >= 2)
4183d812
AC		 4036 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_store_struct_return called\n");
4037 gdbarch->deprecated_store_struct_return (addr, sp);
0f71a2f6
JM		 4038}
4039
4040void
4183d812
AC		 4041set_gdbarch_deprecated_store_struct_return (struct gdbarch *gdbarch,
4042 gdbarch_deprecated_store_struct_return_ftype deprecated_store_struct_return)
0f71a2f6 4043{
4183d812 4044 gdbarch->deprecated_store_struct_return = deprecated_store_struct_return;
0f71a2f6
JM		 4045}
4046
92ad9cd9
AC		 4047int
4048gdbarch_return_value_p (struct gdbarch *gdbarch)
4049{
4050 gdb_assert (gdbarch != NULL);
4051 return gdbarch->return_value != NULL;
4052}
4053
4054enum return_value_convention
963e2bb7 4055gdbarch_return_value (struct gdbarch *gdbarch, struct type *valtype, struct regcache *regcache, void *readbuf, const void *writebuf)
92ad9cd9
AC		 4056{
4057 gdb_assert (gdbarch != NULL);
4058 gdb_assert (gdbarch->return_value != NULL);
4059 if (gdbarch_debug >= 2)
4060 fprintf_unfiltered (gdb_stdlog, "gdbarch_return_value called\n");
963e2bb7 4061 return gdbarch->return_value (gdbarch, valtype, regcache, readbuf, writebuf);
92ad9cd9
AC		 4062}
4063
4064void
4065set_gdbarch_return_value (struct gdbarch *gdbarch,
4066 gdbarch_return_value_ftype return_value)
4067{
4068 gdbarch->return_value = return_value;
4069}
4070
4071int
4072gdbarch_return_value_on_stack (struct gdbarch *gdbarch, struct type *type)
4073{
4074 gdb_assert (gdbarch != NULL);
4075 gdb_assert (gdbarch->return_value_on_stack != NULL);
4076 if (gdbarch_debug >= 2)
4077 fprintf_unfiltered (gdb_stdlog, "gdbarch_return_value_on_stack called\n");
4078 return gdbarch->return_value_on_stack (type);
4079}
4080
4081void
4082set_gdbarch_return_value_on_stack (struct gdbarch *gdbarch,
4083 gdbarch_return_value_on_stack_ftype return_value_on_stack)
4084{
4085 gdbarch->return_value_on_stack = return_value_on_stack;
4086}
4087
0f71a2f6 4088void
ebba8386
AC		 4089gdbarch_extract_return_value (struct gdbarch *gdbarch, struct type *type, struct regcache *regcache, void *valbuf)
4090{
4091 gdb_assert (gdbarch != NULL);
956ac328 4092 gdb_assert (gdbarch->extract_return_value != NULL);
ebba8386
AC		 4093 if (gdbarch_debug >= 2)
4094 fprintf_unfiltered (gdb_stdlog, "gdbarch_extract_return_value called\n");
4095 gdbarch->extract_return_value (type, regcache, valbuf);
4096}
4097
4098void
4099set_gdbarch_extract_return_value (struct gdbarch *gdbarch,
4100 gdbarch_extract_return_value_ftype extract_return_value)
4101{
4102 gdbarch->extract_return_value = extract_return_value;
4103}
4104
4105void
4106gdbarch_store_return_value (struct gdbarch *gdbarch, struct type *type, struct regcache *regcache, const void *valbuf)
0f71a2f6 4107{
8de9bdc4 4108 gdb_assert (gdbarch != NULL);
956ac328 4109 gdb_assert (gdbarch->store_return_value != NULL);
0f71a2f6 4110 if (gdbarch_debug >= 2)
0f71a2f6 4111 fprintf_unfiltered (gdb_stdlog, "gdbarch_store_return_value called\n");
ebba8386 4112 gdbarch->store_return_value (type, regcache, valbuf);
0f71a2f6
JM		 4113}
4114
4115void
104c1213
JM		 4116set_gdbarch_store_return_value (struct gdbarch *gdbarch,
4117 gdbarch_store_return_value_ftype store_return_value)
0f71a2f6
JM		 4118{
4119 gdbarch->store_return_value = store_return_value;
4120}
4121
ebba8386
AC		 4122void
4123gdbarch_deprecated_extract_return_value (struct gdbarch *gdbarch, struct type *type, char *regbuf, char *valbuf)
4124{
4125 gdb_assert (gdbarch != NULL);
956ac328 4126 gdb_assert (gdbarch->deprecated_extract_return_value != NULL);
ebba8386
AC		 4127 if (gdbarch_debug >= 2)
4128 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_extract_return_value called\n");
4129 gdbarch->deprecated_extract_return_value (type, regbuf, valbuf);
4130}
4131
4132void
4133set_gdbarch_deprecated_extract_return_value (struct gdbarch *gdbarch,
4134 gdbarch_deprecated_extract_return_value_ftype deprecated_extract_return_value)
4135{
4136 gdbarch->deprecated_extract_return_value = deprecated_extract_return_value;
4137}
4138
4139void
4140gdbarch_deprecated_store_return_value (struct gdbarch *gdbarch, struct type *type, char *valbuf)
4141{
4142 gdb_assert (gdbarch != NULL);
956ac328 4143 gdb_assert (gdbarch->deprecated_store_return_value != NULL);
ebba8386
AC		 4144 if (gdbarch_debug >= 2)
4145 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_store_return_value called\n");
4146 gdbarch->deprecated_store_return_value (type, valbuf);
4147}
4148
4149void
4150set_gdbarch_deprecated_store_return_value (struct gdbarch *gdbarch,
4151 gdbarch_deprecated_store_return_value_ftype deprecated_store_return_value)
4152{
4153 gdbarch->deprecated_store_return_value = deprecated_store_return_value;
4154}
4155
92ad9cd9
AC		 4156int
4157gdbarch_use_struct_convention (struct gdbarch *gdbarch, int gcc_p, struct type *value_type)
4158{
4159 gdb_assert (gdbarch != NULL);
4160 gdb_assert (gdbarch->use_struct_convention != NULL);
4161 if (gdbarch_debug >= 2)
4162 fprintf_unfiltered (gdb_stdlog, "gdbarch_use_struct_convention called\n");
4163 return gdbarch->use_struct_convention (gcc_p, value_type);
4164}
4165
4166void
4167set_gdbarch_use_struct_convention (struct gdbarch *gdbarch,
4168 gdbarch_use_struct_convention_ftype use_struct_convention)
4169{
4170 gdbarch->use_struct_convention = use_struct_convention;
4171}
4172
049ee0e4 4173int
74055713 4174gdbarch_deprecated_extract_struct_value_address_p (struct gdbarch *gdbarch)
049ee0e4
AC		 4175{
4176 gdb_assert (gdbarch != NULL);
74055713 4177 return gdbarch->deprecated_extract_struct_value_address != NULL;
049ee0e4
AC		 4178}
4179
4180CORE_ADDR
74055713 4181gdbarch_deprecated_extract_struct_value_address (struct gdbarch *gdbarch, struct regcache *regcache)
049ee0e4
AC		 4182{
4183 gdb_assert (gdbarch != NULL);
74055713 4184 gdb_assert (gdbarch->deprecated_extract_struct_value_address != NULL);
049ee0e4 4185 if (gdbarch_debug >= 2)
74055713
AC		 4186 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_extract_struct_value_address called\n");
4187 return gdbarch->deprecated_extract_struct_value_address (regcache);
049ee0e4
AC		 4188}
4189
4190void
74055713
AC		 4191set_gdbarch_deprecated_extract_struct_value_address (struct gdbarch *gdbarch,
4192 gdbarch_deprecated_extract_struct_value_address_ftype deprecated_extract_struct_value_address)
049ee0e4 4193{
74055713 4194 gdbarch->deprecated_extract_struct_value_address = deprecated_extract_struct_value_address;
049ee0e4
AC		 4195}
4196
8f871025 4197int
f30ee0bc 4198gdbarch_deprecated_frame_init_saved_regs_p (struct gdbarch *gdbarch)
8f871025
AC		 4199{
4200 gdb_assert (gdbarch != NULL);
956ac328 4201 return gdbarch->deprecated_frame_init_saved_regs != NULL;
8f871025
AC		 4202}
4203
0f71a2f6 4204void
f30ee0bc 4205gdbarch_deprecated_frame_init_saved_regs (struct gdbarch *gdbarch, struct frame_info *frame)
0f71a2f6 4206{
8de9bdc4 4207 gdb_assert (gdbarch != NULL);
956ac328 4208 gdb_assert (gdbarch->deprecated_frame_init_saved_regs != NULL);
0f71a2f6 4209 if (gdbarch_debug >= 2)
f30ee0bc
AC		 4210 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_frame_init_saved_regs called\n");
4211 gdbarch->deprecated_frame_init_saved_regs (frame);
0f71a2f6
JM		 4212}
4213
4214void
f30ee0bc
AC		 4215set_gdbarch_deprecated_frame_init_saved_regs (struct gdbarch *gdbarch,
4216 gdbarch_deprecated_frame_init_saved_regs_ftype deprecated_frame_init_saved_regs)
0f71a2f6 4217{
f30ee0bc 4218 gdbarch->deprecated_frame_init_saved_regs = deprecated_frame_init_saved_regs;
0f71a2f6
JM		 4219}
4220
5fdff426 4221int
e9582e71 4222gdbarch_deprecated_init_extra_frame_info_p (struct gdbarch *gdbarch)
5fdff426 4223{
8de9bdc4 4224 gdb_assert (gdbarch != NULL);
956ac328 4225 return gdbarch->deprecated_init_extra_frame_info != NULL;
5fdff426
AC		 4226}
4227
0f71a2f6 4228void
e9582e71 4229gdbarch_deprecated_init_extra_frame_info (struct gdbarch *gdbarch, int fromleaf, struct frame_info *frame)
0f71a2f6 4230{
8de9bdc4 4231 gdb_assert (gdbarch != NULL);
956ac328 4232 gdb_assert (gdbarch->deprecated_init_extra_frame_info != NULL);
0f71a2f6 4233 if (gdbarch_debug >= 2)
e9582e71
AC		 4234 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_init_extra_frame_info called\n");
4235 gdbarch->deprecated_init_extra_frame_info (fromleaf, frame);
0f71a2f6
JM		 4236}
4237
4238void
e9582e71
AC		 4239set_gdbarch_deprecated_init_extra_frame_info (struct gdbarch *gdbarch,
4240 gdbarch_deprecated_init_extra_frame_info_ftype deprecated_init_extra_frame_info)
0f71a2f6 4241{
e9582e71 4242 gdbarch->deprecated_init_extra_frame_info = deprecated_init_extra_frame_info;
0f71a2f6
JM		 4243}
4244
4245CORE_ADDR
4246gdbarch_skip_prologue (struct gdbarch *gdbarch, CORE_ADDR ip)
4247{
8de9bdc4 4248 gdb_assert (gdbarch != NULL);
956ac328 4249 gdb_assert (gdbarch->skip_prologue != NULL);
0f71a2f6 4250 if (gdbarch_debug >= 2)
0f71a2f6
JM		 4251 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_prologue called\n");
4252 return gdbarch->skip_prologue (ip);
4253}
4254
4255void
104c1213
JM		 4256set_gdbarch_skip_prologue (struct gdbarch *gdbarch,
4257 gdbarch_skip_prologue_ftype skip_prologue)
0f71a2f6
JM		 4258{
4259 gdbarch->skip_prologue = skip_prologue;
4260}
4261
4262int
4263gdbarch_inner_than (struct gdbarch *gdbarch, CORE_ADDR lhs, CORE_ADDR rhs)
4264{
8de9bdc4 4265 gdb_assert (gdbarch != NULL);
956ac328 4266 gdb_assert (gdbarch->inner_than != NULL);
0f71a2f6 4267 if (gdbarch_debug >= 2)
0f71a2f6
JM		 4268 fprintf_unfiltered (gdb_stdlog, "gdbarch_inner_than called\n");
4269 return gdbarch->inner_than (lhs, rhs);
4270}
4271
4272void
104c1213
JM		 4273set_gdbarch_inner_than (struct gdbarch *gdbarch,
4274 gdbarch_inner_than_ftype inner_than)
0f71a2f6
JM		 4275{
4276 gdbarch->inner_than = inner_than;
4277}
4278
f4f9705a 4279const unsigned char *
adf40b2e 4280gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch, CORE_ADDR *pcptr, int *lenptr)
0f71a2f6 4281{
8de9bdc4 4282 gdb_assert (gdbarch != NULL);
956ac328 4283 gdb_assert (gdbarch->breakpoint_from_pc != NULL);
0f71a2f6 4284 if (gdbarch_debug >= 2)
0f71a2f6
JM		 4285 fprintf_unfiltered (gdb_stdlog, "gdbarch_breakpoint_from_pc called\n");
4286 return gdbarch->breakpoint_from_pc (pcptr, lenptr);
4287}
4288
4289void
104c1213
JM		 4290set_gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch,
4291 gdbarch_breakpoint_from_pc_ftype breakpoint_from_pc)
0f71a2f6
JM		 4292{
4293 gdbarch->breakpoint_from_pc = breakpoint_from_pc;
4294}
4295
a1131521
KB		 4296int
4297gdbarch_adjust_breakpoint_address_p (struct gdbarch *gdbarch)
4298{
4299 gdb_assert (gdbarch != NULL);
4300 return gdbarch->adjust_breakpoint_address != NULL;
4301}
4302
4303CORE_ADDR
4304gdbarch_adjust_breakpoint_address (struct gdbarch *gdbarch, CORE_ADDR bpaddr)
4305{
4306 gdb_assert (gdbarch != NULL);
4307 gdb_assert (gdbarch->adjust_breakpoint_address != NULL);
4308 if (gdbarch_debug >= 2)
4309 fprintf_unfiltered (gdb_stdlog, "gdbarch_adjust_breakpoint_address called\n");
4310 return gdbarch->adjust_breakpoint_address (gdbarch, bpaddr);
4311}
4312
4313void
4314set_gdbarch_adjust_breakpoint_address (struct gdbarch *gdbarch,
4315 gdbarch_adjust_breakpoint_address_ftype adjust_breakpoint_address)
4316{
4317 gdbarch->adjust_breakpoint_address = adjust_breakpoint_address;
4318}
4319
917317f4
JM		 4320int
4321gdbarch_memory_insert_breakpoint (struct gdbarch *gdbarch, CORE_ADDR addr, char *contents_cache)
4322{
8de9bdc4 4323 gdb_assert (gdbarch != NULL);
956ac328 4324 gdb_assert (gdbarch->memory_insert_breakpoint != NULL);
917317f4 4325 if (gdbarch_debug >= 2)
917317f4
JM		 4326 fprintf_unfiltered (gdb_stdlog, "gdbarch_memory_insert_breakpoint called\n");
4327 return gdbarch->memory_insert_breakpoint (addr, contents_cache);
4328}
4329
4330void
4331set_gdbarch_memory_insert_breakpoint (struct gdbarch *gdbarch,
4332 gdbarch_memory_insert_breakpoint_ftype memory_insert_breakpoint)
4333{
4334 gdbarch->memory_insert_breakpoint = memory_insert_breakpoint;
4335}
4336
4337int
4338gdbarch_memory_remove_breakpoint (struct gdbarch *gdbarch, CORE_ADDR addr, char *contents_cache)
4339{
8de9bdc4 4340 gdb_assert (gdbarch != NULL);
956ac328 4341 gdb_assert (gdbarch->memory_remove_breakpoint != NULL);
917317f4 4342 if (gdbarch_debug >= 2)
917317f4
JM		 4343 fprintf_unfiltered (gdb_stdlog, "gdbarch_memory_remove_breakpoint called\n");
4344 return gdbarch->memory_remove_breakpoint (addr, contents_cache);
4345}
4346
4347void
4348set_gdbarch_memory_remove_breakpoint (struct gdbarch *gdbarch,
4349 gdbarch_memory_remove_breakpoint_ftype memory_remove_breakpoint)
4350{
4351 gdbarch->memory_remove_breakpoint = memory_remove_breakpoint;
4352}
4353
0f71a2f6 4354CORE_ADDR
104c1213 4355gdbarch_decr_pc_after_break (struct gdbarch *gdbarch)
0f71a2f6 4356{
8de9bdc4 4357 gdb_assert (gdbarch != NULL);
71bd6bd4 4358 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
0f71a2f6 4359 if (gdbarch_debug >= 2)
0f71a2f6
JM		 4360 fprintf_unfiltered (gdb_stdlog, "gdbarch_decr_pc_after_break called\n");
4361 return gdbarch->decr_pc_after_break;
4362}
4363
4364void
104c1213
JM		 4365set_gdbarch_decr_pc_after_break (struct gdbarch *gdbarch,
4366 CORE_ADDR decr_pc_after_break)
0f71a2f6
JM		 4367{
4368 gdbarch->decr_pc_after_break = decr_pc_after_break;
4369}
4370
4371CORE_ADDR
104c1213 4372gdbarch_function_start_offset (struct gdbarch *gdbarch)
0f71a2f6 4373{
8de9bdc4 4374 gdb_assert (gdbarch != NULL);
6503b91e 4375 /* Skip verify of function_start_offset, invalid_p == 0 */
0f71a2f6 4376 if (gdbarch_debug >= 2)
0f71a2f6
JM		 4377 fprintf_unfiltered (gdb_stdlog, "gdbarch_function_start_offset called\n");
4378 return gdbarch->function_start_offset;
4379}
4380
4381void
104c1213
JM		 4382set_gdbarch_function_start_offset (struct gdbarch *gdbarch,
4383 CORE_ADDR function_start_offset)
0f71a2f6
JM		 4384{
4385 gdbarch->function_start_offset = function_start_offset;
4386}
4387
4388void
f6684c31 4389gdbarch_remote_translate_xfer_address (struct gdbarch *gdbarch, struct regcache *regcache, CORE_ADDR gdb_addr, int gdb_len, CORE_ADDR *rem_addr, int *rem_len)
0f71a2f6 4390{
8de9bdc4 4391 gdb_assert (gdbarch != NULL);
956ac328 4392 gdb_assert (gdbarch->remote_translate_xfer_address != NULL);
0f71a2f6 4393 if (gdbarch_debug >= 2)
0f71a2f6 4394 fprintf_unfiltered (gdb_stdlog, "gdbarch_remote_translate_xfer_address called\n");
f6684c31 4395 gdbarch->remote_translate_xfer_address (gdbarch, regcache, gdb_addr, gdb_len, rem_addr, rem_len);
0f71a2f6
JM		 4396}
4397
4398void
104c1213
JM		 4399set_gdbarch_remote_translate_xfer_address (struct gdbarch *gdbarch,
4400 gdbarch_remote_translate_xfer_address_ftype remote_translate_xfer_address)
0f71a2f6
JM		 4401{
4402 gdbarch->remote_translate_xfer_address = remote_translate_xfer_address;
4403}
4404
4405CORE_ADDR
104c1213 4406gdbarch_frame_args_skip (struct gdbarch *gdbarch)
0f71a2f6 4407{
8de9bdc4 4408 gdb_assert (gdbarch != NULL);
5867a2fb 4409 /* Skip verify of frame_args_skip, invalid_p == 0 */
0f71a2f6 4410 if (gdbarch_debug >= 2)
0f71a2f6
JM		 4411 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_args_skip called\n");
4412 return gdbarch->frame_args_skip;
4413}
4414
4415void
104c1213
JM		 4416set_gdbarch_frame_args_skip (struct gdbarch *gdbarch,
4417 CORE_ADDR frame_args_skip)
0f71a2f6
JM		 4418{
4419 gdbarch->frame_args_skip = frame_args_skip;
4420}
4421
4422int
19772a2c
AC		 4423gdbarch_deprecated_frameless_function_invocation_p (struct gdbarch *gdbarch)
4424{
4425 gdb_assert (gdbarch != NULL);
4426 return gdbarch->deprecated_frameless_function_invocation != NULL;
4427}
4428
4429int
4430gdbarch_deprecated_frameless_function_invocation (struct gdbarch *gdbarch, struct frame_info *fi)
0f71a2f6 4431{
8de9bdc4 4432 gdb_assert (gdbarch != NULL);
19772a2c 4433 gdb_assert (gdbarch->deprecated_frameless_function_invocation != NULL);
0f71a2f6 4434 if (gdbarch_debug >= 2)
19772a2c
AC		 4435 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_frameless_function_invocation called\n");
4436 return gdbarch->deprecated_frameless_function_invocation (fi);
0f71a2f6
JM		 4437}
4438
4439void
19772a2c
AC		 4440set_gdbarch_deprecated_frameless_function_invocation (struct gdbarch *gdbarch,
4441 gdbarch_deprecated_frameless_function_invocation_ftype deprecated_frameless_function_invocation)
0f71a2f6 4442{
19772a2c 4443 gdbarch->deprecated_frameless_function_invocation = deprecated_frameless_function_invocation;
0f71a2f6
JM		 4444}
4445
d62d1979 4446int
618ce49f 4447gdbarch_deprecated_frame_chain_p (struct gdbarch *gdbarch)
d62d1979
AC		 4448{
4449 gdb_assert (gdbarch != NULL);
956ac328 4450 return gdbarch->deprecated_frame_chain != NULL;
d62d1979
AC		 4451}
4452
0f71a2f6 4453CORE_ADDR
618ce49f 4454gdbarch_deprecated_frame_chain (struct gdbarch *gdbarch, struct frame_info *frame)
0f71a2f6 4455{
8de9bdc4 4456 gdb_assert (gdbarch != NULL);
956ac328 4457 gdb_assert (gdbarch->deprecated_frame_chain != NULL);
0f71a2f6 4458 if (gdbarch_debug >= 2)
618ce49f
AC		 4459 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_frame_chain called\n");
4460 return gdbarch->deprecated_frame_chain (frame);
0f71a2f6
JM		 4461}
4462
4463void
618ce49f
AC		 4464set_gdbarch_deprecated_frame_chain (struct gdbarch *gdbarch,
4465 gdbarch_deprecated_frame_chain_ftype deprecated_frame_chain)
0f71a2f6 4466{
618ce49f 4467 gdbarch->deprecated_frame_chain = deprecated_frame_chain;
0f71a2f6
JM		 4468}
4469
51603483 4470int
618ce49f 4471gdbarch_deprecated_frame_chain_valid_p (struct gdbarch *gdbarch)
51603483
DJ		 4472{
4473 gdb_assert (gdbarch != NULL);
956ac328 4474 return gdbarch->deprecated_frame_chain_valid != NULL;
51603483
DJ		 4475}
4476
0f71a2f6 4477int
618ce49f 4478gdbarch_deprecated_frame_chain_valid (struct gdbarch *gdbarch, CORE_ADDR chain, struct frame_info *thisframe)
0f71a2f6 4479{
8de9bdc4 4480 gdb_assert (gdbarch != NULL);
956ac328 4481 gdb_assert (gdbarch->deprecated_frame_chain_valid != NULL);
0f71a2f6 4482 if (gdbarch_debug >= 2)
618ce49f
AC		 4483 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_frame_chain_valid called\n");
4484 return gdbarch->deprecated_frame_chain_valid (chain, thisframe);
0f71a2f6
JM		 4485}
4486
4487void
618ce49f
AC		 4488set_gdbarch_deprecated_frame_chain_valid (struct gdbarch *gdbarch,
4489 gdbarch_deprecated_frame_chain_valid_ftype deprecated_frame_chain_valid)
0f71a2f6 4490{
618ce49f 4491 gdbarch->deprecated_frame_chain_valid = deprecated_frame_chain_valid;
0f71a2f6
JM		 4492}
4493
d62d1979 4494int
8bedc050 4495gdbarch_deprecated_frame_saved_pc_p (struct gdbarch *gdbarch)
d62d1979
AC		 4496{
4497 gdb_assert (gdbarch != NULL);
956ac328 4498 return gdbarch->deprecated_frame_saved_pc != NULL;
d62d1979
AC		 4499}
4500
0f71a2f6 4501CORE_ADDR
8bedc050 4502gdbarch_deprecated_frame_saved_pc (struct gdbarch *gdbarch, struct frame_info *fi)
0f71a2f6 4503{
8de9bdc4 4504 gdb_assert (gdbarch != NULL);
956ac328 4505 gdb_assert (gdbarch->deprecated_frame_saved_pc != NULL);
0f71a2f6 4506 if (gdbarch_debug >= 2)
8bedc050
AC		 4507 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_frame_saved_pc called\n");
4508 return gdbarch->deprecated_frame_saved_pc (fi);
0f71a2f6
JM		 4509}
4510
4511void
8bedc050
AC		 4512set_gdbarch_deprecated_frame_saved_pc (struct gdbarch *gdbarch,
4513 gdbarch_deprecated_frame_saved_pc_ftype deprecated_frame_saved_pc)
0f71a2f6 4514{
8bedc050 4515 gdbarch->deprecated_frame_saved_pc = deprecated_frame_saved_pc;
0f71a2f6
JM		 4516}
4517
12cc2063
AC		 4518int
4519gdbarch_unwind_pc_p (struct gdbarch *gdbarch)
4520{
4521 gdb_assert (gdbarch != NULL);
956ac328 4522 return gdbarch->unwind_pc != NULL;
12cc2063
AC		 4523}
4524
4525CORE_ADDR
4526gdbarch_unwind_pc (struct gdbarch *gdbarch, struct frame_info *next_frame)
4527{
4528 gdb_assert (gdbarch != NULL);
956ac328 4529 gdb_assert (gdbarch->unwind_pc != NULL);
12cc2063
AC		 4530 if (gdbarch_debug >= 2)
4531 fprintf_unfiltered (gdb_stdlog, "gdbarch_unwind_pc called\n");
4532 return gdbarch->unwind_pc (gdbarch, next_frame);
4533}
4534
4535void
4536set_gdbarch_unwind_pc (struct gdbarch *gdbarch,
4537 gdbarch_unwind_pc_ftype unwind_pc)
4538{
4539 gdbarch->unwind_pc = unwind_pc;
4540}
4541
a9e5fdc2
AC		 4542int
4543gdbarch_unwind_sp_p (struct gdbarch *gdbarch)
4544{
4545 gdb_assert (gdbarch != NULL);
956ac328 4546 return gdbarch->unwind_sp != NULL;
a9e5fdc2
AC		 4547}
4548
4549CORE_ADDR
4550gdbarch_unwind_sp (struct gdbarch *gdbarch, struct frame_info *next_frame)
4551{
4552 gdb_assert (gdbarch != NULL);
956ac328 4553 gdb_assert (gdbarch->unwind_sp != NULL);
a9e5fdc2
AC		 4554 if (gdbarch_debug >= 2)
4555 fprintf_unfiltered (gdb_stdlog, "gdbarch_unwind_sp called\n");
4556 return gdbarch->unwind_sp (gdbarch, next_frame);
4557}
4558
4559void
4560set_gdbarch_unwind_sp (struct gdbarch *gdbarch,
4561 gdbarch_unwind_sp_ftype unwind_sp)
4562{
4563 gdbarch->unwind_sp = unwind_sp;
4564}
4565
42efa47a
AC		 4566int
4567gdbarch_deprecated_frame_args_address_p (struct gdbarch *gdbarch)
4568{
4569 gdb_assert (gdbarch != NULL);
4570 return gdbarch->deprecated_frame_args_address != get_frame_base;
4571}
4572
0f71a2f6 4573CORE_ADDR
42efa47a 4574gdbarch_deprecated_frame_args_address (struct gdbarch *gdbarch, struct frame_info *fi)
0f71a2f6 4575{
8de9bdc4 4576 gdb_assert (gdbarch != NULL);
956ac328
AC		 4577 gdb_assert (gdbarch->deprecated_frame_args_address != NULL);
4578 /* Do not check predicate: gdbarch->deprecated_frame_args_address != get_frame_base, allow call. */
0f71a2f6 4579 if (gdbarch_debug >= 2)
42efa47a
AC		 4580 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_frame_args_address called\n");
4581 return gdbarch->deprecated_frame_args_address (fi);
0f71a2f6
JM		 4582}
4583
4584void
42efa47a
AC		 4585set_gdbarch_deprecated_frame_args_address (struct gdbarch *gdbarch,
4586 gdbarch_deprecated_frame_args_address_ftype deprecated_frame_args_address)
0f71a2f6 4587{
42efa47a
AC		 4588 gdbarch->deprecated_frame_args_address = deprecated_frame_args_address;
4589}
4590
4591int
4592gdbarch_deprecated_frame_locals_address_p (struct gdbarch *gdbarch)
4593{
4594 gdb_assert (gdbarch != NULL);
4595 return gdbarch->deprecated_frame_locals_address != get_frame_base;
0f71a2f6
JM		 4596}
4597
4598CORE_ADDR
42efa47a 4599gdbarch_deprecated_frame_locals_address (struct gdbarch *gdbarch, struct frame_info *fi)
0f71a2f6 4600{
8de9bdc4 4601 gdb_assert (gdbarch != NULL);
956ac328
AC		 4602 gdb_assert (gdbarch->deprecated_frame_locals_address != NULL);
4603 /* Do not check predicate: gdbarch->deprecated_frame_locals_address != get_frame_base, allow call. */
0f71a2f6 4604 if (gdbarch_debug >= 2)
42efa47a
AC		 4605 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_frame_locals_address called\n");
4606 return gdbarch->deprecated_frame_locals_address (fi);
0f71a2f6
JM		 4607}
4608
4609void
42efa47a
AC		 4610set_gdbarch_deprecated_frame_locals_address (struct gdbarch *gdbarch,
4611 gdbarch_deprecated_frame_locals_address_ftype deprecated_frame_locals_address)
0f71a2f6 4612{
42efa47a 4613 gdbarch->deprecated_frame_locals_address = deprecated_frame_locals_address;
0f71a2f6
JM		 4614}
4615
4443bd83 4616int
6913c89a 4617gdbarch_deprecated_saved_pc_after_call_p (struct gdbarch *gdbarch)
4443bd83
AC		 4618{
4619 gdb_assert (gdbarch != NULL);
956ac328 4620 return gdbarch->deprecated_saved_pc_after_call != NULL;
4443bd83
AC		 4621}
4622
0f71a2f6 4623CORE_ADDR
6913c89a 4624gdbarch_deprecated_saved_pc_after_call (struct gdbarch *gdbarch, struct frame_info *frame)
0f71a2f6 4625{
8de9bdc4 4626 gdb_assert (gdbarch != NULL);
956ac328 4627 gdb_assert (gdbarch->deprecated_saved_pc_after_call != NULL);
0f71a2f6 4628 if (gdbarch_debug >= 2)
6913c89a
AC		 4629 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_saved_pc_after_call called\n");
4630 return gdbarch->deprecated_saved_pc_after_call (frame);
0f71a2f6
JM		 4631}
4632
4633void
6913c89a
AC		 4634set_gdbarch_deprecated_saved_pc_after_call (struct gdbarch *gdbarch,
4635 gdbarch_deprecated_saved_pc_after_call_ftype deprecated_saved_pc_after_call)
0f71a2f6 4636{
6913c89a 4637 gdbarch->deprecated_saved_pc_after_call = deprecated_saved_pc_after_call;
0f71a2f6
JM		 4638}
4639
983a287a
AC		 4640int
4641gdbarch_frame_num_args_p (struct gdbarch *gdbarch)
4642{
4643 gdb_assert (gdbarch != NULL);
956ac328 4644 return gdbarch->frame_num_args != NULL;
983a287a
AC		 4645}
4646
0f71a2f6
JM		 4647int
4648gdbarch_frame_num_args (struct gdbarch *gdbarch, struct frame_info *frame)
4649{
8de9bdc4 4650 gdb_assert (gdbarch != NULL);
956ac328 4651 gdb_assert (gdbarch->frame_num_args != NULL);
0f71a2f6 4652 if (gdbarch_debug >= 2)
0f71a2f6
JM		 4653 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_num_args called\n");
4654 return gdbarch->frame_num_args (frame);
4655}
4656
4657void
104c1213
JM		 4658set_gdbarch_frame_num_args (struct gdbarch *gdbarch,
4659 gdbarch_frame_num_args_ftype frame_num_args)
0f71a2f6
JM		 4660{
4661 gdbarch->frame_num_args = frame_num_args;
4662}
4663
2ada493a 4664int
f27dd7fd 4665gdbarch_deprecated_stack_align_p (struct gdbarch *gdbarch)
2ada493a 4666{
8de9bdc4 4667 gdb_assert (gdbarch != NULL);
f27dd7fd 4668 return gdbarch->deprecated_stack_align != NULL;
2ada493a
AC		 4669}
4670
4671CORE_ADDR
f27dd7fd 4672gdbarch_deprecated_stack_align (struct gdbarch *gdbarch, CORE_ADDR sp)
2ada493a 4673{
8de9bdc4 4674 gdb_assert (gdbarch != NULL);
f27dd7fd 4675 gdb_assert (gdbarch->deprecated_stack_align != NULL);
2ada493a 4676 if (gdbarch_debug >= 2)
f27dd7fd
AC		 4677 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_stack_align called\n");
4678 return gdbarch->deprecated_stack_align (sp);
2ada493a
AC		 4679}
4680
4681void
f27dd7fd
AC		 4682set_gdbarch_deprecated_stack_align (struct gdbarch *gdbarch,
4683 gdbarch_deprecated_stack_align_ftype deprecated_stack_align)
2ada493a 4684{
f27dd7fd 4685 gdbarch->deprecated_stack_align = deprecated_stack_align;
2ada493a
AC		 4686}
4687
dc604539
AC		 4688int
4689gdbarch_frame_align_p (struct gdbarch *gdbarch)
4690{
4691 gdb_assert (gdbarch != NULL);
956ac328 4692 return gdbarch->frame_align != NULL;
dc604539
AC		 4693}
4694
4695CORE_ADDR
4696gdbarch_frame_align (struct gdbarch *gdbarch, CORE_ADDR address)
4697{
4698 gdb_assert (gdbarch != NULL);
956ac328 4699 gdb_assert (gdbarch->frame_align != NULL);
dc604539
AC		 4700 if (gdbarch_debug >= 2)
4701 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_align called\n");
4702 return gdbarch->frame_align (gdbarch, address);
4703}
4704
4705void
4706set_gdbarch_frame_align (struct gdbarch *gdbarch,
4707 gdbarch_frame_align_ftype frame_align)
4708{
4709 gdbarch->frame_align = frame_align;
4710}
4711
d03e67c9 4712int
88d89dbb 4713gdbarch_deprecated_reg_struct_has_addr_p (struct gdbarch *gdbarch)
d03e67c9 4714{
8de9bdc4 4715 gdb_assert (gdbarch != NULL);
88d89dbb 4716 return gdbarch->deprecated_reg_struct_has_addr != NULL;
d03e67c9
AC		 4717}
4718
4719int
88d89dbb 4720gdbarch_deprecated_reg_struct_has_addr (struct gdbarch *gdbarch, int gcc_p, struct type *type)
d03e67c9 4721{
8de9bdc4 4722 gdb_assert (gdbarch != NULL);
88d89dbb 4723 gdb_assert (gdbarch->deprecated_reg_struct_has_addr != NULL);
d03e67c9 4724 if (gdbarch_debug >= 2)
88d89dbb
MK		 4725 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_reg_struct_has_addr called\n");
4726 return gdbarch->deprecated_reg_struct_has_addr (gcc_p, type);
d03e67c9
AC		 4727}
4728
4729void
88d89dbb
MK		 4730set_gdbarch_deprecated_reg_struct_has_addr (struct gdbarch *gdbarch,
4731 gdbarch_deprecated_reg_struct_has_addr_ftype deprecated_reg_struct_has_addr)
d03e67c9 4732{
88d89dbb 4733 gdbarch->deprecated_reg_struct_has_addr = deprecated_reg_struct_has_addr;
d03e67c9
AC		 4734}
4735
192cb3d4
MK		 4736int
4737gdbarch_stabs_argument_has_addr (struct gdbarch *gdbarch, struct type *type)
4738{
4739 gdb_assert (gdbarch != NULL);
4740 gdb_assert (gdbarch->stabs_argument_has_addr != NULL);
4741 if (gdbarch_debug >= 2)
4742 fprintf_unfiltered (gdb_stdlog, "gdbarch_stabs_argument_has_addr called\n");
4743 return gdbarch->stabs_argument_has_addr (gdbarch, type);
4744}
4745
4746void
4747set_gdbarch_stabs_argument_has_addr (struct gdbarch *gdbarch,
4748 gdbarch_stabs_argument_has_addr_ftype stabs_argument_has_addr)
4749{
4750 gdbarch->stabs_argument_has_addr = stabs_argument_has_addr;
4751}
4752
8b148df9
AC		 4753int
4754gdbarch_frame_red_zone_size (struct gdbarch *gdbarch)
4755{
4756 gdb_assert (gdbarch != NULL);
4757 if (gdbarch_debug >= 2)
4758 fprintf_unfiltered (gdb_stdlog, "gdbarch_frame_red_zone_size called\n");
4759 return gdbarch->frame_red_zone_size;
4760}
4761
4762void
4763set_gdbarch_frame_red_zone_size (struct gdbarch *gdbarch,
4764 int frame_red_zone_size)
4765{
4766 gdbarch->frame_red_zone_size = frame_red_zone_size;
4767}
4768
58d5518e
ND		 4769int
4770gdbarch_parm_boundary (struct gdbarch *gdbarch)
4771{
8de9bdc4 4772 gdb_assert (gdbarch != NULL);
58d5518e
ND		 4773 if (gdbarch_debug >= 2)
4774 fprintf_unfiltered (gdb_stdlog, "gdbarch_parm_boundary called\n");
4775 return gdbarch->parm_boundary;
4776}
4777
4778void
4779set_gdbarch_parm_boundary (struct gdbarch *gdbarch,
4780 int parm_boundary)
4781{
4782 gdbarch->parm_boundary = parm_boundary;
4783}
4784
f0d4cc9e
AC		 4785const struct floatformat *
4786gdbarch_float_format (struct gdbarch *gdbarch)
4787{
8de9bdc4 4788 gdb_assert (gdbarch != NULL);
f0d4cc9e
AC		 4789 if (gdbarch_debug >= 2)
4790 fprintf_unfiltered (gdb_stdlog, "gdbarch_float_format called\n");
4791 return gdbarch->float_format;
4792}
4793
4794void
4795set_gdbarch_float_format (struct gdbarch *gdbarch,
4796 const struct floatformat * float_format)
4797{
4798 gdbarch->float_format = float_format;
4799}
4800
4801const struct floatformat *
4802gdbarch_double_format (struct gdbarch *gdbarch)
4803{
8de9bdc4 4804 gdb_assert (gdbarch != NULL);
f0d4cc9e
AC		 4805 if (gdbarch_debug >= 2)
4806 fprintf_unfiltered (gdb_stdlog, "gdbarch_double_format called\n");
4807 return gdbarch->double_format;
4808}
4809
4810void
4811set_gdbarch_double_format (struct gdbarch *gdbarch,
4812 const struct floatformat * double_format)
4813{
4814 gdbarch->double_format = double_format;
4815}
4816
4817const struct floatformat *
4818gdbarch_long_double_format (struct gdbarch *gdbarch)
4819{
8de9bdc4 4820 gdb_assert (gdbarch != NULL);
f0d4cc9e
AC		 4821 if (gdbarch_debug >= 2)
4822 fprintf_unfiltered (gdb_stdlog, "gdbarch_long_double_format called\n");
4823 return gdbarch->long_double_format;
4824}
4825
4826void
4827set_gdbarch_long_double_format (struct gdbarch *gdbarch,
4828 const struct floatformat * long_double_format)
4829{
4830 gdbarch->long_double_format = long_double_format;
4831}
4832
f517ea4e 4833CORE_ADDR
e2d0e7eb 4834gdbarch_convert_from_func_ptr_addr (struct gdbarch *gdbarch, CORE_ADDR addr, struct target_ops *targ)
f517ea4e 4835{
8de9bdc4 4836 gdb_assert (gdbarch != NULL);
956ac328 4837 gdb_assert (gdbarch->convert_from_func_ptr_addr != NULL);
f517ea4e
PS		 4838 if (gdbarch_debug >= 2)
4839 fprintf_unfiltered (gdb_stdlog, "gdbarch_convert_from_func_ptr_addr called\n");
e2d0e7eb 4840 return gdbarch->convert_from_func_ptr_addr (gdbarch, addr, targ);
f517ea4e
PS		 4841}
4842
4843void
4844set_gdbarch_convert_from_func_ptr_addr (struct gdbarch *gdbarch,
4845 gdbarch_convert_from_func_ptr_addr_ftype convert_from_func_ptr_addr)
4846{
4847 gdbarch->convert_from_func_ptr_addr = convert_from_func_ptr_addr;
4848}
4849
875e1767
AC		 4850CORE_ADDR
4851gdbarch_addr_bits_remove (struct gdbarch *gdbarch, CORE_ADDR addr)
4852{
8de9bdc4 4853 gdb_assert (gdbarch != NULL);
956ac328 4854 gdb_assert (gdbarch->addr_bits_remove != NULL);
875e1767
AC		 4855 if (gdbarch_debug >= 2)
4856 fprintf_unfiltered (gdb_stdlog, "gdbarch_addr_bits_remove called\n");
4857 return gdbarch->addr_bits_remove (addr);
4858}
4859
4860void
4861set_gdbarch_addr_bits_remove (struct gdbarch *gdbarch,
4862 gdbarch_addr_bits_remove_ftype addr_bits_remove)
4863{
4864 gdbarch->addr_bits_remove = addr_bits_remove;
4865}
4866
181c1381
RE		 4867CORE_ADDR
4868gdbarch_smash_text_address (struct gdbarch *gdbarch, CORE_ADDR addr)
4869{
8de9bdc4 4870 gdb_assert (gdbarch != NULL);
956ac328 4871 gdb_assert (gdbarch->smash_text_address != NULL);
181c1381
RE		 4872 if (gdbarch_debug >= 2)
4873 fprintf_unfiltered (gdb_stdlog, "gdbarch_smash_text_address called\n");
4874 return gdbarch->smash_text_address (addr);
4875}
4876
4877void
4878set_gdbarch_smash_text_address (struct gdbarch *gdbarch,
4879 gdbarch_smash_text_address_ftype smash_text_address)
4880{
4881 gdbarch->smash_text_address = smash_text_address;
4882}
4883
64c4637f
AC		 4884int
4885gdbarch_software_single_step_p (struct gdbarch *gdbarch)
4886{
8de9bdc4 4887 gdb_assert (gdbarch != NULL);
956ac328 4888 return gdbarch->software_single_step != NULL;
64c4637f
AC		 4889}
4890
4891void
4892gdbarch_software_single_step (struct gdbarch *gdbarch, enum target_signal sig, int insert_breakpoints_p)
4893{
8de9bdc4 4894 gdb_assert (gdbarch != NULL);
956ac328 4895 gdb_assert (gdbarch->software_single_step != NULL);
64c4637f
AC		 4896 if (gdbarch_debug >= 2)
4897 fprintf_unfiltered (gdb_stdlog, "gdbarch_software_single_step called\n");
4898 gdbarch->software_single_step (sig, insert_breakpoints_p);
4899}
4900
4901void
4902set_gdbarch_software_single_step (struct gdbarch *gdbarch,
4903 gdbarch_software_single_step_ftype software_single_step)
4904{
4905 gdbarch->software_single_step = software_single_step;
4906}
4907
2bf0cb65 4908int
a89aa300 4909gdbarch_print_insn (struct gdbarch *gdbarch, bfd_vma vma, struct disassemble_info *info)
2bf0cb65 4910{
8de9bdc4 4911 gdb_assert (gdbarch != NULL);
956ac328 4912 gdb_assert (gdbarch->print_insn != NULL);
2bf0cb65
EZ		 4913 if (gdbarch_debug >= 2)
4914 fprintf_unfiltered (gdb_stdlog, "gdbarch_print_insn called\n");
4915 return gdbarch->print_insn (vma, info);
4916}
4917
4918void
4919set_gdbarch_print_insn (struct gdbarch *gdbarch,
4920 gdbarch_print_insn_ftype print_insn)
4921{
4922 gdbarch->print_insn = print_insn;
4923}
4924
bdcd319a
CV		 4925CORE_ADDR
4926gdbarch_skip_trampoline_code (struct gdbarch *gdbarch, CORE_ADDR pc)
4927{
8de9bdc4 4928 gdb_assert (gdbarch != NULL);
956ac328 4929 gdb_assert (gdbarch->skip_trampoline_code != NULL);
bdcd319a
CV		 4930 if (gdbarch_debug >= 2)
4931 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_trampoline_code called\n");
4932 return gdbarch->skip_trampoline_code (pc);
4933}
4934
4935void
4936set_gdbarch_skip_trampoline_code (struct gdbarch *gdbarch,
4937 gdbarch_skip_trampoline_code_ftype skip_trampoline_code)
4938{
4939 gdbarch->skip_trampoline_code = skip_trampoline_code;
4940}
4941
dea0c52f
MK		 4942CORE_ADDR
4943gdbarch_skip_solib_resolver (struct gdbarch *gdbarch, CORE_ADDR pc)
4944{
4945 gdb_assert (gdbarch != NULL);
4946 gdb_assert (gdbarch->skip_solib_resolver != NULL);
4947 if (gdbarch_debug >= 2)
4948 fprintf_unfiltered (gdb_stdlog, "gdbarch_skip_solib_resolver called\n");
4c8c40e6 4949 return gdbarch->skip_solib_resolver (gdbarch, pc);
dea0c52f
MK		 4950}
4951
4952void
4953set_gdbarch_skip_solib_resolver (struct gdbarch *gdbarch,
4954 gdbarch_skip_solib_resolver_ftype skip_solib_resolver)
4955{
4956 gdbarch->skip_solib_resolver = skip_solib_resolver;
4957}
4958
68e9cc94
CV		 4959int
4960gdbarch_in_solib_call_trampoline (struct gdbarch *gdbarch, CORE_ADDR pc, char *name)
4961{
8de9bdc4 4962 gdb_assert (gdbarch != NULL);
956ac328 4963 gdb_assert (gdbarch->in_solib_call_trampoline != NULL);
68e9cc94
CV		 4964 if (gdbarch_debug >= 2)
4965 fprintf_unfiltered (gdb_stdlog, "gdbarch_in_solib_call_trampoline called\n");
4966 return gdbarch->in_solib_call_trampoline (pc, name);
4967}
4968
4969void
4970set_gdbarch_in_solib_call_trampoline (struct gdbarch *gdbarch,
4971 gdbarch_in_solib_call_trampoline_ftype in_solib_call_trampoline)
4972{
4973 gdbarch->in_solib_call_trampoline = in_solib_call_trampoline;
4974}
4975
d50355b6
MS		 4976int
4977gdbarch_in_solib_return_trampoline (struct gdbarch *gdbarch, CORE_ADDR pc, char *name)
4978{
4979 gdb_assert (gdbarch != NULL);
956ac328 4980 gdb_assert (gdbarch->in_solib_return_trampoline != NULL);
d50355b6
MS		 4981 if (gdbarch_debug >= 2)
4982 fprintf_unfiltered (gdb_stdlog, "gdbarch_in_solib_return_trampoline called\n");
4983 return gdbarch->in_solib_return_trampoline (pc, name);
4984}
4985
4986void
4987set_gdbarch_in_solib_return_trampoline (struct gdbarch *gdbarch,
4988 gdbarch_in_solib_return_trampoline_ftype in_solib_return_trampoline)
4989{
4990 gdbarch->in_solib_return_trampoline = in_solib_return_trampoline;
4991}
4992
d7bd68ca 4993int
f561f026
AC		 4994gdbarch_deprecated_pc_in_sigtramp_p (struct gdbarch *gdbarch)
4995{
4996 gdb_assert (gdbarch != NULL);
4997 return gdbarch->deprecated_pc_in_sigtramp != legacy_pc_in_sigtramp;
4998}
4999
5000int
5001gdbarch_deprecated_pc_in_sigtramp (struct gdbarch *gdbarch, CORE_ADDR pc, char *name)
d7bd68ca 5002{
8de9bdc4 5003 gdb_assert (gdbarch != NULL);
f561f026
AC		 5004 gdb_assert (gdbarch->deprecated_pc_in_sigtramp != NULL);
5005 /* Do not check predicate: gdbarch->deprecated_pc_in_sigtramp != legacy_pc_in_sigtramp, allow call. */
d7bd68ca 5006 if (gdbarch_debug >= 2)
f561f026
AC		 5007 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_pc_in_sigtramp called\n");
5008 return gdbarch->deprecated_pc_in_sigtramp (pc, name);
d7bd68ca
AC		 5009}
5010
5011void
f561f026
AC		 5012set_gdbarch_deprecated_pc_in_sigtramp (struct gdbarch *gdbarch,
5013 gdbarch_deprecated_pc_in_sigtramp_ftype deprecated_pc_in_sigtramp)
d7bd68ca 5014{
f561f026 5015 gdbarch->deprecated_pc_in_sigtramp = deprecated_pc_in_sigtramp;
d7bd68ca
AC		 5016}
5017
43156d82 5018int
aa2a3f87 5019gdbarch_deprecated_sigtramp_start_p (struct gdbarch *gdbarch)
43156d82
MK		 5020{
5021 gdb_assert (gdbarch != NULL);
aa2a3f87 5022 return gdbarch->deprecated_sigtramp_start != NULL;
43156d82
MK		 5023}
5024
5025CORE_ADDR
aa2a3f87 5026gdbarch_deprecated_sigtramp_start (struct gdbarch *gdbarch, CORE_ADDR pc)
43156d82
MK		 5027{
5028 gdb_assert (gdbarch != NULL);
aa2a3f87 5029 gdb_assert (gdbarch->deprecated_sigtramp_start != NULL);
43156d82 5030 if (gdbarch_debug >= 2)
aa2a3f87
AC		 5031 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_sigtramp_start called\n");
5032 return gdbarch->deprecated_sigtramp_start (pc);
43156d82
MK		 5033}
5034
5035void
aa2a3f87
AC		 5036set_gdbarch_deprecated_sigtramp_start (struct gdbarch *gdbarch,
5037 gdbarch_deprecated_sigtramp_start_ftype deprecated_sigtramp_start)
43156d82 5038{
aa2a3f87 5039 gdbarch->deprecated_sigtramp_start = deprecated_sigtramp_start;
43156d82
MK		 5040}
5041
e76cff22 5042int
aa2a3f87 5043gdbarch_deprecated_sigtramp_end_p (struct gdbarch *gdbarch)
e76cff22
AC		 5044{
5045 gdb_assert (gdbarch != NULL);
aa2a3f87 5046 return gdbarch->deprecated_sigtramp_end != NULL;
e76cff22
AC		 5047}
5048
43156d82 5049CORE_ADDR
aa2a3f87 5050gdbarch_deprecated_sigtramp_end (struct gdbarch *gdbarch, CORE_ADDR pc)
43156d82
MK		 5051{
5052 gdb_assert (gdbarch != NULL);
aa2a3f87 5053 gdb_assert (gdbarch->deprecated_sigtramp_end != NULL);
43156d82 5054 if (gdbarch_debug >= 2)
aa2a3f87
AC		 5055 fprintf_unfiltered (gdb_stdlog, "gdbarch_deprecated_sigtramp_end called\n");
5056 return gdbarch->deprecated_sigtramp_end (pc);
43156d82
MK		 5057}
5058
5059void
aa2a3f87
AC		 5060set_gdbarch_deprecated_sigtramp_end (struct gdbarch *gdbarch,
5061 gdbarch_deprecated_sigtramp_end_ftype deprecated_sigtramp_end)
43156d82 5062{
aa2a3f87 5063 gdbarch->deprecated_sigtramp_end = deprecated_sigtramp_end;
43156d82
MK		 5064}
5065
c12260ac
CV		 5066int
5067gdbarch_in_function_epilogue_p (struct gdbarch *gdbarch, CORE_ADDR addr)
5068{
8de9bdc4 5069 gdb_assert (gdbarch != NULL);
956ac328 5070 gdb_assert (gdbarch->in_function_epilogue_p != NULL);
c12260ac
CV		 5071 if (gdbarch_debug >= 2)
5072 fprintf_unfiltered (gdb_stdlog, "gdbarch_in_function_epilogue_p called\n");
5073 return gdbarch->in_function_epilogue_p (gdbarch, addr);
5074}
5075
5076void
5077set_gdbarch_in_function_epilogue_p (struct gdbarch *gdbarch,
5078 gdbarch_in_function_epilogue_p_ftype in_function_epilogue_p)
5079{
5080 gdbarch->in_function_epilogue_p = in_function_epilogue_p;
5081}
5082
552c04a7
TT		 5083char *
5084gdbarch_construct_inferior_arguments (struct gdbarch *gdbarch, int argc, char **argv)
5085{
8de9bdc4 5086 gdb_assert (gdbarch != NULL);
956ac328 5087 gdb_assert (gdbarch->construct_inferior_arguments != NULL);
552c04a7
TT		 5088 if (gdbarch_debug >= 2)
5089 fprintf_unfiltered (gdb_stdlog, "gdbarch_construct_inferior_arguments called\n");
5090 return gdbarch->construct_inferior_arguments (gdbarch, argc, argv);
5091}
5092
5093void
5094set_gdbarch_construct_inferior_arguments (struct gdbarch *gdbarch,
5095 gdbarch_construct_inferior_arguments_ftype construct_inferior_arguments)
5096{
5097 gdbarch->construct_inferior_arguments = construct_inferior_arguments;
5098}
5099
a2cf933a
EZ		 5100void
5101gdbarch_elf_make_msymbol_special (struct gdbarch *gdbarch, asymbol *sym, struct minimal_symbol *msym)
5102{
8de9bdc4 5103 gdb_assert (gdbarch != NULL);
956ac328 5104 gdb_assert (gdbarch->elf_make_msymbol_special != NULL);
a2cf933a
EZ		 5105 if (gdbarch_debug >= 2)
5106 fprintf_unfiltered (gdb_stdlog, "gdbarch_elf_make_msymbol_special called\n");
5107 gdbarch->elf_make_msymbol_special (sym, msym);
5108}
5109
5110void
5111set_gdbarch_elf_make_msymbol_special (struct gdbarch *gdbarch,
5112 gdbarch_elf_make_msymbol_special_ftype elf_make_msymbol_special)
5113{
5114 gdbarch->elf_make_msymbol_special = elf_make_msymbol_special;
5115}
5116
5117void
5118gdbarch_coff_make_msymbol_special (struct gdbarch *gdbarch, int val, struct minimal_symbol *msym)
5119{
8de9bdc4 5120 gdb_assert (gdbarch != NULL);
956ac328 5121 gdb_assert (gdbarch->coff_make_msymbol_special != NULL);
a2cf933a
EZ		 5122 if (gdbarch_debug >= 2)
5123 fprintf_unfiltered (gdb_stdlog, "gdbarch_coff_make_msymbol_special called\n");
5124 gdbarch->coff_make_msymbol_special (val, msym);
5125}
5126
5127void
5128set_gdbarch_coff_make_msymbol_special (struct gdbarch *gdbarch,
5129 gdbarch_coff_make_msymbol_special_ftype coff_make_msymbol_special)
5130{
5131 gdbarch->coff_make_msymbol_special = coff_make_msymbol_special;
5132}
5133
5720643c
JB		 5134const char *
5135gdbarch_name_of_malloc (struct gdbarch *gdbarch)
5136{
5137 gdb_assert (gdbarch != NULL);
5138 /* Skip verify of name_of_malloc, invalid_p == 0 */
5139 if (gdbarch_debug >= 2)
5140 fprintf_unfiltered (gdb_stdlog, "gdbarch_name_of_malloc called\n");
5141 return gdbarch->name_of_malloc;
5142}
5143
5144void
5145set_gdbarch_name_of_malloc (struct gdbarch *gdbarch,
5146 const char * name_of_malloc)
5147{
5148 gdbarch->name_of_malloc = name_of_malloc;
5149}
5150
c4ed33b9
AC		 5151int
5152gdbarch_cannot_step_breakpoint (struct gdbarch *gdbarch)
5153{
5154 gdb_assert (gdbarch != NULL);
5155 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
5156 if (gdbarch_debug >= 2)
5157 fprintf_unfiltered (gdb_stdlog, "gdbarch_cannot_step_breakpoint called\n");
5158 return gdbarch->cannot_step_breakpoint;
5159}
5160
5161void
5162set_gdbarch_cannot_step_breakpoint (struct gdbarch *gdbarch,
5163 int cannot_step_breakpoint)
5164{
5165 gdbarch->cannot_step_breakpoint = cannot_step_breakpoint;
5166}
5167
f74fa174
MM		 5168int
5169gdbarch_have_nonsteppable_watchpoint (struct gdbarch *gdbarch)
5170{
5171 gdb_assert (gdbarch != NULL);
5172 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
5173 if (gdbarch_debug >= 2)
5174 fprintf_unfiltered (gdb_stdlog, "gdbarch_have_nonsteppable_watchpoint called\n");
5175 return gdbarch->have_nonsteppable_watchpoint;
5176}
5177
5178void
5179set_gdbarch_have_nonsteppable_watchpoint (struct gdbarch *gdbarch,
967c0d83 5180 int have_nonsteppable_watchpoint)
f74fa174
MM		 5181{
5182 gdbarch->have_nonsteppable_watchpoint = have_nonsteppable_watchpoint;
5183}
5184
8b2dbe47
KB		 5185int
5186gdbarch_address_class_type_flags_p (struct gdbarch *gdbarch)
5187{
5188 gdb_assert (gdbarch != NULL);
956ac328 5189 return gdbarch->address_class_type_flags != NULL;
8b2dbe47
KB		 5190}
5191
5192int
5193gdbarch_address_class_type_flags (struct gdbarch *gdbarch, int byte_size, int dwarf2_addr_class)
5194{
5195 gdb_assert (gdbarch != NULL);
956ac328 5196 gdb_assert (gdbarch->address_class_type_flags != NULL);
8b2dbe47
KB		 5197 if (gdbarch_debug >= 2)
5198 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_class_type_flags called\n");
5199 return gdbarch->address_class_type_flags (byte_size, dwarf2_addr_class);
5200}
5201
5202void
5203set_gdbarch_address_class_type_flags (struct gdbarch *gdbarch,
5204 gdbarch_address_class_type_flags_ftype address_class_type_flags)
5205{
5206 gdbarch->address_class_type_flags = address_class_type_flags;
5207}
5208
5209int
5210gdbarch_address_class_type_flags_to_name_p (struct gdbarch *gdbarch)
5211{
5212 gdb_assert (gdbarch != NULL);
956ac328 5213 return gdbarch->address_class_type_flags_to_name != NULL;
8b2dbe47
KB		 5214}
5215
321432c0 5216const char *
8b2dbe47
KB		 5217gdbarch_address_class_type_flags_to_name (struct gdbarch *gdbarch, int type_flags)
5218{
5219 gdb_assert (gdbarch != NULL);
956ac328 5220 gdb_assert (gdbarch->address_class_type_flags_to_name != NULL);
8b2dbe47
KB		 5221 if (gdbarch_debug >= 2)
5222 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_class_type_flags_to_name called\n");
5f11f355 5223 return gdbarch->address_class_type_flags_to_name (gdbarch, type_flags);
8b2dbe47
KB		 5224}
5225
5226void
5227set_gdbarch_address_class_type_flags_to_name (struct gdbarch *gdbarch,
5228 gdbarch_address_class_type_flags_to_name_ftype address_class_type_flags_to_name)
5229{
5230 gdbarch->address_class_type_flags_to_name = address_class_type_flags_to_name;
5231}
5232
5233int
5234gdbarch_address_class_name_to_type_flags_p (struct gdbarch *gdbarch)
5235{
5236 gdb_assert (gdbarch != NULL);
956ac328 5237 return gdbarch->address_class_name_to_type_flags != NULL;
8b2dbe47
KB		 5238}
5239
5240int
321432c0 5241gdbarch_address_class_name_to_type_flags (struct gdbarch *gdbarch, const char *name, int *type_flags_ptr)
8b2dbe47
KB		 5242{
5243 gdb_assert (gdbarch != NULL);
956ac328 5244 gdb_assert (gdbarch->address_class_name_to_type_flags != NULL);
8b2dbe47
KB		 5245 if (gdbarch_debug >= 2)
5246 fprintf_unfiltered (gdb_stdlog, "gdbarch_address_class_name_to_type_flags called\n");
5f11f355 5247 return gdbarch->address_class_name_to_type_flags (gdbarch, name, type_flags_ptr);
8b2dbe47
KB		 5248}
5249
5250void
5251set_gdbarch_address_class_name_to_type_flags (struct gdbarch *gdbarch,
5252 gdbarch_address_class_name_to_type_flags_ftype address_class_name_to_type_flags)
5253{
5254 gdbarch->address_class_name_to_type_flags = address_class_name_to_type_flags;
5255}
5256
b59ff9d5
AC		 5257int
5258gdbarch_register_reggroup_p (struct gdbarch *gdbarch, int regnum, struct reggroup *reggroup)
5259{
5260 gdb_assert (gdbarch != NULL);
956ac328 5261 gdb_assert (gdbarch->register_reggroup_p != NULL);
b59ff9d5
AC		 5262 if (gdbarch_debug >= 2)
5263 fprintf_unfiltered (gdb_stdlog, "gdbarch_register_reggroup_p called\n");
5264 return gdbarch->register_reggroup_p (gdbarch, regnum, reggroup);
5265}
5266
5267void
5268set_gdbarch_register_reggroup_p (struct gdbarch *gdbarch,
5269 gdbarch_register_reggroup_p_ftype register_reggroup_p)
5270{
5271 gdbarch->register_reggroup_p = register_reggroup_p;
5272}
5273
143985b7
AF		 5274int
5275gdbarch_fetch_pointer_argument_p (struct gdbarch *gdbarch)
5276{
5277 gdb_assert (gdbarch != NULL);
956ac328 5278 return gdbarch->fetch_pointer_argument != NULL;
143985b7
AF		 5279}
5280
5281CORE_ADDR
5282gdbarch_fetch_pointer_argument (struct gdbarch *gdbarch, struct frame_info *frame, int argi, struct type *type)
5283{
5284 gdb_assert (gdbarch != NULL);
956ac328 5285 gdb_assert (gdbarch->fetch_pointer_argument != NULL);
143985b7
AF		 5286 if (gdbarch_debug >= 2)
5287 fprintf_unfiltered (gdb_stdlog, "gdbarch_fetch_pointer_argument called\n");
5288 return gdbarch->fetch_pointer_argument (frame, argi, type);
5289}
5290
5291void
5292set_gdbarch_fetch_pointer_argument (struct gdbarch *gdbarch,
5293 gdbarch_fetch_pointer_argument_ftype fetch_pointer_argument)
5294{
5295 gdbarch->fetch_pointer_argument = fetch_pointer_argument;
5296}
5297
6ce6d90f
MK		 5298int
5299gdbarch_regset_from_core_section_p (struct gdbarch *gdbarch)
5300{
5301 gdb_assert (gdbarch != NULL);
5302 return gdbarch->regset_from_core_section != NULL;
5303}
5304
5305const struct regset *
5306gdbarch_regset_from_core_section (struct gdbarch *gdbarch, const char *sect_name, size_t sect_size)
5307{
5308 gdb_assert (gdbarch != NULL);
5309 gdb_assert (gdbarch->regset_from_core_section != NULL);
5310 if (gdbarch_debug >= 2)
5311 fprintf_unfiltered (gdb_stdlog, "gdbarch_regset_from_core_section called\n");
5312 return gdbarch->regset_from_core_section (gdbarch, sect_name, sect_size);
5313}
5314
5315void
5316set_gdbarch_regset_from_core_section (struct gdbarch *gdbarch,
5317 gdbarch_regset_from_core_section_ftype regset_from_core_section)
5318{
5319 gdbarch->regset_from_core_section = regset_from_core_section;
5320}
5321
0f71a2f6 5322
be5a57e1 5323/* Keep a registry of per-architecture data-pointers required by GDB
0f71a2f6
JM		 5324 modules. */
5325
5326struct gdbarch_data
5327{
95160752 5328 unsigned index;
76860b5f 5329 int init_p;
030f20e1
AC		 5330 gdbarch_data_pre_init_ftype *pre_init;
5331 gdbarch_data_post_init_ftype *post_init;
0f71a2f6
JM		 5332};
5333
5334struct gdbarch_data_registration
adf40b2e 5335{
adf40b2e
JM		 5336 struct gdbarch_data *data;
5337 struct gdbarch_data_registration *next;
5338};
0f71a2f6 5339
be5a57e1 5340struct gdbarch_data_registry
adf40b2e 5341{
95160752 5342 unsigned nr;
adf40b2e
JM		 5343 struct gdbarch_data_registration *registrations;
5344};
0f71a2f6 5345
be5a57e1 5346struct gdbarch_data_registry gdbarch_data_registry =
0f71a2f6
JM		 5347{
5348 0, NULL,
5349};
5350
030f20e1
AC		 5351static struct gdbarch_data *
5352gdbarch_data_register (gdbarch_data_pre_init_ftype *pre_init,
5353 gdbarch_data_post_init_ftype *post_init)
0f71a2f6
JM		 5354{
5355 struct gdbarch_data_registration **curr;
76860b5f 5356 /* Append the new registraration. */
be5a57e1 5357 for (curr = &gdbarch_data_registry.registrations;
0f71a2f6
JM		 5358 (*curr) != NULL;
5359 curr = &(*curr)->next);
5360 (*curr) = XMALLOC (struct gdbarch_data_registration);
5361 (*curr)->next = NULL;
0f71a2f6 5362 (*curr)->data = XMALLOC (struct gdbarch_data);
be5a57e1 5363 (*curr)->data->index = gdbarch_data_registry.nr++;
030f20e1
AC		 5364 (*curr)->data->pre_init = pre_init;
5365 (*curr)->data->post_init = post_init;
76860b5f 5366 (*curr)->data->init_p = 1;
0f71a2f6
JM		 5367 return (*curr)->data;
5368}
5369
030f20e1
AC		 5370struct gdbarch_data *
5371gdbarch_data_register_pre_init (gdbarch_data_pre_init_ftype *pre_init)
5372{
5373 return gdbarch_data_register (pre_init, NULL);
5374}
5375
5376struct gdbarch_data *
5377gdbarch_data_register_post_init (gdbarch_data_post_init_ftype *post_init)
5378{
5379 return gdbarch_data_register (NULL, post_init);
5380}
0f71a2f6 5381
b3cc3077 5382/* Create/delete the gdbarch data vector. */
95160752
AC		 5383
5384static void
b3cc3077 5385alloc_gdbarch_data (struct gdbarch *gdbarch)
95160752 5386{
b3cc3077
JB		 5387 gdb_assert (gdbarch->data == NULL);
5388 gdbarch->nr_data = gdbarch_data_registry.nr;
aebd7893 5389 gdbarch->data = GDBARCH_OBSTACK_CALLOC (gdbarch, gdbarch->nr_data, void *);
0f71a2f6
JM		 5390}
5391
76860b5f 5392/* Initialize the current value of the specified per-architecture
b3cc3077
JB		 5393 data-pointer. */
5394
95160752 5395void
030f20e1
AC		 5396deprecated_set_gdbarch_data (struct gdbarch *gdbarch,
5397 struct gdbarch_data *data,
5398 void *pointer)
95160752
AC		 5399{
5400 gdb_assert (data->index < gdbarch->nr_data);
aebd7893 5401 gdb_assert (gdbarch->data[data->index] == NULL);
030f20e1 5402 gdb_assert (data->pre_init == NULL);
95160752
AC		 5403 gdbarch->data[data->index] = pointer;
5404}
5405
0f71a2f6
JM		 5406/* Return the current value of the specified per-architecture
5407 data-pointer. */
5408
5409void *
451fbdda 5410gdbarch_data (struct gdbarch *gdbarch, struct gdbarch_data *data)
0f71a2f6 5411{
451fbdda 5412 gdb_assert (data->index < gdbarch->nr_data);
030f20e1 5413 if (gdbarch->data[data->index] == NULL)
76860b5f 5414 {
030f20e1
AC		 5415 /* The data-pointer isn't initialized, call init() to get a
5416 value. */
5417 if (data->pre_init != NULL)
5418 /* Mid architecture creation: pass just the obstack, and not
5419 the entire architecture, as that way it isn't possible for
5420 pre-init code to refer to undefined architecture
5421 fields. */
5422 gdbarch->data[data->index] = data->pre_init (gdbarch->obstack);
5423 else if (gdbarch->initialized_p
5424 && data->post_init != NULL)
5425 /* Post architecture creation: pass the entire architecture
5426 (as all fields are valid), but be careful to also detect
5427 recursive references. */
5428 {
5429 gdb_assert (data->init_p);
5430 data->init_p = 0;
5431 gdbarch->data[data->index] = data->post_init (gdbarch);
5432 data->init_p = 1;
5433 }
5434 else
5435 /* The architecture initialization hasn't completed - punt -
5436 hope that the caller knows what they are doing. Once
5437 deprecated_set_gdbarch_data has been initialized, this can be
5438 changed to an internal error. */
5439 return NULL;
76860b5f
AC		 5440 gdb_assert (gdbarch->data[data->index] != NULL);
5441 }
451fbdda 5442 return gdbarch->data[data->index];
0f71a2f6
JM		 5443}
5444
5445
5446
be5a57e1 5447/* Keep a registry of swapped data required by GDB modules. */
0f71a2f6
JM		 5448
5449struct gdbarch_swap
5450{
5451 void *swap;
5452 struct gdbarch_swap_registration *source;
5453 struct gdbarch_swap *next;
5454};
5455
5456struct gdbarch_swap_registration
adf40b2e
JM		 5457{
5458 void *data;
5459 unsigned long sizeof_data;
5460 gdbarch_swap_ftype *init;
5461 struct gdbarch_swap_registration *next;
5462};
0f71a2f6 5463
be5a57e1 5464struct gdbarch_swap_registry
adf40b2e
JM		 5465{
5466 int nr;
5467 struct gdbarch_swap_registration *registrations;
5468};
0f71a2f6 5469
be5a57e1 5470struct gdbarch_swap_registry gdbarch_swap_registry =
0f71a2f6
JM		 5471{
5472 0, NULL,
5473};
5474
5475void
046a4708
AC		 5476deprecated_register_gdbarch_swap (void *data,
5477 unsigned long sizeof_data,
5478 gdbarch_swap_ftype *init)
0f71a2f6
JM		 5479{
5480 struct gdbarch_swap_registration **rego;
be5a57e1 5481 for (rego = &gdbarch_swap_registry.registrations;
0f71a2f6
JM		 5482 (*rego) != NULL;
5483 rego = &(*rego)->next);
5484 (*rego) = XMALLOC (struct gdbarch_swap_registration);
5485 (*rego)->next = NULL;
5486 (*rego)->init = init;
5487 (*rego)->data = data;
5488 (*rego)->sizeof_data = sizeof_data;
5489}
5490
40af4b0c 5491static void
7de2341d 5492current_gdbarch_swap_init_hack (void)
0f71a2f6
JM		 5493{
5494 struct gdbarch_swap_registration *rego;
7de2341d 5495 struct gdbarch_swap **curr = &current_gdbarch->swap;
be5a57e1 5496 for (rego = gdbarch_swap_registry.registrations;
0f71a2f6
JM		 5497 rego != NULL;
5498 rego = rego->next)
5499 {
5500 if (rego->data != NULL)
5501 {
7de2341d
AC		 5502 (*curr) = GDBARCH_OBSTACK_ZALLOC (current_gdbarch,
5503 struct gdbarch_swap);
0f71a2f6 5504 (*curr)->source = rego;
7de2341d
AC		 5505 (*curr)->swap = gdbarch_obstack_zalloc (current_gdbarch,
5506 rego->sizeof_data);
0f71a2f6 5507 (*curr)->next = NULL;
0f71a2f6
JM		 5508 curr = &(*curr)->next;
5509 }
5510 if (rego->init != NULL)
5511 rego->init ();
5512 }
5513}
5514
7de2341d
AC		 5515static struct gdbarch *
5516current_gdbarch_swap_out_hack (void)
0f71a2f6 5517{
7de2341d 5518 struct gdbarch *old_gdbarch = current_gdbarch;
0f71a2f6 5519 struct gdbarch_swap *curr;
7de2341d
AC		 5520
5521 gdb_assert (old_gdbarch != NULL);
5522 for (curr = old_gdbarch->swap;
0f71a2f6
JM		 5523 curr != NULL;
5524 curr = curr->next)
7de2341d
AC		 5525 {
5526 memcpy (curr->swap, curr->source->data, curr->source->sizeof_data);
5527 memset (curr->source->data, 0, curr->source->sizeof_data);
5528 }
5529 current_gdbarch = NULL;
5530 return old_gdbarch;
0f71a2f6
JM		 5531}
5532
0f71a2f6 5533static void
7de2341d 5534current_gdbarch_swap_in_hack (struct gdbarch *new_gdbarch)
0f71a2f6
JM		 5535{
5536 struct gdbarch_swap *curr;
7de2341d
AC		 5537
5538 gdb_assert (current_gdbarch == NULL);
5539 for (curr = new_gdbarch->swap;
0f71a2f6
JM		 5540 curr != NULL;
5541 curr = curr->next)
5542 memcpy (curr->source->data, curr->swap, curr->source->sizeof_data);
7de2341d 5543 current_gdbarch = new_gdbarch;
0f71a2f6
JM		 5544}
5545
5546
be5a57e1 5547/* Keep a registry of the architectures known by GDB. */
0f71a2f6 5548
4b9b3959 5549struct gdbarch_registration
0f71a2f6
JM		 5550{
5551 enum bfd_architecture bfd_architecture;
5552 gdbarch_init_ftype *init;
4b9b3959 5553 gdbarch_dump_tdep_ftype *dump_tdep;
0f71a2f6 5554 struct gdbarch_list *arches;
4b9b3959 5555 struct gdbarch_registration *next;
0f71a2f6
JM		 5556};
5557
be5a57e1 5558static struct gdbarch_registration *gdbarch_registry = NULL;
0f71a2f6 5559
b4a20239
AC		 5560static void
5561append_name (const char ***buf, int *nr, const char *name)
5562{
5563 *buf = xrealloc (*buf, sizeof (char**) * (*nr + 1));
5564 (*buf)[*nr] = name;
5565 *nr += 1;
5566}
5567
5568const char **
5569gdbarch_printable_names (void)
5570{
7996bcec
AC		 5571 /* Accumulate a list of names based on the registed list of
5572 architectures. */
5573 enum bfd_architecture a;
5574 int nr_arches = 0;
5575 const char **arches = NULL;
5576 struct gdbarch_registration *rego;
5577 for (rego = gdbarch_registry;
5578 rego != NULL;
5579 rego = rego->next)
b4a20239 5580 {
7996bcec
AC		 5581 const struct bfd_arch_info *ap;
5582 ap = bfd_lookup_arch (rego->bfd_architecture, 0);
5583 if (ap == NULL)
5584 internal_error (__FILE__, __LINE__,
5585 "gdbarch_architecture_names: multi-arch unknown");
5586 do
5587 {
5588 append_name (&arches, &nr_arches, ap->printable_name);
5589 ap = ap->next;
5590 }
5591 while (ap != NULL);
b4a20239 5592 }
7996bcec
AC		 5593 append_name (&arches, &nr_arches, NULL);
5594 return arches;
b4a20239
AC		 5595}
5596
5597
0f71a2f6 5598void
4b9b3959
AC		 5599gdbarch_register (enum bfd_architecture bfd_architecture,
5600 gdbarch_init_ftype *init,
5601 gdbarch_dump_tdep_ftype *dump_tdep)
0f71a2f6 5602{
4b9b3959 5603 struct gdbarch_registration **curr;
0f71a2f6 5604 const struct bfd_arch_info *bfd_arch_info;
ec3d358c 5605 /* Check that BFD recognizes this architecture */
0f71a2f6
JM		 5606 bfd_arch_info = bfd_lookup_arch (bfd_architecture, 0);
5607 if (bfd_arch_info == NULL)
5608 {
8e65ff28
AC		 5609 internal_error (__FILE__, __LINE__,
5610 "gdbarch: Attempt to register unknown architecture (%d)",
5611 bfd_architecture);
0f71a2f6
JM		 5612 }
5613 /* Check that we haven't seen this architecture before */
be5a57e1 5614 for (curr = &gdbarch_registry;
0f71a2f6
JM		 5615 (*curr) != NULL;
5616 curr = &(*curr)->next)
5617 {
5618 if (bfd_architecture == (*curr)->bfd_architecture)
8e65ff28
AC		 5619 internal_error (__FILE__, __LINE__,
5620 "gdbarch: Duplicate registraration of architecture (%s)",
5621 bfd_arch_info->printable_name);
0f71a2f6
JM		 5622 }
5623 /* log it */
5624 if (gdbarch_debug)
5625 fprintf_unfiltered (gdb_stdlog, "register_gdbarch_init (%s, 0x%08lx)\n",
5626 bfd_arch_info->printable_name,
5627 (long) init);
5628 /* Append it */
4b9b3959 5629 (*curr) = XMALLOC (struct gdbarch_registration);
0f71a2f6
JM		 5630 (*curr)->bfd_architecture = bfd_architecture;
5631 (*curr)->init = init;
4b9b3959 5632 (*curr)->dump_tdep = dump_tdep;
0f71a2f6
JM		 5633 (*curr)->arches = NULL;
5634 (*curr)->next = NULL;
4b9b3959
AC		 5635}
5636
5637void
5638register_gdbarch_init (enum bfd_architecture bfd_architecture,
5639 gdbarch_init_ftype *init)
5640{
5641 gdbarch_register (bfd_architecture, init, NULL);
0f71a2f6 5642}
0f71a2f6
JM		 5643
5644
5645/* Look for an architecture using gdbarch_info. Base search on only
5646 BFD_ARCH_INFO and BYTE_ORDER. */
5647
5648struct gdbarch_list *
104c1213
JM		 5649gdbarch_list_lookup_by_info (struct gdbarch_list *arches,
5650 const struct gdbarch_info *info)
0f71a2f6
JM		 5651{
5652 for (; arches != NULL; arches = arches->next)
5653 {
5654 if (info->bfd_arch_info != arches->gdbarch->bfd_arch_info)
5655 continue;
5656 if (info->byte_order != arches->gdbarch->byte_order)
5657 continue;
4be87837
DJ		 5658 if (info->osabi != arches->gdbarch->osabi)
5659 continue;
0f71a2f6
JM		 5660 return arches;
5661 }
5662 return NULL;
5663}
5664
5665
ebdba546
AC		 5666/* Find an architecture that matches the specified INFO. Create a new
5667 architecture if needed. Return that new architecture. Assumes
5668 that there is no current architecture. */
0f71a2f6 5669
ebdba546
AC		 5670static struct gdbarch *
5671find_arch_by_info (struct gdbarch *old_gdbarch, struct gdbarch_info info)
0f71a2f6
JM		 5672{
5673 struct gdbarch *new_gdbarch;
4b9b3959 5674 struct gdbarch_registration *rego;
0f71a2f6 5675
ebdba546
AC		 5676 /* The existing architecture has been swapped out - all this code
5677 works from a clean slate. */
5678 gdb_assert (current_gdbarch == NULL);
5679
b732d07d 5680 /* Fill in missing parts of the INFO struct using a number of
ebdba546
AC		 5681 sources: "set ..."; INFOabfd supplied; and the existing
5682 architecture. */
5683 gdbarch_info_fill (old_gdbarch, &info);
4be87837 5684
b732d07d
AC		 5685 /* Must have found some sort of architecture. */
5686 gdb_assert (info.bfd_arch_info != NULL);
0f71a2f6
JM		 5687
5688 if (gdbarch_debug)
5689 {
0f71a2f6 5690 fprintf_unfiltered (gdb_stdlog,
ebdba546 5691 "find_arch_by_info: info.bfd_arch_info %s\n",
0f71a2f6
JM		 5692 (info.bfd_arch_info != NULL
5693 ? info.bfd_arch_info->printable_name
5694 : "(null)"));
5695 fprintf_unfiltered (gdb_stdlog,
ebdba546 5696 "find_arch_by_info: info.byte_order %d (%s)\n",
0f71a2f6 5697 info.byte_order,
d7449b42 5698 (info.byte_order == BFD_ENDIAN_BIG ? "big"
778eb05e 5699 : info.byte_order == BFD_ENDIAN_LITTLE ? "little"
0f71a2f6 5700 : "default"));
4be87837 5701 fprintf_unfiltered (gdb_stdlog,
ebdba546 5702 "find_arch_by_info: info.osabi %d (%s)\n",
4be87837 5703 info.osabi, gdbarch_osabi_name (info.osabi));
0f71a2f6 5704 fprintf_unfiltered (gdb_stdlog,
ebdba546 5705 "find_arch_by_info: info.abfd 0x%lx\n",
0f71a2f6
JM		 5706 (long) info.abfd);
5707 fprintf_unfiltered (gdb_stdlog,
ebdba546 5708 "find_arch_by_info: info.tdep_info 0x%lx\n",
0f71a2f6
JM		 5709 (long) info.tdep_info);
5710 }
5711
ebdba546 5712 /* Find the tdep code that knows about this architecture. */
b732d07d
AC		 5713 for (rego = gdbarch_registry;
5714 rego != NULL;
5715 rego = rego->next)
5716 if (rego->bfd_architecture == info.bfd_arch_info->arch)
5717 break;
5718 if (rego == NULL)
5719 {
5720 if (gdbarch_debug)
ebdba546
AC		 5721 fprintf_unfiltered (gdb_stdlog, "find_arch_by_info: "
5722 "No matching architecture\n");
b732d07d
AC		 5723 return 0;
5724 }
5725
ebdba546 5726 /* Ask the tdep code for an architecture that matches "info". */
0f71a2f6
JM		 5727 new_gdbarch = rego->init (info, rego->arches);
5728
ebdba546
AC		 5729 /* Did the tdep code like it? No. Reject the change and revert to
5730 the old architecture. */
0f71a2f6
JM		 5731 if (new_gdbarch == NULL)
5732 {
5733 if (gdbarch_debug)
ebdba546
AC		 5734 fprintf_unfiltered (gdb_stdlog, "find_arch_by_info: "
5735 "Target rejected architecture\n");
5736 return NULL;
0f71a2f6
JM		 5737 }
5738
ebdba546
AC		 5739 /* Is this a pre-existing architecture (as determined by already
5740 being initialized)? Move it to the front of the architecture
5741 list (keeping the list sorted Most Recently Used). */
5742 if (new_gdbarch->initialized_p)
0f71a2f6 5743 {
ebdba546
AC		 5744 struct gdbarch_list **list;
5745 struct gdbarch_list *this;
0f71a2f6 5746 if (gdbarch_debug)
ebdba546
AC		 5747 fprintf_unfiltered (gdb_stdlog, "find_arch_by_info: "
5748 "Previous architecture 0x%08lx (%s) selected\n",
0f71a2f6
JM		 5749 (long) new_gdbarch,
5750 new_gdbarch->bfd_arch_info->printable_name);
ebdba546
AC		 5751 /* Find the existing arch in the list. */
5752 for (list = &rego->arches;
5753 (*list) != NULL && (*list)->gdbarch != new_gdbarch;
5754 list = &(*list)->next);
5755 /* It had better be in the list of architectures. */
5756 gdb_assert ((*list) != NULL && (*list)->gdbarch == new_gdbarch);
5757 /* Unlink THIS. */
5758 this = (*list);
5759 (*list) = this->next;
5760 /* Insert THIS at the front. */
5761 this->next = rego->arches;
5762 rego->arches = this;
5763 /* Return it. */
5764 return new_gdbarch;
0f71a2f6
JM		 5765 }
5766
ebdba546
AC		 5767 /* It's a new architecture. */
5768 if (gdbarch_debug)
5769 fprintf_unfiltered (gdb_stdlog, "find_arch_by_info: "
5770 "New architecture 0x%08lx (%s) selected\n",
5771 (long) new_gdbarch,
5772 new_gdbarch->bfd_arch_info->printable_name);
5773
5774 /* Insert the new architecture into the front of the architecture
5775 list (keep the list sorted Most Recently Used). */
0f79675b
AC		 5776 {
5777 struct gdbarch_list *this = XMALLOC (struct gdbarch_list);
5778 this->next = rego->arches;
5779 this->gdbarch = new_gdbarch;
5780 rego->arches = this;
5781 }
0f71a2f6 5782
4b9b3959
AC		 5783 /* Check that the newly installed architecture is valid. Plug in
5784 any post init values. */
5785 new_gdbarch->dump_tdep = rego->dump_tdep;
0f71a2f6 5786 verify_gdbarch (new_gdbarch);
ebdba546 5787 new_gdbarch->initialized_p = 1;
0f71a2f6 5788
ebdba546
AC		 5789 /* Initialize any per-architecture swap areas. This phase requires
5790 a valid global CURRENT_GDBARCH. Set it momentarially, and then
5791 swap the entire architecture out. */
5792 current_gdbarch = new_gdbarch;
7de2341d 5793 current_gdbarch_swap_init_hack ();
ebdba546 5794 current_gdbarch_swap_out_hack ();
67c2c32c 5795
4b9b3959 5796 if (gdbarch_debug)
ebdba546 5797 gdbarch_dump (new_gdbarch, gdb_stdlog);
4b9b3959 5798
ebdba546 5799 return new_gdbarch;
0f71a2f6 5800}
c906108c 5801
ebdba546
AC		 5802struct gdbarch *
5803gdbarch_find_by_info (struct gdbarch_info info)
5804{
5805 /* Save the previously selected architecture, setting the global to
5806 NULL. This stops things like gdbarch->init() trying to use the
5807 previous architecture's configuration. The previous architecture
5808 may not even be of the same architecture family. The most recent
5809 architecture of the same family is found at the head of the
5810 rego->arches list. */
5811 struct gdbarch *old_gdbarch = current_gdbarch_swap_out_hack ();
5812
5813 /* Find the specified architecture. */
5814 struct gdbarch *new_gdbarch = find_arch_by_info (old_gdbarch, info);
5815
5816 /* Restore the existing architecture. */
5817 gdb_assert (current_gdbarch == NULL);
5818 current_gdbarch_swap_in_hack (old_gdbarch);
5819
5820 return new_gdbarch;
5821}
5822
5823/* Make the specified architecture current, swapping the existing one
5824 out. */
5825
5826void
5827deprecated_current_gdbarch_select_hack (struct gdbarch *new_gdbarch)
5828{
5829 gdb_assert (new_gdbarch != NULL);
5830 gdb_assert (current_gdbarch != NULL);
5831 gdb_assert (new_gdbarch->initialized_p);
5832 current_gdbarch_swap_out_hack ();
5833 current_gdbarch_swap_in_hack (new_gdbarch);
5834 architecture_changed_event ();
5835}
c906108c 5836
104c1213 5837extern void _initialize_gdbarch (void);
b4a20239 5838
c906108c 5839void
7c7651b2 5840_initialize_gdbarch (void)
c906108c 5841{
5d161b24
DB		 5842 struct cmd_list_element *c;
5843
5d161b24 5844 add_show_from_set (add_set_cmd ("arch",
c906108c
SS		 5845 class_maintenance,
5846 var_zinteger,
adf40b2e 5847 (char *)&gdbarch_debug,
c906108c 5848 "Set architecture debugging.\n\
5d161b24
DB		 5849When non-zero, architecture debugging is enabled.", &setdebuglist),
5850 &showdebuglist);
59233f88
AC		 5851 c = add_set_cmd ("archdebug",
5852 class_maintenance,
5853 var_zinteger,
5854 (char *)&gdbarch_debug,
5855 "Set architecture debugging.\n\
5d161b24
DB		 5856When non-zero, architecture debugging is enabled.", &setlist);
5857
59233f88
AC		 5858 deprecate_cmd (c, "set debug arch");
5859 deprecate_cmd (add_show_from_set (c, &showlist), "show debug arch");
c906108c 5860}
GDB Binutils - Deliverables
This page took 0.79301 seconds and 4 git commands to generate.