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