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