1 /* *INDENT-OFF* */ /* THIS FILE IS GENERATED */
3 /* Dynamic architecture support for GDB, the GNU debugger.
5 Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free
6 Software Foundation, Inc.
8 This file is part of GDB.
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2 of the License, or
13 (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 59 Temple Place - Suite 330,
23 Boston, MA 02111-1307, USA. */
25 /* This file was created with the aid of ``gdbarch.sh''.
27 The Bourne shell script ``gdbarch.sh'' creates the files
28 ``new-gdbarch.c'' and ``new-gdbarch.h and then compares them
29 against the existing ``gdbarch.[hc]''. Any differences found
32 If editing this file, please also run gdbarch.sh and merge any
33 changes into that script. Conversely, when making sweeping changes
34 to this file, modifying gdbarch.sh and using its output may prove
39 #include "arch-utils.h"
42 #include "inferior.h" /* enum CALL_DUMMY_LOCATION et.al. */
45 #include "floatformat.h"
47 #include "gdb_assert.h"
48 #include "gdb_string.h"
49 #include "gdb-events.h"
50 #include "reggroups.h"
52 #include "gdb_obstack.h"
54 /* Static function declarations */
56 static void alloc_gdbarch_data (struct gdbarch
*);
58 /* Non-zero if we want to trace architecture code. */
61 #define GDBARCH_DEBUG 0
63 int gdbarch_debug
= GDBARCH_DEBUG
;
66 /* Maintain the struct gdbarch object */
70 /* Has this architecture been fully initialized? */
73 /* An obstack bound to the lifetime of the architecture. */
74 struct obstack
*obstack
;
76 /* basic architectural information */
77 const struct bfd_arch_info
* bfd_arch_info
;
81 /* target specific vector. */
82 struct gdbarch_tdep
*tdep
;
83 gdbarch_dump_tdep_ftype
*dump_tdep
;
85 /* per-architecture data-pointers */
89 /* per-architecture swap-regions */
90 struct gdbarch_swap
*swap
;
94 When extending this structure you must:
98 Declare set/get functions and define the corresponding
101 gdbarch_alloc(): If zero/NULL is not a suitable default,
102 initialize the new field.
104 verify_gdbarch(): Confirm that the target updated the field
107 gdbarch_dump(): Add a fprintf_unfiltered call so that the new
110 ``startup_gdbarch()'': Append an initial value to the static
111 variable (base values on the host's c-type system).
113 get_gdbarch(): Implement the set/get functions (probably using
114 the macro's as shortcuts).
129 gdbarch_read_pc_ftype
*read_pc
;
130 gdbarch_write_pc_ftype
*write_pc
;
131 gdbarch_read_sp_ftype
*read_sp
;
132 gdbarch_virtual_frame_pointer_ftype
*virtual_frame_pointer
;
133 gdbarch_pseudo_register_read_ftype
*pseudo_register_read
;
134 gdbarch_pseudo_register_write_ftype
*pseudo_register_write
;
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
;
146 gdbarch_register_name_ftype
*register_name
;
147 gdbarch_register_type_ftype
*register_type
;
148 gdbarch_deprecated_register_virtual_type_ftype
*deprecated_register_virtual_type
;
149 int deprecated_register_bytes
;
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
;
153 int deprecated_max_register_raw_size
;
154 int deprecated_max_register_virtual_size
;
155 gdbarch_unwind_dummy_id_ftype
*unwind_dummy_id
;
156 gdbarch_deprecated_save_dummy_frame_tos_ftype
*deprecated_save_dummy_frame_tos
;
157 int deprecated_fp_regnum
;
158 gdbarch_deprecated_target_read_fp_ftype
*deprecated_target_read_fp
;
159 gdbarch_push_dummy_call_ftype
*push_dummy_call
;
160 gdbarch_deprecated_push_arguments_ftype
*deprecated_push_arguments
;
161 int deprecated_use_generic_dummy_frames
;
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
;
165 int call_dummy_location
;
166 CORE_ADDR deprecated_call_dummy_start_offset
;
167 CORE_ADDR deprecated_call_dummy_breakpoint_offset
;
168 LONGEST
* deprecated_call_dummy_words
;
169 int deprecated_sizeof_call_dummy_words
;
170 gdbarch_deprecated_fix_call_dummy_ftype
*deprecated_fix_call_dummy
;
171 gdbarch_push_dummy_code_ftype
*push_dummy_code
;
172 gdbarch_deprecated_push_dummy_frame_ftype
*deprecated_push_dummy_frame
;
173 gdbarch_deprecated_do_registers_info_ftype
*deprecated_do_registers_info
;
174 gdbarch_print_registers_info_ftype
*print_registers_info
;
175 gdbarch_print_float_info_ftype
*print_float_info
;
176 gdbarch_print_vector_info_ftype
*print_vector_info
;
177 gdbarch_register_sim_regno_ftype
*register_sim_regno
;
178 gdbarch_register_bytes_ok_ftype
*register_bytes_ok
;
179 gdbarch_cannot_fetch_register_ftype
*cannot_fetch_register
;
180 gdbarch_cannot_store_register_ftype
*cannot_store_register
;
181 gdbarch_get_longjmp_target_ftype
*get_longjmp_target
;
182 gdbarch_deprecated_pc_in_call_dummy_ftype
*deprecated_pc_in_call_dummy
;
183 gdbarch_deprecated_init_frame_pc_ftype
*deprecated_init_frame_pc
;
184 int believe_pcc_promotion
;
185 int believe_pcc_promotion_type
;
186 gdbarch_deprecated_get_saved_register_ftype
*deprecated_get_saved_register
;
187 gdbarch_deprecated_register_convertible_ftype
*deprecated_register_convertible
;
188 gdbarch_deprecated_register_convert_to_virtual_ftype
*deprecated_register_convert_to_virtual
;
189 gdbarch_deprecated_register_convert_to_raw_ftype
*deprecated_register_convert_to_raw
;
190 gdbarch_convert_register_p_ftype
*convert_register_p
;
191 gdbarch_register_to_value_ftype
*register_to_value
;
192 gdbarch_value_to_register_ftype
*value_to_register
;
193 gdbarch_pointer_to_address_ftype
*pointer_to_address
;
194 gdbarch_address_to_pointer_ftype
*address_to_pointer
;
195 gdbarch_integer_to_address_ftype
*integer_to_address
;
196 gdbarch_deprecated_pop_frame_ftype
*deprecated_pop_frame
;
197 gdbarch_deprecated_store_struct_return_ftype
*deprecated_store_struct_return
;
198 gdbarch_return_value_ftype
*return_value
;
199 gdbarch_return_value_on_stack_ftype
*return_value_on_stack
;
200 gdbarch_extract_return_value_ftype
*extract_return_value
;
201 gdbarch_store_return_value_ftype
*store_return_value
;
202 gdbarch_deprecated_extract_return_value_ftype
*deprecated_extract_return_value
;
203 gdbarch_deprecated_store_return_value_ftype
*deprecated_store_return_value
;
204 gdbarch_use_struct_convention_ftype
*use_struct_convention
;
205 gdbarch_deprecated_extract_struct_value_address_ftype
*deprecated_extract_struct_value_address
;
206 gdbarch_deprecated_frame_init_saved_regs_ftype
*deprecated_frame_init_saved_regs
;
207 gdbarch_deprecated_init_extra_frame_info_ftype
*deprecated_init_extra_frame_info
;
208 gdbarch_skip_prologue_ftype
*skip_prologue
;
209 gdbarch_inner_than_ftype
*inner_than
;
210 gdbarch_breakpoint_from_pc_ftype
*breakpoint_from_pc
;
211 gdbarch_adjust_breakpoint_address_ftype
*adjust_breakpoint_address
;
212 gdbarch_memory_insert_breakpoint_ftype
*memory_insert_breakpoint
;
213 gdbarch_memory_remove_breakpoint_ftype
*memory_remove_breakpoint
;
214 CORE_ADDR decr_pc_after_break
;
215 CORE_ADDR function_start_offset
;
216 gdbarch_remote_translate_xfer_address_ftype
*remote_translate_xfer_address
;
217 CORE_ADDR frame_args_skip
;
218 gdbarch_deprecated_frameless_function_invocation_ftype
*deprecated_frameless_function_invocation
;
219 gdbarch_deprecated_frame_chain_ftype
*deprecated_frame_chain
;
220 gdbarch_deprecated_frame_chain_valid_ftype
*deprecated_frame_chain_valid
;
221 gdbarch_deprecated_frame_saved_pc_ftype
*deprecated_frame_saved_pc
;
222 gdbarch_unwind_pc_ftype
*unwind_pc
;
223 gdbarch_unwind_sp_ftype
*unwind_sp
;
224 gdbarch_deprecated_frame_args_address_ftype
*deprecated_frame_args_address
;
225 gdbarch_deprecated_frame_locals_address_ftype
*deprecated_frame_locals_address
;
226 gdbarch_deprecated_saved_pc_after_call_ftype
*deprecated_saved_pc_after_call
;
227 gdbarch_frame_num_args_ftype
*frame_num_args
;
228 gdbarch_deprecated_stack_align_ftype
*deprecated_stack_align
;
229 gdbarch_frame_align_ftype
*frame_align
;
230 gdbarch_deprecated_reg_struct_has_addr_ftype
*deprecated_reg_struct_has_addr
;
231 gdbarch_stabs_argument_has_addr_ftype
*stabs_argument_has_addr
;
232 int frame_red_zone_size
;
234 const struct floatformat
* float_format
;
235 const struct floatformat
* double_format
;
236 const struct floatformat
* long_double_format
;
237 gdbarch_convert_from_func_ptr_addr_ftype
*convert_from_func_ptr_addr
;
238 gdbarch_addr_bits_remove_ftype
*addr_bits_remove
;
239 gdbarch_smash_text_address_ftype
*smash_text_address
;
240 gdbarch_software_single_step_ftype
*software_single_step
;
241 gdbarch_print_insn_ftype
*print_insn
;
242 gdbarch_skip_trampoline_code_ftype
*skip_trampoline_code
;
243 gdbarch_skip_solib_resolver_ftype
*skip_solib_resolver
;
244 gdbarch_in_solib_call_trampoline_ftype
*in_solib_call_trampoline
;
245 gdbarch_in_solib_return_trampoline_ftype
*in_solib_return_trampoline
;
246 gdbarch_deprecated_pc_in_sigtramp_ftype
*deprecated_pc_in_sigtramp
;
247 gdbarch_deprecated_sigtramp_start_ftype
*deprecated_sigtramp_start
;
248 gdbarch_deprecated_sigtramp_end_ftype
*deprecated_sigtramp_end
;
249 gdbarch_in_function_epilogue_p_ftype
*in_function_epilogue_p
;
250 gdbarch_construct_inferior_arguments_ftype
*construct_inferior_arguments
;
251 gdbarch_elf_make_msymbol_special_ftype
*elf_make_msymbol_special
;
252 gdbarch_coff_make_msymbol_special_ftype
*coff_make_msymbol_special
;
253 const char * name_of_malloc
;
254 int cannot_step_breakpoint
;
255 int have_nonsteppable_watchpoint
;
256 gdbarch_address_class_type_flags_ftype
*address_class_type_flags
;
257 gdbarch_address_class_type_flags_to_name_ftype
*address_class_type_flags_to_name
;
258 gdbarch_address_class_name_to_type_flags_ftype
*address_class_name_to_type_flags
;
259 gdbarch_register_reggroup_p_ftype
*register_reggroup_p
;
260 gdbarch_fetch_pointer_argument_ftype
*fetch_pointer_argument
;
261 gdbarch_regset_from_core_section_ftype
*regset_from_core_section
;
265 /* The default architecture uses host values (for want of a better
268 extern const struct bfd_arch_info bfd_default_arch_struct
;
270 struct gdbarch startup_gdbarch
=
272 1, /* Always initialized. */
273 NULL
, /* The obstack. */
274 /* basic architecture information */
275 &bfd_default_arch_struct
, /* bfd_arch_info */
276 BFD_ENDIAN_BIG
, /* byte_order */
277 GDB_OSABI_UNKNOWN
, /* osabi */
278 /* target specific vector and its dump routine */
280 /*per-architecture data-pointers and swap regions */
282 /* Multi-arch values */
283 8 * sizeof (short), /* short_bit */
284 8 * sizeof (int), /* int_bit */
285 8 * sizeof (long), /* long_bit */
286 8 * sizeof (LONGEST
), /* long_long_bit */
287 8 * sizeof (float), /* float_bit */
288 8 * sizeof (double), /* double_bit */
289 8 * sizeof (long double), /* long_double_bit */
290 8 * sizeof (void*), /* ptr_bit */
291 8 * sizeof (void*), /* addr_bit */
292 8 * sizeof (void*), /* bfd_vma_bit */
297 0, /* virtual_frame_pointer */
298 0, /* pseudo_register_read */
299 0, /* pseudo_register_write */
301 0, /* num_pseudo_regs */
306 0, /* stab_reg_to_regnum */
307 0, /* ecoff_reg_to_regnum */
308 0, /* dwarf_reg_to_regnum */
309 0, /* sdb_reg_to_regnum */
310 0, /* dwarf2_reg_to_regnum */
311 0, /* register_name */
312 0, /* register_type */
313 0, /* deprecated_register_virtual_type */
314 0, /* deprecated_register_bytes */
315 generic_register_byte
, /* deprecated_register_byte */
316 generic_register_size
, /* deprecated_register_raw_size */
317 generic_register_size
, /* deprecated_register_virtual_size */
318 0, /* deprecated_max_register_raw_size */
319 0, /* deprecated_max_register_virtual_size */
320 0, /* unwind_dummy_id */
321 0, /* deprecated_save_dummy_frame_tos */
322 -1, /* deprecated_fp_regnum */
323 0, /* deprecated_target_read_fp */
324 0, /* push_dummy_call */
325 0, /* deprecated_push_arguments */
326 0, /* deprecated_use_generic_dummy_frames */
327 0, /* deprecated_push_return_address */
328 0, /* deprecated_dummy_write_sp */
329 0, /* deprecated_register_size */
330 0, /* call_dummy_location */
331 0, /* deprecated_call_dummy_start_offset */
332 0, /* deprecated_call_dummy_breakpoint_offset */
333 0, /* deprecated_call_dummy_words */
334 0, /* deprecated_sizeof_call_dummy_words */
335 0, /* deprecated_fix_call_dummy */
336 0, /* push_dummy_code */
337 0, /* deprecated_push_dummy_frame */
338 0, /* deprecated_do_registers_info */
339 default_print_registers_info
, /* print_registers_info */
340 0, /* print_float_info */
341 0, /* print_vector_info */
342 0, /* register_sim_regno */
343 0, /* register_bytes_ok */
344 0, /* cannot_fetch_register */
345 0, /* cannot_store_register */
346 0, /* get_longjmp_target */
347 deprecated_pc_in_call_dummy
, /* deprecated_pc_in_call_dummy */
348 0, /* deprecated_init_frame_pc */
349 0, /* believe_pcc_promotion */
350 0, /* believe_pcc_promotion_type */
351 0, /* deprecated_get_saved_register */
352 0, /* deprecated_register_convertible */
353 0, /* deprecated_register_convert_to_virtual */
354 0, /* deprecated_register_convert_to_raw */
355 0, /* convert_register_p */
356 0, /* register_to_value */
357 0, /* value_to_register */
358 0, /* pointer_to_address */
359 0, /* address_to_pointer */
360 0, /* integer_to_address */
361 0, /* deprecated_pop_frame */
362 0, /* deprecated_store_struct_return */
363 0, /* return_value */
364 0, /* return_value_on_stack */
365 0, /* extract_return_value */
366 0, /* store_return_value */
367 0, /* deprecated_extract_return_value */
368 0, /* deprecated_store_return_value */
369 0, /* use_struct_convention */
370 0, /* deprecated_extract_struct_value_address */
371 0, /* deprecated_frame_init_saved_regs */
372 0, /* deprecated_init_extra_frame_info */
373 0, /* skip_prologue */
375 0, /* breakpoint_from_pc */
376 0, /* adjust_breakpoint_address */
377 0, /* memory_insert_breakpoint */
378 0, /* memory_remove_breakpoint */
379 0, /* decr_pc_after_break */
380 0, /* function_start_offset */
381 generic_remote_translate_xfer_address
, /* remote_translate_xfer_address */
382 0, /* frame_args_skip */
383 0, /* deprecated_frameless_function_invocation */
384 0, /* deprecated_frame_chain */
385 0, /* deprecated_frame_chain_valid */
386 0, /* deprecated_frame_saved_pc */
389 get_frame_base
, /* deprecated_frame_args_address */
390 get_frame_base
, /* deprecated_frame_locals_address */
391 0, /* deprecated_saved_pc_after_call */
392 0, /* frame_num_args */
393 0, /* deprecated_stack_align */
395 0, /* deprecated_reg_struct_has_addr */
396 default_stabs_argument_has_addr
, /* stabs_argument_has_addr */
397 0, /* frame_red_zone_size */
398 0, /* parm_boundary */
399 0, /* float_format */
400 0, /* double_format */
401 0, /* long_double_format */
402 convert_from_func_ptr_addr_identity
, /* convert_from_func_ptr_addr */
403 0, /* addr_bits_remove */
404 0, /* smash_text_address */
405 0, /* software_single_step */
407 0, /* skip_trampoline_code */
408 generic_skip_solib_resolver
, /* skip_solib_resolver */
409 0, /* in_solib_call_trampoline */
410 0, /* in_solib_return_trampoline */
411 0, /* deprecated_pc_in_sigtramp */
412 0, /* deprecated_sigtramp_start */
413 0, /* deprecated_sigtramp_end */
414 generic_in_function_epilogue_p
, /* in_function_epilogue_p */
415 construct_inferior_arguments
, /* construct_inferior_arguments */
416 0, /* elf_make_msymbol_special */
417 0, /* coff_make_msymbol_special */
418 "malloc", /* name_of_malloc */
419 0, /* cannot_step_breakpoint */
420 0, /* have_nonsteppable_watchpoint */
421 0, /* address_class_type_flags */
422 0, /* address_class_type_flags_to_name */
423 0, /* address_class_name_to_type_flags */
424 default_register_reggroup_p
, /* register_reggroup_p */
425 0, /* fetch_pointer_argument */
426 0, /* regset_from_core_section */
427 /* startup_gdbarch() */
430 struct gdbarch
*current_gdbarch
= &startup_gdbarch
;
432 /* Create a new ``struct gdbarch'' based on information provided by
433 ``struct gdbarch_info''. */
436 gdbarch_alloc (const struct gdbarch_info
*info
,
437 struct gdbarch_tdep
*tdep
)
439 /* NOTE: The new architecture variable is named ``current_gdbarch''
440 so that macros such as TARGET_DOUBLE_BIT, when expanded, refer to
441 the current local architecture and not the previous global
442 architecture. This ensures that the new architectures initial
443 values are not influenced by the previous architecture. Once
444 everything is parameterised with gdbarch, this will go away. */
445 struct gdbarch
*current_gdbarch
;
447 /* Create an obstack for allocating all the per-architecture memory,
448 then use that to allocate the architecture vector. */
449 struct obstack
*obstack
= XMALLOC (struct obstack
);
450 obstack_init (obstack
);
451 current_gdbarch
= obstack_alloc (obstack
, sizeof (*current_gdbarch
));
452 memset (current_gdbarch
, 0, sizeof (*current_gdbarch
));
453 current_gdbarch
->obstack
= obstack
;
455 alloc_gdbarch_data (current_gdbarch
);
457 current_gdbarch
->tdep
= tdep
;
459 current_gdbarch
->bfd_arch_info
= info
->bfd_arch_info
;
460 current_gdbarch
->byte_order
= info
->byte_order
;
461 current_gdbarch
->osabi
= info
->osabi
;
463 /* Force the explicit initialization of these. */
464 current_gdbarch
->short_bit
= 2*TARGET_CHAR_BIT
;
465 current_gdbarch
->int_bit
= 4*TARGET_CHAR_BIT
;
466 current_gdbarch
->long_bit
= 4*TARGET_CHAR_BIT
;
467 current_gdbarch
->long_long_bit
= 2*TARGET_LONG_BIT
;
468 current_gdbarch
->float_bit
= 4*TARGET_CHAR_BIT
;
469 current_gdbarch
->double_bit
= 8*TARGET_CHAR_BIT
;
470 current_gdbarch
->long_double_bit
= 8*TARGET_CHAR_BIT
;
471 current_gdbarch
->ptr_bit
= TARGET_INT_BIT
;
472 current_gdbarch
->bfd_vma_bit
= TARGET_ARCHITECTURE
->bits_per_address
;
473 current_gdbarch
->char_signed
= -1;
474 current_gdbarch
->write_pc
= generic_target_write_pc
;
475 current_gdbarch
->virtual_frame_pointer
= legacy_virtual_frame_pointer
;
476 current_gdbarch
->num_regs
= -1;
477 current_gdbarch
->sp_regnum
= -1;
478 current_gdbarch
->pc_regnum
= -1;
479 current_gdbarch
->ps_regnum
= -1;
480 current_gdbarch
->fp0_regnum
= -1;
481 current_gdbarch
->stab_reg_to_regnum
= no_op_reg_to_regnum
;
482 current_gdbarch
->ecoff_reg_to_regnum
= no_op_reg_to_regnum
;
483 current_gdbarch
->dwarf_reg_to_regnum
= no_op_reg_to_regnum
;
484 current_gdbarch
->sdb_reg_to_regnum
= no_op_reg_to_regnum
;
485 current_gdbarch
->dwarf2_reg_to_regnum
= no_op_reg_to_regnum
;
486 current_gdbarch
->deprecated_register_byte
= generic_register_byte
;
487 current_gdbarch
->deprecated_register_raw_size
= generic_register_size
;
488 current_gdbarch
->deprecated_register_virtual_size
= generic_register_size
;
489 current_gdbarch
->deprecated_fp_regnum
= -1;
490 current_gdbarch
->deprecated_use_generic_dummy_frames
= 1;
491 current_gdbarch
->call_dummy_location
= AT_ENTRY_POINT
;
492 current_gdbarch
->deprecated_call_dummy_words
= legacy_call_dummy_words
;
493 current_gdbarch
->deprecated_sizeof_call_dummy_words
= legacy_sizeof_call_dummy_words
;
494 current_gdbarch
->print_registers_info
= default_print_registers_info
;
495 current_gdbarch
->register_sim_regno
= legacy_register_sim_regno
;
496 current_gdbarch
->cannot_fetch_register
= cannot_register_not
;
497 current_gdbarch
->cannot_store_register
= cannot_register_not
;
498 current_gdbarch
->deprecated_pc_in_call_dummy
= deprecated_pc_in_call_dummy
;
499 current_gdbarch
->convert_register_p
= legacy_convert_register_p
;
500 current_gdbarch
->register_to_value
= legacy_register_to_value
;
501 current_gdbarch
->value_to_register
= legacy_value_to_register
;
502 current_gdbarch
->pointer_to_address
= unsigned_pointer_to_address
;
503 current_gdbarch
->address_to_pointer
= unsigned_address_to_pointer
;
504 current_gdbarch
->return_value_on_stack
= generic_return_value_on_stack_not
;
505 current_gdbarch
->extract_return_value
= legacy_extract_return_value
;
506 current_gdbarch
->store_return_value
= legacy_store_return_value
;
507 current_gdbarch
->use_struct_convention
= generic_use_struct_convention
;
508 current_gdbarch
->memory_insert_breakpoint
= default_memory_insert_breakpoint
;
509 current_gdbarch
->memory_remove_breakpoint
= default_memory_remove_breakpoint
;
510 current_gdbarch
->remote_translate_xfer_address
= generic_remote_translate_xfer_address
;
511 current_gdbarch
->deprecated_frame_args_address
= get_frame_base
;
512 current_gdbarch
->deprecated_frame_locals_address
= get_frame_base
;
513 current_gdbarch
->stabs_argument_has_addr
= default_stabs_argument_has_addr
;
514 current_gdbarch
->convert_from_func_ptr_addr
= convert_from_func_ptr_addr_identity
;
515 current_gdbarch
->addr_bits_remove
= core_addr_identity
;
516 current_gdbarch
->smash_text_address
= core_addr_identity
;
517 current_gdbarch
->skip_trampoline_code
= generic_skip_trampoline_code
;
518 current_gdbarch
->skip_solib_resolver
= generic_skip_solib_resolver
;
519 current_gdbarch
->in_solib_call_trampoline
= generic_in_solib_call_trampoline
;
520 current_gdbarch
->in_solib_return_trampoline
= generic_in_solib_return_trampoline
;
521 current_gdbarch
->deprecated_pc_in_sigtramp
= legacy_pc_in_sigtramp
;
522 current_gdbarch
->in_function_epilogue_p
= generic_in_function_epilogue_p
;
523 current_gdbarch
->construct_inferior_arguments
= construct_inferior_arguments
;
524 current_gdbarch
->elf_make_msymbol_special
= default_elf_make_msymbol_special
;
525 current_gdbarch
->coff_make_msymbol_special
= default_coff_make_msymbol_special
;
526 current_gdbarch
->name_of_malloc
= "malloc";
527 current_gdbarch
->register_reggroup_p
= default_register_reggroup_p
;
528 /* gdbarch_alloc() */
530 return current_gdbarch
;
534 /* Allocate extra space using the per-architecture obstack. */
537 gdbarch_obstack_zalloc (struct gdbarch
*arch
, long size
)
539 void *data
= obstack_alloc (arch
->obstack
, size
);
540 memset (data
, 0, size
);
545 /* Free a gdbarch struct. This should never happen in normal
546 operation --- once you've created a gdbarch, you keep it around.
547 However, if an architecture's init function encounters an error
548 building the structure, it may need to clean up a partially
549 constructed gdbarch. */
552 gdbarch_free (struct gdbarch
*arch
)
554 struct obstack
*obstack
;
555 gdb_assert (arch
!= NULL
);
556 gdb_assert (!arch
->initialized_p
);
557 obstack
= arch
->obstack
;
558 obstack_free (obstack
, 0); /* Includes the ARCH. */
563 /* Ensure that all values in a GDBARCH are reasonable. */
565 /* NOTE/WARNING: The parameter is called ``current_gdbarch'' so that it
566 just happens to match the global variable ``current_gdbarch''. That
567 way macros refering to that variable get the local and not the global
568 version - ulgh. Once everything is parameterised with gdbarch, this
572 verify_gdbarch (struct gdbarch
*current_gdbarch
)
575 struct cleanup
*cleanups
;
578 log
= mem_fileopen ();
579 cleanups
= make_cleanup_ui_file_delete (log
);
581 if (current_gdbarch
->byte_order
== BFD_ENDIAN_UNKNOWN
)
582 fprintf_unfiltered (log
, "\n\tbyte-order");
583 if (current_gdbarch
->bfd_arch_info
== NULL
)
584 fprintf_unfiltered (log
, "\n\tbfd_arch_info");
585 /* Check those that need to be defined for the given multi-arch level. */
586 /* Skip verify of short_bit, invalid_p == 0 */
587 /* Skip verify of int_bit, invalid_p == 0 */
588 /* Skip verify of long_bit, invalid_p == 0 */
589 /* Skip verify of long_long_bit, invalid_p == 0 */
590 /* Skip verify of float_bit, invalid_p == 0 */
591 /* Skip verify of double_bit, invalid_p == 0 */
592 /* Skip verify of long_double_bit, invalid_p == 0 */
593 /* Skip verify of ptr_bit, invalid_p == 0 */
594 if (current_gdbarch
->addr_bit
== 0)
595 current_gdbarch
->addr_bit
= TARGET_PTR_BIT
;
596 /* Skip verify of bfd_vma_bit, invalid_p == 0 */
597 if (current_gdbarch
->char_signed
== -1)
598 current_gdbarch
->char_signed
= 1;
599 /* Skip verify of read_pc, has predicate */
600 /* Skip verify of write_pc, invalid_p == 0 */
601 /* Skip verify of read_sp, has predicate */
602 /* Skip verify of virtual_frame_pointer, invalid_p == 0 */
603 /* Skip verify of pseudo_register_read, has predicate */
604 /* Skip verify of pseudo_register_write, has predicate */
605 if ((GDB_MULTI_ARCH
> GDB_MULTI_ARCH_PARTIAL
)
606 && (current_gdbarch
->num_regs
== -1))
607 fprintf_unfiltered (log
, "\n\tnum_regs");
608 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
609 /* Skip verify of sp_regnum, invalid_p == 0 */
610 /* Skip verify of pc_regnum, invalid_p == 0 */
611 /* Skip verify of ps_regnum, invalid_p == 0 */
612 /* Skip verify of fp0_regnum, invalid_p == 0 */
613 /* Skip verify of stab_reg_to_regnum, invalid_p == 0 */
614 /* Skip verify of ecoff_reg_to_regnum, invalid_p == 0 */
615 /* Skip verify of dwarf_reg_to_regnum, invalid_p == 0 */
616 /* Skip verify of sdb_reg_to_regnum, invalid_p == 0 */
617 /* Skip verify of dwarf2_reg_to_regnum, invalid_p == 0 */
618 /* Skip verify of register_type, has predicate */
619 /* Skip verify of deprecated_register_virtual_type, has predicate */
620 /* Skip verify of deprecated_register_byte, has predicate */
621 /* Skip verify of deprecated_register_raw_size, has predicate */
622 /* Skip verify of deprecated_register_virtual_size, has predicate */
623 /* Skip verify of deprecated_max_register_raw_size, has predicate */
624 /* Skip verify of deprecated_max_register_virtual_size, has predicate */
625 /* Skip verify of unwind_dummy_id, has predicate */
626 /* Skip verify of deprecated_save_dummy_frame_tos, has predicate */
627 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
628 /* Skip verify of deprecated_target_read_fp, has predicate */
629 /* Skip verify of push_dummy_call, has predicate */
630 /* Skip verify of deprecated_push_arguments, has predicate */
631 /* Skip verify of deprecated_use_generic_dummy_frames, invalid_p == 0 */
632 /* Skip verify of deprecated_push_return_address, has predicate */
633 /* Skip verify of deprecated_dummy_write_sp, has predicate */
634 /* Skip verify of call_dummy_location, invalid_p == 0 */
635 /* Skip verify of deprecated_call_dummy_words, invalid_p == 0 */
636 /* Skip verify of deprecated_sizeof_call_dummy_words, invalid_p == 0 */
637 /* Skip verify of deprecated_fix_call_dummy, has predicate */
638 /* Skip verify of push_dummy_code, has predicate */
639 /* Skip verify of deprecated_push_dummy_frame, has predicate */
640 /* Skip verify of deprecated_do_registers_info, has predicate */
641 /* Skip verify of print_registers_info, invalid_p == 0 */
642 /* Skip verify of print_float_info, has predicate */
643 /* Skip verify of print_vector_info, has predicate */
644 /* Skip verify of register_sim_regno, invalid_p == 0 */
645 /* Skip verify of register_bytes_ok, has predicate */
646 /* Skip verify of cannot_fetch_register, invalid_p == 0 */
647 /* Skip verify of cannot_store_register, invalid_p == 0 */
648 /* Skip verify of get_longjmp_target, has predicate */
649 /* Skip verify of deprecated_pc_in_call_dummy, has predicate */
650 /* Skip verify of deprecated_init_frame_pc, has predicate */
651 /* Skip verify of deprecated_get_saved_register, has predicate */
652 /* Skip verify of deprecated_register_convertible, has predicate */
653 /* Skip verify of deprecated_register_convert_to_virtual, invalid_p == 0 */
654 /* Skip verify of deprecated_register_convert_to_raw, invalid_p == 0 */
655 /* Skip verify of convert_register_p, invalid_p == 0 */
656 /* Skip verify of register_to_value, invalid_p == 0 */
657 /* Skip verify of value_to_register, invalid_p == 0 */
658 /* Skip verify of pointer_to_address, invalid_p == 0 */
659 /* Skip verify of address_to_pointer, invalid_p == 0 */
660 /* Skip verify of integer_to_address, has predicate */
661 /* Skip verify of deprecated_pop_frame, has predicate */
662 /* Skip verify of deprecated_store_struct_return, has predicate */
663 /* Skip verify of return_value, has predicate */
664 /* Skip verify of return_value_on_stack, invalid_p == 0 */
665 /* Skip verify of extract_return_value, invalid_p == 0 */
666 /* Skip verify of store_return_value, invalid_p == 0 */
667 /* Skip verify of use_struct_convention, invalid_p == 0 */
668 /* Skip verify of deprecated_extract_struct_value_address, has predicate */
669 /* Skip verify of deprecated_frame_init_saved_regs, has predicate */
670 /* Skip verify of deprecated_init_extra_frame_info, has predicate */
671 if ((GDB_MULTI_ARCH
> GDB_MULTI_ARCH_PARTIAL
)
672 && (current_gdbarch
->skip_prologue
== 0))
673 fprintf_unfiltered (log
, "\n\tskip_prologue");
674 if ((GDB_MULTI_ARCH
> GDB_MULTI_ARCH_PARTIAL
)
675 && (current_gdbarch
->inner_than
== 0))
676 fprintf_unfiltered (log
, "\n\tinner_than");
677 if ((GDB_MULTI_ARCH
> GDB_MULTI_ARCH_PARTIAL
)
678 && (current_gdbarch
->breakpoint_from_pc
== 0))
679 fprintf_unfiltered (log
, "\n\tbreakpoint_from_pc");
680 /* Skip verify of adjust_breakpoint_address, has predicate */
681 /* Skip verify of memory_insert_breakpoint, invalid_p == 0 */
682 /* Skip verify of memory_remove_breakpoint, invalid_p == 0 */
683 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
684 /* Skip verify of function_start_offset, invalid_p == 0 */
685 /* Skip verify of remote_translate_xfer_address, invalid_p == 0 */
686 /* Skip verify of frame_args_skip, invalid_p == 0 */
687 /* Skip verify of deprecated_frameless_function_invocation, has predicate */
688 /* Skip verify of deprecated_frame_chain, has predicate */
689 /* Skip verify of deprecated_frame_chain_valid, has predicate */
690 /* Skip verify of deprecated_frame_saved_pc, has predicate */
691 /* Skip verify of unwind_pc, has predicate */
692 /* Skip verify of unwind_sp, has predicate */
693 /* Skip verify of deprecated_frame_args_address, has predicate */
694 /* Skip verify of deprecated_frame_locals_address, has predicate */
695 /* Skip verify of deprecated_saved_pc_after_call, has predicate */
696 /* Skip verify of frame_num_args, has predicate */
697 /* Skip verify of deprecated_stack_align, has predicate */
698 /* Skip verify of frame_align, has predicate */
699 /* Skip verify of deprecated_reg_struct_has_addr, has predicate */
700 /* Skip verify of stabs_argument_has_addr, invalid_p == 0 */
701 if (current_gdbarch
->float_format
== 0)
702 current_gdbarch
->float_format
= default_float_format (current_gdbarch
);
703 if (current_gdbarch
->double_format
== 0)
704 current_gdbarch
->double_format
= default_double_format (current_gdbarch
);
705 if (current_gdbarch
->long_double_format
== 0)
706 current_gdbarch
->long_double_format
= default_double_format (current_gdbarch
);
707 /* Skip verify of convert_from_func_ptr_addr, invalid_p == 0 */
708 /* Skip verify of addr_bits_remove, invalid_p == 0 */
709 /* Skip verify of smash_text_address, invalid_p == 0 */
710 /* Skip verify of software_single_step, has predicate */
711 if ((GDB_MULTI_ARCH
> GDB_MULTI_ARCH_PARTIAL
)
712 && (current_gdbarch
->print_insn
== 0))
713 fprintf_unfiltered (log
, "\n\tprint_insn");
714 /* Skip verify of skip_trampoline_code, invalid_p == 0 */
715 /* Skip verify of skip_solib_resolver, invalid_p == 0 */
716 /* Skip verify of in_solib_call_trampoline, invalid_p == 0 */
717 /* Skip verify of in_solib_return_trampoline, invalid_p == 0 */
718 /* Skip verify of deprecated_pc_in_sigtramp, has predicate */
719 /* Skip verify of deprecated_sigtramp_start, has predicate */
720 /* Skip verify of deprecated_sigtramp_end, has predicate */
721 /* Skip verify of in_function_epilogue_p, invalid_p == 0 */
722 /* Skip verify of construct_inferior_arguments, invalid_p == 0 */
723 /* Skip verify of elf_make_msymbol_special, invalid_p == 0 */
724 /* Skip verify of coff_make_msymbol_special, invalid_p == 0 */
725 /* Skip verify of name_of_malloc, invalid_p == 0 */
726 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
727 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
728 /* Skip verify of address_class_type_flags, has predicate */
729 /* Skip verify of address_class_type_flags_to_name, has predicate */
730 /* Skip verify of address_class_name_to_type_flags, has predicate */
731 /* Skip verify of register_reggroup_p, invalid_p == 0 */
732 /* Skip verify of fetch_pointer_argument, has predicate */
733 /* Skip verify of regset_from_core_section, has predicate */
734 buf
= ui_file_xstrdup (log
, &dummy
);
735 make_cleanup (xfree
, buf
);
736 if (strlen (buf
) > 0)
737 internal_error (__FILE__
, __LINE__
,
738 "verify_gdbarch: the following are invalid ...%s",
740 do_cleanups (cleanups
);
744 /* Print out the details of the current architecture. */
746 /* NOTE/WARNING: The parameter is called ``current_gdbarch'' so that it
747 just happens to match the global variable ``current_gdbarch''. That
748 way macros refering to that variable get the local and not the global
749 version - ulgh. Once everything is parameterised with gdbarch, this
753 gdbarch_dump (struct gdbarch
*current_gdbarch
, struct ui_file
*file
)
755 fprintf_unfiltered (file
,
756 "gdbarch_dump: GDB_MULTI_ARCH = %d\n",
758 fprintf_unfiltered (file
,
759 "gdbarch_dump: convert_from_func_ptr_addr = 0x%08lx\n",
760 (long) current_gdbarch
->convert_from_func_ptr_addr
);
761 fprintf_unfiltered (file
,
762 "gdbarch_dump: gdbarch_frame_align_p() = %d\n",
763 gdbarch_frame_align_p (current_gdbarch
));
764 fprintf_unfiltered (file
,
765 "gdbarch_dump: frame_align = 0x%08lx\n",
766 (long) current_gdbarch
->frame_align
);
767 fprintf_unfiltered (file
,
768 "gdbarch_dump: gdbarch_regset_from_core_section_p() = %d\n",
769 gdbarch_regset_from_core_section_p (current_gdbarch
));
770 fprintf_unfiltered (file
,
771 "gdbarch_dump: regset_from_core_section = 0x%08lx\n",
772 (long) current_gdbarch
->regset_from_core_section
);
773 fprintf_unfiltered (file
,
774 "gdbarch_dump: gdbarch_return_value_p() = %d\n",
775 gdbarch_return_value_p (current_gdbarch
));
776 fprintf_unfiltered (file
,
777 "gdbarch_dump: return_value = 0x%08lx\n",
778 (long) current_gdbarch
->return_value
);
779 fprintf_unfiltered (file
,
780 "gdbarch_dump: in_function_epilogue_p = 0x%08lx\n",
781 (long) current_gdbarch
->in_function_epilogue_p
);
782 fprintf_unfiltered (file
,
783 "gdbarch_dump: register_reggroup_p = 0x%08lx\n",
784 (long) current_gdbarch
->register_reggroup_p
);
785 fprintf_unfiltered (file
,
786 "gdbarch_dump: stabs_argument_has_addr = 0x%08lx\n",
787 (long) current_gdbarch
->stabs_argument_has_addr
);
788 fprintf_unfiltered (file
,
789 "gdbarch_dump: gdbarch_pseudo_register_read_p() = %d\n",
790 gdbarch_pseudo_register_read_p (current_gdbarch
));
791 fprintf_unfiltered (file
,
792 "gdbarch_dump: pseudo_register_read = 0x%08lx\n",
793 (long) current_gdbarch
->pseudo_register_read
);
794 fprintf_unfiltered (file
,
795 "gdbarch_dump: gdbarch_pseudo_register_write_p() = %d\n",
796 gdbarch_pseudo_register_write_p (current_gdbarch
));
797 fprintf_unfiltered (file
,
798 "gdbarch_dump: pseudo_register_write = 0x%08lx\n",
799 (long) current_gdbarch
->pseudo_register_write
);
800 fprintf_unfiltered (file
,
801 "gdbarch_dump: gdbarch_address_class_name_to_type_flags_p() = %d\n",
802 gdbarch_address_class_name_to_type_flags_p (current_gdbarch
));
803 fprintf_unfiltered (file
,
804 "gdbarch_dump: address_class_name_to_type_flags = 0x%08lx\n",
805 (long) current_gdbarch
->address_class_name_to_type_flags
);
806 #ifdef ADDRESS_CLASS_TYPE_FLAGS_P
807 fprintf_unfiltered (file
,
808 "gdbarch_dump: %s # %s\n",
809 "ADDRESS_CLASS_TYPE_FLAGS_P()",
810 XSTRING (ADDRESS_CLASS_TYPE_FLAGS_P ()));
811 fprintf_unfiltered (file
,
812 "gdbarch_dump: ADDRESS_CLASS_TYPE_FLAGS_P() = %d\n",
813 ADDRESS_CLASS_TYPE_FLAGS_P ());
815 #ifdef ADDRESS_CLASS_TYPE_FLAGS
816 fprintf_unfiltered (file
,
817 "gdbarch_dump: %s # %s\n",
818 "ADDRESS_CLASS_TYPE_FLAGS(byte_size, dwarf2_addr_class)",
819 XSTRING (ADDRESS_CLASS_TYPE_FLAGS (byte_size
, dwarf2_addr_class
)));
820 fprintf_unfiltered (file
,
821 "gdbarch_dump: ADDRESS_CLASS_TYPE_FLAGS = <0x%08lx>\n",
822 (long) current_gdbarch
->address_class_type_flags
823 /*ADDRESS_CLASS_TYPE_FLAGS ()*/);
825 fprintf_unfiltered (file
,
826 "gdbarch_dump: gdbarch_address_class_type_flags_to_name_p() = %d\n",
827 gdbarch_address_class_type_flags_to_name_p (current_gdbarch
));
828 fprintf_unfiltered (file
,
829 "gdbarch_dump: address_class_type_flags_to_name = 0x%08lx\n",
830 (long) current_gdbarch
->address_class_type_flags_to_name
);
831 #ifdef ADDRESS_TO_POINTER
832 fprintf_unfiltered (file
,
833 "gdbarch_dump: %s # %s\n",
834 "ADDRESS_TO_POINTER(type, buf, addr)",
835 XSTRING (ADDRESS_TO_POINTER (type
, buf
, addr
)));
836 fprintf_unfiltered (file
,
837 "gdbarch_dump: ADDRESS_TO_POINTER = <0x%08lx>\n",
838 (long) current_gdbarch
->address_to_pointer
839 /*ADDRESS_TO_POINTER ()*/);
841 #ifdef ADDR_BITS_REMOVE
842 fprintf_unfiltered (file
,
843 "gdbarch_dump: %s # %s\n",
844 "ADDR_BITS_REMOVE(addr)",
845 XSTRING (ADDR_BITS_REMOVE (addr
)));
846 fprintf_unfiltered (file
,
847 "gdbarch_dump: ADDR_BITS_REMOVE = <0x%08lx>\n",
848 (long) current_gdbarch
->addr_bits_remove
849 /*ADDR_BITS_REMOVE ()*/);
851 fprintf_unfiltered (file
,
852 "gdbarch_dump: gdbarch_adjust_breakpoint_address_p() = %d\n",
853 gdbarch_adjust_breakpoint_address_p (current_gdbarch
));
854 fprintf_unfiltered (file
,
855 "gdbarch_dump: adjust_breakpoint_address = 0x%08lx\n",
856 (long) current_gdbarch
->adjust_breakpoint_address
);
857 #ifdef BELIEVE_PCC_PROMOTION
858 fprintf_unfiltered (file
,
859 "gdbarch_dump: BELIEVE_PCC_PROMOTION # %s\n",
860 XSTRING (BELIEVE_PCC_PROMOTION
));
861 fprintf_unfiltered (file
,
862 "gdbarch_dump: BELIEVE_PCC_PROMOTION = %d\n",
863 BELIEVE_PCC_PROMOTION
);
865 #ifdef BELIEVE_PCC_PROMOTION_TYPE
866 fprintf_unfiltered (file
,
867 "gdbarch_dump: BELIEVE_PCC_PROMOTION_TYPE # %s\n",
868 XSTRING (BELIEVE_PCC_PROMOTION_TYPE
));
869 fprintf_unfiltered (file
,
870 "gdbarch_dump: BELIEVE_PCC_PROMOTION_TYPE = %d\n",
871 BELIEVE_PCC_PROMOTION_TYPE
);
873 #ifdef BREAKPOINT_FROM_PC
874 fprintf_unfiltered (file
,
875 "gdbarch_dump: %s # %s\n",
876 "BREAKPOINT_FROM_PC(pcptr, lenptr)",
877 XSTRING (BREAKPOINT_FROM_PC (pcptr
, lenptr
)));
878 fprintf_unfiltered (file
,
879 "gdbarch_dump: BREAKPOINT_FROM_PC = <0x%08lx>\n",
880 (long) current_gdbarch
->breakpoint_from_pc
881 /*BREAKPOINT_FROM_PC ()*/);
883 #ifdef CALL_DUMMY_LOCATION
884 fprintf_unfiltered (file
,
885 "gdbarch_dump: CALL_DUMMY_LOCATION # %s\n",
886 XSTRING (CALL_DUMMY_LOCATION
));
887 fprintf_unfiltered (file
,
888 "gdbarch_dump: CALL_DUMMY_LOCATION = %d\n",
889 CALL_DUMMY_LOCATION
);
891 #ifdef CANNOT_FETCH_REGISTER
892 fprintf_unfiltered (file
,
893 "gdbarch_dump: %s # %s\n",
894 "CANNOT_FETCH_REGISTER(regnum)",
895 XSTRING (CANNOT_FETCH_REGISTER (regnum
)));
896 fprintf_unfiltered (file
,
897 "gdbarch_dump: CANNOT_FETCH_REGISTER = <0x%08lx>\n",
898 (long) current_gdbarch
->cannot_fetch_register
899 /*CANNOT_FETCH_REGISTER ()*/);
901 #ifdef CANNOT_STEP_BREAKPOINT
902 fprintf_unfiltered (file
,
903 "gdbarch_dump: CANNOT_STEP_BREAKPOINT # %s\n",
904 XSTRING (CANNOT_STEP_BREAKPOINT
));
905 fprintf_unfiltered (file
,
906 "gdbarch_dump: CANNOT_STEP_BREAKPOINT = %d\n",
907 CANNOT_STEP_BREAKPOINT
);
909 #ifdef CANNOT_STORE_REGISTER
910 fprintf_unfiltered (file
,
911 "gdbarch_dump: %s # %s\n",
912 "CANNOT_STORE_REGISTER(regnum)",
913 XSTRING (CANNOT_STORE_REGISTER (regnum
)));
914 fprintf_unfiltered (file
,
915 "gdbarch_dump: CANNOT_STORE_REGISTER = <0x%08lx>\n",
916 (long) current_gdbarch
->cannot_store_register
917 /*CANNOT_STORE_REGISTER ()*/);
919 #ifdef COFF_MAKE_MSYMBOL_SPECIAL
920 fprintf_unfiltered (file
,
921 "gdbarch_dump: %s # %s\n",
922 "COFF_MAKE_MSYMBOL_SPECIAL(val, msym)",
923 XSTRING (COFF_MAKE_MSYMBOL_SPECIAL (val
, msym
)));
924 fprintf_unfiltered (file
,
925 "gdbarch_dump: COFF_MAKE_MSYMBOL_SPECIAL = <0x%08lx>\n",
926 (long) current_gdbarch
->coff_make_msymbol_special
927 /*COFF_MAKE_MSYMBOL_SPECIAL ()*/);
929 fprintf_unfiltered (file
,
930 "gdbarch_dump: construct_inferior_arguments = 0x%08lx\n",
931 (long) current_gdbarch
->construct_inferior_arguments
);
932 #ifdef CONVERT_REGISTER_P
933 fprintf_unfiltered (file
,
934 "gdbarch_dump: %s # %s\n",
935 "CONVERT_REGISTER_P(regnum, type)",
936 XSTRING (CONVERT_REGISTER_P (regnum
, type
)));
937 fprintf_unfiltered (file
,
938 "gdbarch_dump: CONVERT_REGISTER_P = <0x%08lx>\n",
939 (long) current_gdbarch
->convert_register_p
940 /*CONVERT_REGISTER_P ()*/);
942 #ifdef DECR_PC_AFTER_BREAK
943 fprintf_unfiltered (file
,
944 "gdbarch_dump: DECR_PC_AFTER_BREAK # %s\n",
945 XSTRING (DECR_PC_AFTER_BREAK
));
946 fprintf_unfiltered (file
,
947 "gdbarch_dump: DECR_PC_AFTER_BREAK = %ld\n",
948 (long) DECR_PC_AFTER_BREAK
);
950 #ifdef DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET
951 fprintf_unfiltered (file
,
952 "gdbarch_dump: DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET # %s\n",
953 XSTRING (DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET
));
954 fprintf_unfiltered (file
,
955 "gdbarch_dump: DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET = %ld\n",
956 (long) DEPRECATED_CALL_DUMMY_BREAKPOINT_OFFSET
);
958 #ifdef DEPRECATED_CALL_DUMMY_START_OFFSET
959 fprintf_unfiltered (file
,
960 "gdbarch_dump: DEPRECATED_CALL_DUMMY_START_OFFSET # %s\n",
961 XSTRING (DEPRECATED_CALL_DUMMY_START_OFFSET
));
962 fprintf_unfiltered (file
,
963 "gdbarch_dump: DEPRECATED_CALL_DUMMY_START_OFFSET = %ld\n",
964 (long) DEPRECATED_CALL_DUMMY_START_OFFSET
);
966 #ifdef DEPRECATED_CALL_DUMMY_WORDS
967 fprintf_unfiltered (file
,
968 "gdbarch_dump: DEPRECATED_CALL_DUMMY_WORDS # %s\n",
969 XSTRING (DEPRECATED_CALL_DUMMY_WORDS
));
970 fprintf_unfiltered (file
,
971 "gdbarch_dump: DEPRECATED_CALL_DUMMY_WORDS = 0x%08lx\n",
972 (long) DEPRECATED_CALL_DUMMY_WORDS
);
974 #ifdef DEPRECATED_DO_REGISTERS_INFO_P
975 fprintf_unfiltered (file
,
976 "gdbarch_dump: %s # %s\n",
977 "DEPRECATED_DO_REGISTERS_INFO_P()",
978 XSTRING (DEPRECATED_DO_REGISTERS_INFO_P ()));
979 fprintf_unfiltered (file
,
980 "gdbarch_dump: DEPRECATED_DO_REGISTERS_INFO_P() = %d\n",
981 DEPRECATED_DO_REGISTERS_INFO_P ());
983 #ifdef DEPRECATED_DO_REGISTERS_INFO
984 fprintf_unfiltered (file
,
985 "gdbarch_dump: %s # %s\n",
986 "DEPRECATED_DO_REGISTERS_INFO(reg_nr, fpregs)",
987 XSTRING (DEPRECATED_DO_REGISTERS_INFO (reg_nr
, fpregs
)));
988 fprintf_unfiltered (file
,
989 "gdbarch_dump: DEPRECATED_DO_REGISTERS_INFO = <0x%08lx>\n",
990 (long) current_gdbarch
->deprecated_do_registers_info
991 /*DEPRECATED_DO_REGISTERS_INFO ()*/);
993 #ifdef DEPRECATED_DUMMY_WRITE_SP_P
994 fprintf_unfiltered (file
,
995 "gdbarch_dump: %s # %s\n",
996 "DEPRECATED_DUMMY_WRITE_SP_P()",
997 XSTRING (DEPRECATED_DUMMY_WRITE_SP_P ()));
998 fprintf_unfiltered (file
,
999 "gdbarch_dump: DEPRECATED_DUMMY_WRITE_SP_P() = %d\n",
1000 DEPRECATED_DUMMY_WRITE_SP_P ());
1002 #ifdef DEPRECATED_DUMMY_WRITE_SP
1003 fprintf_unfiltered (file
,
1004 "gdbarch_dump: %s # %s\n",
1005 "DEPRECATED_DUMMY_WRITE_SP(val)",
1006 XSTRING (DEPRECATED_DUMMY_WRITE_SP (val
)));
1007 fprintf_unfiltered (file
,
1008 "gdbarch_dump: DEPRECATED_DUMMY_WRITE_SP = <0x%08lx>\n",
1009 (long) current_gdbarch
->deprecated_dummy_write_sp
1010 /*DEPRECATED_DUMMY_WRITE_SP ()*/);
1012 #ifdef DEPRECATED_EXTRACT_RETURN_VALUE
1013 fprintf_unfiltered (file
,
1014 "gdbarch_dump: %s # %s\n",
1015 "DEPRECATED_EXTRACT_RETURN_VALUE(type, regbuf, valbuf)",
1016 XSTRING (DEPRECATED_EXTRACT_RETURN_VALUE (type
, regbuf
, valbuf
)));
1017 fprintf_unfiltered (file
,
1018 "gdbarch_dump: DEPRECATED_EXTRACT_RETURN_VALUE = <0x%08lx>\n",
1019 (long) current_gdbarch
->deprecated_extract_return_value
1020 /*DEPRECATED_EXTRACT_RETURN_VALUE ()*/);
1022 #ifdef DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P
1023 fprintf_unfiltered (file
,
1024 "gdbarch_dump: %s # %s\n",
1025 "DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P()",
1026 XSTRING (DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P ()));
1027 fprintf_unfiltered (file
,
1028 "gdbarch_dump: DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P() = %d\n",
1029 DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS_P ());
1031 #ifdef DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS
1032 fprintf_unfiltered (file
,
1033 "gdbarch_dump: %s # %s\n",
1034 "DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS(regcache)",
1035 XSTRING (DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS (regcache
)));
1036 fprintf_unfiltered (file
,
1037 "gdbarch_dump: DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS = <0x%08lx>\n",
1038 (long) current_gdbarch
->deprecated_extract_struct_value_address
1039 /*DEPRECATED_EXTRACT_STRUCT_VALUE_ADDRESS ()*/);
1041 #ifdef DEPRECATED_FIX_CALL_DUMMY_P
1042 fprintf_unfiltered (file
,
1043 "gdbarch_dump: %s # %s\n",
1044 "DEPRECATED_FIX_CALL_DUMMY_P()",
1045 XSTRING (DEPRECATED_FIX_CALL_DUMMY_P ()));
1046 fprintf_unfiltered (file
,
1047 "gdbarch_dump: DEPRECATED_FIX_CALL_DUMMY_P() = %d\n",
1048 DEPRECATED_FIX_CALL_DUMMY_P ());
1050 #ifdef DEPRECATED_FIX_CALL_DUMMY
1051 fprintf_unfiltered (file
,
1052 "gdbarch_dump: %s # %s\n",
1053 "DEPRECATED_FIX_CALL_DUMMY(dummy, pc, fun, nargs, args, type, gcc_p)",
1054 XSTRING (DEPRECATED_FIX_CALL_DUMMY (dummy
, pc
, fun
, nargs
, args
, type
, gcc_p
)));
1055 fprintf_unfiltered (file
,
1056 "gdbarch_dump: DEPRECATED_FIX_CALL_DUMMY = <0x%08lx>\n",
1057 (long) current_gdbarch
->deprecated_fix_call_dummy
1058 /*DEPRECATED_FIX_CALL_DUMMY ()*/);
1060 #ifdef DEPRECATED_FP_REGNUM
1061 fprintf_unfiltered (file
,
1062 "gdbarch_dump: DEPRECATED_FP_REGNUM # %s\n",
1063 XSTRING (DEPRECATED_FP_REGNUM
));
1064 fprintf_unfiltered (file
,
1065 "gdbarch_dump: DEPRECATED_FP_REGNUM = %d\n",
1066 DEPRECATED_FP_REGNUM
);
1068 #ifdef DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P
1069 fprintf_unfiltered (file
,
1070 "gdbarch_dump: %s # %s\n",
1071 "DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P()",
1072 XSTRING (DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P ()));
1073 fprintf_unfiltered (file
,
1074 "gdbarch_dump: DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P() = %d\n",
1075 DEPRECATED_FRAMELESS_FUNCTION_INVOCATION_P ());
1077 #ifdef DEPRECATED_FRAMELESS_FUNCTION_INVOCATION
1078 fprintf_unfiltered (file
,
1079 "gdbarch_dump: %s # %s\n",
1080 "DEPRECATED_FRAMELESS_FUNCTION_INVOCATION(fi)",
1081 XSTRING (DEPRECATED_FRAMELESS_FUNCTION_INVOCATION (fi
)));
1082 fprintf_unfiltered (file
,
1083 "gdbarch_dump: DEPRECATED_FRAMELESS_FUNCTION_INVOCATION = <0x%08lx>\n",
1084 (long) current_gdbarch
->deprecated_frameless_function_invocation
1085 /*DEPRECATED_FRAMELESS_FUNCTION_INVOCATION ()*/);
1087 #ifdef DEPRECATED_FRAME_ARGS_ADDRESS_P
1088 fprintf_unfiltered (file
,
1089 "gdbarch_dump: %s # %s\n",
1090 "DEPRECATED_FRAME_ARGS_ADDRESS_P()",
1091 XSTRING (DEPRECATED_FRAME_ARGS_ADDRESS_P ()));
1092 fprintf_unfiltered (file
,
1093 "gdbarch_dump: DEPRECATED_FRAME_ARGS_ADDRESS_P() = %d\n",
1094 DEPRECATED_FRAME_ARGS_ADDRESS_P ());
1096 #ifdef DEPRECATED_FRAME_ARGS_ADDRESS
1097 fprintf_unfiltered (file
,
1098 "gdbarch_dump: %s # %s\n",
1099 "DEPRECATED_FRAME_ARGS_ADDRESS(fi)",
1100 XSTRING (DEPRECATED_FRAME_ARGS_ADDRESS (fi
)));
1101 fprintf_unfiltered (file
,
1102 "gdbarch_dump: DEPRECATED_FRAME_ARGS_ADDRESS = <0x%08lx>\n",
1103 (long) current_gdbarch
->deprecated_frame_args_address
1104 /*DEPRECATED_FRAME_ARGS_ADDRESS ()*/);
1106 #ifdef DEPRECATED_FRAME_CHAIN_P
1107 fprintf_unfiltered (file
,
1108 "gdbarch_dump: %s # %s\n",
1109 "DEPRECATED_FRAME_CHAIN_P()",
1110 XSTRING (DEPRECATED_FRAME_CHAIN_P ()));
1111 fprintf_unfiltered (file
,
1112 "gdbarch_dump: DEPRECATED_FRAME_CHAIN_P() = %d\n",
1113 DEPRECATED_FRAME_CHAIN_P ());
1115 #ifdef DEPRECATED_FRAME_CHAIN
1116 fprintf_unfiltered (file
,
1117 "gdbarch_dump: %s # %s\n",
1118 "DEPRECATED_FRAME_CHAIN(frame)",
1119 XSTRING (DEPRECATED_FRAME_CHAIN (frame
)));
1120 fprintf_unfiltered (file
,
1121 "gdbarch_dump: DEPRECATED_FRAME_CHAIN = <0x%08lx>\n",
1122 (long) current_gdbarch
->deprecated_frame_chain
1123 /*DEPRECATED_FRAME_CHAIN ()*/);
1125 #ifdef DEPRECATED_FRAME_CHAIN_VALID_P
1126 fprintf_unfiltered (file
,
1127 "gdbarch_dump: %s # %s\n",
1128 "DEPRECATED_FRAME_CHAIN_VALID_P()",
1129 XSTRING (DEPRECATED_FRAME_CHAIN_VALID_P ()));
1130 fprintf_unfiltered (file
,
1131 "gdbarch_dump: DEPRECATED_FRAME_CHAIN_VALID_P() = %d\n",
1132 DEPRECATED_FRAME_CHAIN_VALID_P ());
1134 #ifdef DEPRECATED_FRAME_CHAIN_VALID
1135 fprintf_unfiltered (file
,
1136 "gdbarch_dump: %s # %s\n",
1137 "DEPRECATED_FRAME_CHAIN_VALID(chain, thisframe)",
1138 XSTRING (DEPRECATED_FRAME_CHAIN_VALID (chain
, thisframe
)));
1139 fprintf_unfiltered (file
,
1140 "gdbarch_dump: DEPRECATED_FRAME_CHAIN_VALID = <0x%08lx>\n",
1141 (long) current_gdbarch
->deprecated_frame_chain_valid
1142 /*DEPRECATED_FRAME_CHAIN_VALID ()*/);
1144 #ifdef DEPRECATED_FRAME_INIT_SAVED_REGS_P
1145 fprintf_unfiltered (file
,
1146 "gdbarch_dump: %s # %s\n",
1147 "DEPRECATED_FRAME_INIT_SAVED_REGS_P()",
1148 XSTRING (DEPRECATED_FRAME_INIT_SAVED_REGS_P ()));
1149 fprintf_unfiltered (file
,
1150 "gdbarch_dump: DEPRECATED_FRAME_INIT_SAVED_REGS_P() = %d\n",
1151 DEPRECATED_FRAME_INIT_SAVED_REGS_P ());
1153 #ifdef DEPRECATED_FRAME_INIT_SAVED_REGS
1154 fprintf_unfiltered (file
,
1155 "gdbarch_dump: %s # %s\n",
1156 "DEPRECATED_FRAME_INIT_SAVED_REGS(frame)",
1157 XSTRING (DEPRECATED_FRAME_INIT_SAVED_REGS (frame
)));
1158 fprintf_unfiltered (file
,
1159 "gdbarch_dump: DEPRECATED_FRAME_INIT_SAVED_REGS = <0x%08lx>\n",
1160 (long) current_gdbarch
->deprecated_frame_init_saved_regs
1161 /*DEPRECATED_FRAME_INIT_SAVED_REGS ()*/);
1163 #ifdef DEPRECATED_FRAME_LOCALS_ADDRESS_P
1164 fprintf_unfiltered (file
,
1165 "gdbarch_dump: %s # %s\n",
1166 "DEPRECATED_FRAME_LOCALS_ADDRESS_P()",
1167 XSTRING (DEPRECATED_FRAME_LOCALS_ADDRESS_P ()));
1168 fprintf_unfiltered (file
,
1169 "gdbarch_dump: DEPRECATED_FRAME_LOCALS_ADDRESS_P() = %d\n",
1170 DEPRECATED_FRAME_LOCALS_ADDRESS_P ());
1172 #ifdef DEPRECATED_FRAME_LOCALS_ADDRESS
1173 fprintf_unfiltered (file
,
1174 "gdbarch_dump: %s # %s\n",
1175 "DEPRECATED_FRAME_LOCALS_ADDRESS(fi)",
1176 XSTRING (DEPRECATED_FRAME_LOCALS_ADDRESS (fi
)));
1177 fprintf_unfiltered (file
,
1178 "gdbarch_dump: DEPRECATED_FRAME_LOCALS_ADDRESS = <0x%08lx>\n",
1179 (long) current_gdbarch
->deprecated_frame_locals_address
1180 /*DEPRECATED_FRAME_LOCALS_ADDRESS ()*/);
1182 #ifdef DEPRECATED_FRAME_SAVED_PC_P
1183 fprintf_unfiltered (file
,
1184 "gdbarch_dump: %s # %s\n",
1185 "DEPRECATED_FRAME_SAVED_PC_P()",
1186 XSTRING (DEPRECATED_FRAME_SAVED_PC_P ()));
1187 fprintf_unfiltered (file
,
1188 "gdbarch_dump: DEPRECATED_FRAME_SAVED_PC_P() = %d\n",
1189 DEPRECATED_FRAME_SAVED_PC_P ());
1191 #ifdef DEPRECATED_FRAME_SAVED_PC
1192 fprintf_unfiltered (file
,
1193 "gdbarch_dump: %s # %s\n",
1194 "DEPRECATED_FRAME_SAVED_PC(fi)",
1195 XSTRING (DEPRECATED_FRAME_SAVED_PC (fi
)));
1196 fprintf_unfiltered (file
,
1197 "gdbarch_dump: DEPRECATED_FRAME_SAVED_PC = <0x%08lx>\n",
1198 (long) current_gdbarch
->deprecated_frame_saved_pc
1199 /*DEPRECATED_FRAME_SAVED_PC ()*/);
1201 #ifdef DEPRECATED_GET_SAVED_REGISTER_P
1202 fprintf_unfiltered (file
,
1203 "gdbarch_dump: %s # %s\n",
1204 "DEPRECATED_GET_SAVED_REGISTER_P()",
1205 XSTRING (DEPRECATED_GET_SAVED_REGISTER_P ()));
1206 fprintf_unfiltered (file
,
1207 "gdbarch_dump: DEPRECATED_GET_SAVED_REGISTER_P() = %d\n",
1208 DEPRECATED_GET_SAVED_REGISTER_P ());
1210 #ifdef DEPRECATED_GET_SAVED_REGISTER
1211 fprintf_unfiltered (file
,
1212 "gdbarch_dump: %s # %s\n",
1213 "DEPRECATED_GET_SAVED_REGISTER(raw_buffer, optimized, addrp, frame, regnum, lval)",
1214 XSTRING (DEPRECATED_GET_SAVED_REGISTER (raw_buffer
, optimized
, addrp
, frame
, regnum
, lval
)));
1215 fprintf_unfiltered (file
,
1216 "gdbarch_dump: DEPRECATED_GET_SAVED_REGISTER = <0x%08lx>\n",
1217 (long) current_gdbarch
->deprecated_get_saved_register
1218 /*DEPRECATED_GET_SAVED_REGISTER ()*/);
1220 #ifdef DEPRECATED_INIT_EXTRA_FRAME_INFO_P
1221 fprintf_unfiltered (file
,
1222 "gdbarch_dump: %s # %s\n",
1223 "DEPRECATED_INIT_EXTRA_FRAME_INFO_P()",
1224 XSTRING (DEPRECATED_INIT_EXTRA_FRAME_INFO_P ()));
1225 fprintf_unfiltered (file
,
1226 "gdbarch_dump: DEPRECATED_INIT_EXTRA_FRAME_INFO_P() = %d\n",
1227 DEPRECATED_INIT_EXTRA_FRAME_INFO_P ());
1229 #ifdef DEPRECATED_INIT_EXTRA_FRAME_INFO
1230 fprintf_unfiltered (file
,
1231 "gdbarch_dump: %s # %s\n",
1232 "DEPRECATED_INIT_EXTRA_FRAME_INFO(fromleaf, frame)",
1233 XSTRING (DEPRECATED_INIT_EXTRA_FRAME_INFO (fromleaf
, frame
)));
1234 fprintf_unfiltered (file
,
1235 "gdbarch_dump: DEPRECATED_INIT_EXTRA_FRAME_INFO = <0x%08lx>\n",
1236 (long) current_gdbarch
->deprecated_init_extra_frame_info
1237 /*DEPRECATED_INIT_EXTRA_FRAME_INFO ()*/);
1239 #ifdef DEPRECATED_INIT_FRAME_PC_P
1240 fprintf_unfiltered (file
,
1241 "gdbarch_dump: %s # %s\n",
1242 "DEPRECATED_INIT_FRAME_PC_P()",
1243 XSTRING (DEPRECATED_INIT_FRAME_PC_P ()));
1244 fprintf_unfiltered (file
,
1245 "gdbarch_dump: DEPRECATED_INIT_FRAME_PC_P() = %d\n",
1246 DEPRECATED_INIT_FRAME_PC_P ());
1248 #ifdef DEPRECATED_INIT_FRAME_PC
1249 fprintf_unfiltered (file
,
1250 "gdbarch_dump: %s # %s\n",
1251 "DEPRECATED_INIT_FRAME_PC(fromleaf, prev)",
1252 XSTRING (DEPRECATED_INIT_FRAME_PC (fromleaf
, prev
)));
1253 fprintf_unfiltered (file
,
1254 "gdbarch_dump: DEPRECATED_INIT_FRAME_PC = <0x%08lx>\n",
1255 (long) current_gdbarch
->deprecated_init_frame_pc
1256 /*DEPRECATED_INIT_FRAME_PC ()*/);
1258 #ifdef DEPRECATED_MAX_REGISTER_RAW_SIZE_P
1259 fprintf_unfiltered (file
,
1260 "gdbarch_dump: %s # %s\n",
1261 "DEPRECATED_MAX_REGISTER_RAW_SIZE_P()",
1262 XSTRING (DEPRECATED_MAX_REGISTER_RAW_SIZE_P ()));
1263 fprintf_unfiltered (file
,
1264 "gdbarch_dump: DEPRECATED_MAX_REGISTER_RAW_SIZE_P() = %d\n",
1265 DEPRECATED_MAX_REGISTER_RAW_SIZE_P ());
1267 #ifdef DEPRECATED_MAX_REGISTER_RAW_SIZE
1268 fprintf_unfiltered (file
,
1269 "gdbarch_dump: DEPRECATED_MAX_REGISTER_RAW_SIZE # %s\n",
1270 XSTRING (DEPRECATED_MAX_REGISTER_RAW_SIZE
));
1271 fprintf_unfiltered (file
,
1272 "gdbarch_dump: DEPRECATED_MAX_REGISTER_RAW_SIZE = %d\n",
1273 DEPRECATED_MAX_REGISTER_RAW_SIZE
);
1275 #ifdef DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P
1276 fprintf_unfiltered (file
,
1277 "gdbarch_dump: %s # %s\n",
1278 "DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P()",
1279 XSTRING (DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P ()));
1280 fprintf_unfiltered (file
,
1281 "gdbarch_dump: DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P() = %d\n",
1282 DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE_P ());
1284 #ifdef DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE
1285 fprintf_unfiltered (file
,
1286 "gdbarch_dump: DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE # %s\n",
1287 XSTRING (DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE
));
1288 fprintf_unfiltered (file
,
1289 "gdbarch_dump: DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE = %d\n",
1290 DEPRECATED_MAX_REGISTER_VIRTUAL_SIZE
);
1292 #ifdef DEPRECATED_PC_IN_CALL_DUMMY_P
1293 fprintf_unfiltered (file
,
1294 "gdbarch_dump: %s # %s\n",
1295 "DEPRECATED_PC_IN_CALL_DUMMY_P()",
1296 XSTRING (DEPRECATED_PC_IN_CALL_DUMMY_P ()));
1297 fprintf_unfiltered (file
,
1298 "gdbarch_dump: DEPRECATED_PC_IN_CALL_DUMMY_P() = %d\n",
1299 DEPRECATED_PC_IN_CALL_DUMMY_P ());
1301 #ifdef DEPRECATED_PC_IN_CALL_DUMMY
1302 fprintf_unfiltered (file
,
1303 "gdbarch_dump: %s # %s\n",
1304 "DEPRECATED_PC_IN_CALL_DUMMY(pc, sp, frame_address)",
1305 XSTRING (DEPRECATED_PC_IN_CALL_DUMMY (pc
, sp
, frame_address
)));
1306 fprintf_unfiltered (file
,
1307 "gdbarch_dump: DEPRECATED_PC_IN_CALL_DUMMY = <0x%08lx>\n",
1308 (long) current_gdbarch
->deprecated_pc_in_call_dummy
1309 /*DEPRECATED_PC_IN_CALL_DUMMY ()*/);
1311 #ifdef DEPRECATED_PC_IN_SIGTRAMP_P
1312 fprintf_unfiltered (file
,
1313 "gdbarch_dump: %s # %s\n",
1314 "DEPRECATED_PC_IN_SIGTRAMP_P()",
1315 XSTRING (DEPRECATED_PC_IN_SIGTRAMP_P ()));
1316 fprintf_unfiltered (file
,
1317 "gdbarch_dump: DEPRECATED_PC_IN_SIGTRAMP_P() = %d\n",
1318 DEPRECATED_PC_IN_SIGTRAMP_P ());
1320 #ifdef DEPRECATED_PC_IN_SIGTRAMP
1321 fprintf_unfiltered (file
,
1322 "gdbarch_dump: %s # %s\n",
1323 "DEPRECATED_PC_IN_SIGTRAMP(pc, name)",
1324 XSTRING (DEPRECATED_PC_IN_SIGTRAMP (pc
, name
)));
1325 fprintf_unfiltered (file
,
1326 "gdbarch_dump: DEPRECATED_PC_IN_SIGTRAMP = <0x%08lx>\n",
1327 (long) current_gdbarch
->deprecated_pc_in_sigtramp
1328 /*DEPRECATED_PC_IN_SIGTRAMP ()*/);
1330 #ifdef DEPRECATED_POP_FRAME_P
1331 fprintf_unfiltered (file
,
1332 "gdbarch_dump: %s # %s\n",
1333 "DEPRECATED_POP_FRAME_P()",
1334 XSTRING (DEPRECATED_POP_FRAME_P ()));
1335 fprintf_unfiltered (file
,
1336 "gdbarch_dump: DEPRECATED_POP_FRAME_P() = %d\n",
1337 DEPRECATED_POP_FRAME_P ());
1339 #ifdef DEPRECATED_POP_FRAME
1340 fprintf_unfiltered (file
,
1341 "gdbarch_dump: %s # %s\n",
1342 "DEPRECATED_POP_FRAME(-)",
1343 XSTRING (DEPRECATED_POP_FRAME (-)));
1344 fprintf_unfiltered (file
,
1345 "gdbarch_dump: DEPRECATED_POP_FRAME = <0x%08lx>\n",
1346 (long) current_gdbarch
->deprecated_pop_frame
1347 /*DEPRECATED_POP_FRAME ()*/);
1349 #ifdef DEPRECATED_PUSH_ARGUMENTS_P
1350 fprintf_unfiltered (file
,
1351 "gdbarch_dump: %s # %s\n",
1352 "DEPRECATED_PUSH_ARGUMENTS_P()",
1353 XSTRING (DEPRECATED_PUSH_ARGUMENTS_P ()));
1354 fprintf_unfiltered (file
,
1355 "gdbarch_dump: DEPRECATED_PUSH_ARGUMENTS_P() = %d\n",
1356 DEPRECATED_PUSH_ARGUMENTS_P ());
1358 #ifdef DEPRECATED_PUSH_ARGUMENTS
1359 fprintf_unfiltered (file
,
1360 "gdbarch_dump: %s # %s\n",
1361 "DEPRECATED_PUSH_ARGUMENTS(nargs, args, sp, struct_return, struct_addr)",
1362 XSTRING (DEPRECATED_PUSH_ARGUMENTS (nargs
, args
, sp
, struct_return
, struct_addr
)));
1363 fprintf_unfiltered (file
,
1364 "gdbarch_dump: DEPRECATED_PUSH_ARGUMENTS = <0x%08lx>\n",
1365 (long) current_gdbarch
->deprecated_push_arguments
1366 /*DEPRECATED_PUSH_ARGUMENTS ()*/);
1368 #ifdef DEPRECATED_PUSH_DUMMY_FRAME_P
1369 fprintf_unfiltered (file
,
1370 "gdbarch_dump: %s # %s\n",
1371 "DEPRECATED_PUSH_DUMMY_FRAME_P()",
1372 XSTRING (DEPRECATED_PUSH_DUMMY_FRAME_P ()));
1373 fprintf_unfiltered (file
,
1374 "gdbarch_dump: DEPRECATED_PUSH_DUMMY_FRAME_P() = %d\n",
1375 DEPRECATED_PUSH_DUMMY_FRAME_P ());
1377 #ifdef DEPRECATED_PUSH_DUMMY_FRAME
1378 fprintf_unfiltered (file
,
1379 "gdbarch_dump: %s # %s\n",
1380 "DEPRECATED_PUSH_DUMMY_FRAME(-)",
1381 XSTRING (DEPRECATED_PUSH_DUMMY_FRAME (-)));
1382 fprintf_unfiltered (file
,
1383 "gdbarch_dump: DEPRECATED_PUSH_DUMMY_FRAME = <0x%08lx>\n",
1384 (long) current_gdbarch
->deprecated_push_dummy_frame
1385 /*DEPRECATED_PUSH_DUMMY_FRAME ()*/);
1387 #ifdef DEPRECATED_PUSH_RETURN_ADDRESS_P
1388 fprintf_unfiltered (file
,
1389 "gdbarch_dump: %s # %s\n",
1390 "DEPRECATED_PUSH_RETURN_ADDRESS_P()",
1391 XSTRING (DEPRECATED_PUSH_RETURN_ADDRESS_P ()));
1392 fprintf_unfiltered (file
,
1393 "gdbarch_dump: DEPRECATED_PUSH_RETURN_ADDRESS_P() = %d\n",
1394 DEPRECATED_PUSH_RETURN_ADDRESS_P ());
1396 #ifdef DEPRECATED_PUSH_RETURN_ADDRESS
1397 fprintf_unfiltered (file
,
1398 "gdbarch_dump: %s # %s\n",
1399 "DEPRECATED_PUSH_RETURN_ADDRESS(pc, sp)",
1400 XSTRING (DEPRECATED_PUSH_RETURN_ADDRESS (pc
, sp
)));
1401 fprintf_unfiltered (file
,
1402 "gdbarch_dump: DEPRECATED_PUSH_RETURN_ADDRESS = <0x%08lx>\n",
1403 (long) current_gdbarch
->deprecated_push_return_address
1404 /*DEPRECATED_PUSH_RETURN_ADDRESS ()*/);
1406 #ifdef DEPRECATED_REGISTER_BYTE_P
1407 fprintf_unfiltered (file
,
1408 "gdbarch_dump: %s # %s\n",
1409 "DEPRECATED_REGISTER_BYTE_P()",
1410 XSTRING (DEPRECATED_REGISTER_BYTE_P ()));
1411 fprintf_unfiltered (file
,
1412 "gdbarch_dump: DEPRECATED_REGISTER_BYTE_P() = %d\n",
1413 DEPRECATED_REGISTER_BYTE_P ());
1415 #ifdef DEPRECATED_REGISTER_BYTE
1416 fprintf_unfiltered (file
,
1417 "gdbarch_dump: %s # %s\n",
1418 "DEPRECATED_REGISTER_BYTE(reg_nr)",
1419 XSTRING (DEPRECATED_REGISTER_BYTE (reg_nr
)));
1420 fprintf_unfiltered (file
,
1421 "gdbarch_dump: DEPRECATED_REGISTER_BYTE = <0x%08lx>\n",
1422 (long) current_gdbarch
->deprecated_register_byte
1423 /*DEPRECATED_REGISTER_BYTE ()*/);
1425 #ifdef DEPRECATED_REGISTER_BYTES
1426 fprintf_unfiltered (file
,
1427 "gdbarch_dump: DEPRECATED_REGISTER_BYTES # %s\n",
1428 XSTRING (DEPRECATED_REGISTER_BYTES
));
1429 fprintf_unfiltered (file
,
1430 "gdbarch_dump: DEPRECATED_REGISTER_BYTES = %d\n",
1431 DEPRECATED_REGISTER_BYTES
);
1433 #ifdef DEPRECATED_REGISTER_CONVERTIBLE_P
1434 fprintf_unfiltered (file
,
1435 "gdbarch_dump: %s # %s\n",
1436 "DEPRECATED_REGISTER_CONVERTIBLE_P()",
1437 XSTRING (DEPRECATED_REGISTER_CONVERTIBLE_P ()));
1438 fprintf_unfiltered (file
,
1439 "gdbarch_dump: DEPRECATED_REGISTER_CONVERTIBLE_P() = %d\n",
1440 DEPRECATED_REGISTER_CONVERTIBLE_P ());
1442 #ifdef DEPRECATED_REGISTER_CONVERTIBLE
1443 fprintf_unfiltered (file
,
1444 "gdbarch_dump: %s # %s\n",
1445 "DEPRECATED_REGISTER_CONVERTIBLE(nr)",
1446 XSTRING (DEPRECATED_REGISTER_CONVERTIBLE (nr
)));
1447 fprintf_unfiltered (file
,
1448 "gdbarch_dump: DEPRECATED_REGISTER_CONVERTIBLE = <0x%08lx>\n",
1449 (long) current_gdbarch
->deprecated_register_convertible
1450 /*DEPRECATED_REGISTER_CONVERTIBLE ()*/);
1452 #ifdef DEPRECATED_REGISTER_CONVERT_TO_RAW
1453 fprintf_unfiltered (file
,
1454 "gdbarch_dump: %s # %s\n",
1455 "DEPRECATED_REGISTER_CONVERT_TO_RAW(type, regnum, from, to)",
1456 XSTRING (DEPRECATED_REGISTER_CONVERT_TO_RAW (type
, regnum
, from
, to
)));
1457 fprintf_unfiltered (file
,
1458 "gdbarch_dump: DEPRECATED_REGISTER_CONVERT_TO_RAW = <0x%08lx>\n",
1459 (long) current_gdbarch
->deprecated_register_convert_to_raw
1460 /*DEPRECATED_REGISTER_CONVERT_TO_RAW ()*/);
1462 #ifdef DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL
1463 fprintf_unfiltered (file
,
1464 "gdbarch_dump: %s # %s\n",
1465 "DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL(regnum, type, from, to)",
1466 XSTRING (DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL (regnum
, type
, from
, to
)));
1467 fprintf_unfiltered (file
,
1468 "gdbarch_dump: DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL = <0x%08lx>\n",
1469 (long) current_gdbarch
->deprecated_register_convert_to_virtual
1470 /*DEPRECATED_REGISTER_CONVERT_TO_VIRTUAL ()*/);
1472 #ifdef DEPRECATED_REGISTER_RAW_SIZE_P
1473 fprintf_unfiltered (file
,
1474 "gdbarch_dump: %s # %s\n",
1475 "DEPRECATED_REGISTER_RAW_SIZE_P()",
1476 XSTRING (DEPRECATED_REGISTER_RAW_SIZE_P ()));
1477 fprintf_unfiltered (file
,
1478 "gdbarch_dump: DEPRECATED_REGISTER_RAW_SIZE_P() = %d\n",
1479 DEPRECATED_REGISTER_RAW_SIZE_P ());
1481 #ifdef DEPRECATED_REGISTER_RAW_SIZE
1482 fprintf_unfiltered (file
,
1483 "gdbarch_dump: %s # %s\n",
1484 "DEPRECATED_REGISTER_RAW_SIZE(reg_nr)",
1485 XSTRING (DEPRECATED_REGISTER_RAW_SIZE (reg_nr
)));
1486 fprintf_unfiltered (file
,
1487 "gdbarch_dump: DEPRECATED_REGISTER_RAW_SIZE = <0x%08lx>\n",
1488 (long) current_gdbarch
->deprecated_register_raw_size
1489 /*DEPRECATED_REGISTER_RAW_SIZE ()*/);
1491 #ifdef DEPRECATED_REGISTER_SIZE
1492 fprintf_unfiltered (file
,
1493 "gdbarch_dump: DEPRECATED_REGISTER_SIZE # %s\n",
1494 XSTRING (DEPRECATED_REGISTER_SIZE
));
1495 fprintf_unfiltered (file
,
1496 "gdbarch_dump: DEPRECATED_REGISTER_SIZE = %d\n",
1497 DEPRECATED_REGISTER_SIZE
);
1499 #ifdef DEPRECATED_REGISTER_VIRTUAL_SIZE_P
1500 fprintf_unfiltered (file
,
1501 "gdbarch_dump: %s # %s\n",
1502 "DEPRECATED_REGISTER_VIRTUAL_SIZE_P()",
1503 XSTRING (DEPRECATED_REGISTER_VIRTUAL_SIZE_P ()));
1504 fprintf_unfiltered (file
,
1505 "gdbarch_dump: DEPRECATED_REGISTER_VIRTUAL_SIZE_P() = %d\n",
1506 DEPRECATED_REGISTER_VIRTUAL_SIZE_P ());
1508 #ifdef DEPRECATED_REGISTER_VIRTUAL_SIZE
1509 fprintf_unfiltered (file
,
1510 "gdbarch_dump: %s # %s\n",
1511 "DEPRECATED_REGISTER_VIRTUAL_SIZE(reg_nr)",
1512 XSTRING (DEPRECATED_REGISTER_VIRTUAL_SIZE (reg_nr
)));
1513 fprintf_unfiltered (file
,
1514 "gdbarch_dump: DEPRECATED_REGISTER_VIRTUAL_SIZE = <0x%08lx>\n",
1515 (long) current_gdbarch
->deprecated_register_virtual_size
1516 /*DEPRECATED_REGISTER_VIRTUAL_SIZE ()*/);
1518 #ifdef DEPRECATED_REGISTER_VIRTUAL_TYPE_P
1519 fprintf_unfiltered (file
,
1520 "gdbarch_dump: %s # %s\n",
1521 "DEPRECATED_REGISTER_VIRTUAL_TYPE_P()",
1522 XSTRING (DEPRECATED_REGISTER_VIRTUAL_TYPE_P ()));
1523 fprintf_unfiltered (file
,
1524 "gdbarch_dump: DEPRECATED_REGISTER_VIRTUAL_TYPE_P() = %d\n",
1525 DEPRECATED_REGISTER_VIRTUAL_TYPE_P ());
1527 #ifdef DEPRECATED_REGISTER_VIRTUAL_TYPE
1528 fprintf_unfiltered (file
,
1529 "gdbarch_dump: %s # %s\n",
1530 "DEPRECATED_REGISTER_VIRTUAL_TYPE(reg_nr)",
1531 XSTRING (DEPRECATED_REGISTER_VIRTUAL_TYPE (reg_nr
)));
1532 fprintf_unfiltered (file
,
1533 "gdbarch_dump: DEPRECATED_REGISTER_VIRTUAL_TYPE = <0x%08lx>\n",
1534 (long) current_gdbarch
->deprecated_register_virtual_type
1535 /*DEPRECATED_REGISTER_VIRTUAL_TYPE ()*/);
1537 #ifdef DEPRECATED_REG_STRUCT_HAS_ADDR_P
1538 fprintf_unfiltered (file
,
1539 "gdbarch_dump: %s # %s\n",
1540 "DEPRECATED_REG_STRUCT_HAS_ADDR_P()",
1541 XSTRING (DEPRECATED_REG_STRUCT_HAS_ADDR_P ()));
1542 fprintf_unfiltered (file
,
1543 "gdbarch_dump: DEPRECATED_REG_STRUCT_HAS_ADDR_P() = %d\n",
1544 DEPRECATED_REG_STRUCT_HAS_ADDR_P ());
1546 #ifdef DEPRECATED_REG_STRUCT_HAS_ADDR
1547 fprintf_unfiltered (file
,
1548 "gdbarch_dump: %s # %s\n",
1549 "DEPRECATED_REG_STRUCT_HAS_ADDR(gcc_p, type)",
1550 XSTRING (DEPRECATED_REG_STRUCT_HAS_ADDR (gcc_p
, type
)));
1551 fprintf_unfiltered (file
,
1552 "gdbarch_dump: DEPRECATED_REG_STRUCT_HAS_ADDR = <0x%08lx>\n",
1553 (long) current_gdbarch
->deprecated_reg_struct_has_addr
1554 /*DEPRECATED_REG_STRUCT_HAS_ADDR ()*/);
1556 #ifdef DEPRECATED_SAVED_PC_AFTER_CALL_P
1557 fprintf_unfiltered (file
,
1558 "gdbarch_dump: %s # %s\n",
1559 "DEPRECATED_SAVED_PC_AFTER_CALL_P()",
1560 XSTRING (DEPRECATED_SAVED_PC_AFTER_CALL_P ()));
1561 fprintf_unfiltered (file
,
1562 "gdbarch_dump: DEPRECATED_SAVED_PC_AFTER_CALL_P() = %d\n",
1563 DEPRECATED_SAVED_PC_AFTER_CALL_P ());
1565 #ifdef DEPRECATED_SAVED_PC_AFTER_CALL
1566 fprintf_unfiltered (file
,
1567 "gdbarch_dump: %s # %s\n",
1568 "DEPRECATED_SAVED_PC_AFTER_CALL(frame)",
1569 XSTRING (DEPRECATED_SAVED_PC_AFTER_CALL (frame
)));
1570 fprintf_unfiltered (file
,
1571 "gdbarch_dump: DEPRECATED_SAVED_PC_AFTER_CALL = <0x%08lx>\n",
1572 (long) current_gdbarch
->deprecated_saved_pc_after_call
1573 /*DEPRECATED_SAVED_PC_AFTER_CALL ()*/);
1575 #ifdef DEPRECATED_SAVE_DUMMY_FRAME_TOS_P
1576 fprintf_unfiltered (file
,
1577 "gdbarch_dump: %s # %s\n",
1578 "DEPRECATED_SAVE_DUMMY_FRAME_TOS_P()",
1579 XSTRING (DEPRECATED_SAVE_DUMMY_FRAME_TOS_P ()));
1580 fprintf_unfiltered (file
,
1581 "gdbarch_dump: DEPRECATED_SAVE_DUMMY_FRAME_TOS_P() = %d\n",
1582 DEPRECATED_SAVE_DUMMY_FRAME_TOS_P ());
1584 #ifdef DEPRECATED_SAVE_DUMMY_FRAME_TOS
1585 fprintf_unfiltered (file
,
1586 "gdbarch_dump: %s # %s\n",
1587 "DEPRECATED_SAVE_DUMMY_FRAME_TOS(sp)",
1588 XSTRING (DEPRECATED_SAVE_DUMMY_FRAME_TOS (sp
)));
1589 fprintf_unfiltered (file
,
1590 "gdbarch_dump: DEPRECATED_SAVE_DUMMY_FRAME_TOS = <0x%08lx>\n",
1591 (long) current_gdbarch
->deprecated_save_dummy_frame_tos
1592 /*DEPRECATED_SAVE_DUMMY_FRAME_TOS ()*/);
1594 #ifdef DEPRECATED_SIGTRAMP_END_P
1595 fprintf_unfiltered (file
,
1596 "gdbarch_dump: %s # %s\n",
1597 "DEPRECATED_SIGTRAMP_END_P()",
1598 XSTRING (DEPRECATED_SIGTRAMP_END_P ()));
1599 fprintf_unfiltered (file
,
1600 "gdbarch_dump: DEPRECATED_SIGTRAMP_END_P() = %d\n",
1601 DEPRECATED_SIGTRAMP_END_P ());
1603 #ifdef DEPRECATED_SIGTRAMP_END
1604 fprintf_unfiltered (file
,
1605 "gdbarch_dump: %s # %s\n",
1606 "DEPRECATED_SIGTRAMP_END(pc)",
1607 XSTRING (DEPRECATED_SIGTRAMP_END (pc
)));
1608 fprintf_unfiltered (file
,
1609 "gdbarch_dump: DEPRECATED_SIGTRAMP_END = <0x%08lx>\n",
1610 (long) current_gdbarch
->deprecated_sigtramp_end
1611 /*DEPRECATED_SIGTRAMP_END ()*/);
1613 #ifdef DEPRECATED_SIGTRAMP_START_P
1614 fprintf_unfiltered (file
,
1615 "gdbarch_dump: %s # %s\n",
1616 "DEPRECATED_SIGTRAMP_START_P()",
1617 XSTRING (DEPRECATED_SIGTRAMP_START_P ()));
1618 fprintf_unfiltered (file
,
1619 "gdbarch_dump: DEPRECATED_SIGTRAMP_START_P() = %d\n",
1620 DEPRECATED_SIGTRAMP_START_P ());
1622 #ifdef DEPRECATED_SIGTRAMP_START
1623 fprintf_unfiltered (file
,
1624 "gdbarch_dump: %s # %s\n",
1625 "DEPRECATED_SIGTRAMP_START(pc)",
1626 XSTRING (DEPRECATED_SIGTRAMP_START (pc
)));
1627 fprintf_unfiltered (file
,
1628 "gdbarch_dump: DEPRECATED_SIGTRAMP_START = <0x%08lx>\n",
1629 (long) current_gdbarch
->deprecated_sigtramp_start
1630 /*DEPRECATED_SIGTRAMP_START ()*/);
1632 #ifdef DEPRECATED_SIZEOF_CALL_DUMMY_WORDS
1633 fprintf_unfiltered (file
,
1634 "gdbarch_dump: DEPRECATED_SIZEOF_CALL_DUMMY_WORDS # %s\n",
1635 XSTRING (DEPRECATED_SIZEOF_CALL_DUMMY_WORDS
));
1636 fprintf_unfiltered (file
,
1637 "gdbarch_dump: DEPRECATED_SIZEOF_CALL_DUMMY_WORDS = %d\n",
1638 DEPRECATED_SIZEOF_CALL_DUMMY_WORDS
);
1640 #ifdef DEPRECATED_STACK_ALIGN_P
1641 fprintf_unfiltered (file
,
1642 "gdbarch_dump: %s # %s\n",
1643 "DEPRECATED_STACK_ALIGN_P()",
1644 XSTRING (DEPRECATED_STACK_ALIGN_P ()));
1645 fprintf_unfiltered (file
,
1646 "gdbarch_dump: DEPRECATED_STACK_ALIGN_P() = %d\n",
1647 DEPRECATED_STACK_ALIGN_P ());
1649 #ifdef DEPRECATED_STACK_ALIGN
1650 fprintf_unfiltered (file
,
1651 "gdbarch_dump: %s # %s\n",
1652 "DEPRECATED_STACK_ALIGN(sp)",
1653 XSTRING (DEPRECATED_STACK_ALIGN (sp
)));
1654 fprintf_unfiltered (file
,
1655 "gdbarch_dump: DEPRECATED_STACK_ALIGN = <0x%08lx>\n",
1656 (long) current_gdbarch
->deprecated_stack_align
1657 /*DEPRECATED_STACK_ALIGN ()*/);
1659 #ifdef DEPRECATED_STORE_RETURN_VALUE
1660 fprintf_unfiltered (file
,
1661 "gdbarch_dump: %s # %s\n",
1662 "DEPRECATED_STORE_RETURN_VALUE(type, valbuf)",
1663 XSTRING (DEPRECATED_STORE_RETURN_VALUE (type
, valbuf
)));
1664 fprintf_unfiltered (file
,
1665 "gdbarch_dump: DEPRECATED_STORE_RETURN_VALUE = <0x%08lx>\n",
1666 (long) current_gdbarch
->deprecated_store_return_value
1667 /*DEPRECATED_STORE_RETURN_VALUE ()*/);
1669 #ifdef DEPRECATED_STORE_STRUCT_RETURN_P
1670 fprintf_unfiltered (file
,
1671 "gdbarch_dump: %s # %s\n",
1672 "DEPRECATED_STORE_STRUCT_RETURN_P()",
1673 XSTRING (DEPRECATED_STORE_STRUCT_RETURN_P ()));
1674 fprintf_unfiltered (file
,
1675 "gdbarch_dump: DEPRECATED_STORE_STRUCT_RETURN_P() = %d\n",
1676 DEPRECATED_STORE_STRUCT_RETURN_P ());
1678 #ifdef DEPRECATED_STORE_STRUCT_RETURN
1679 fprintf_unfiltered (file
,
1680 "gdbarch_dump: %s # %s\n",
1681 "DEPRECATED_STORE_STRUCT_RETURN(addr, sp)",
1682 XSTRING (DEPRECATED_STORE_STRUCT_RETURN (addr
, sp
)));
1683 fprintf_unfiltered (file
,
1684 "gdbarch_dump: DEPRECATED_STORE_STRUCT_RETURN = <0x%08lx>\n",
1685 (long) current_gdbarch
->deprecated_store_struct_return
1686 /*DEPRECATED_STORE_STRUCT_RETURN ()*/);
1688 #ifdef DEPRECATED_TARGET_READ_FP_P
1689 fprintf_unfiltered (file
,
1690 "gdbarch_dump: %s # %s\n",
1691 "DEPRECATED_TARGET_READ_FP_P()",
1692 XSTRING (DEPRECATED_TARGET_READ_FP_P ()));
1693 fprintf_unfiltered (file
,
1694 "gdbarch_dump: DEPRECATED_TARGET_READ_FP_P() = %d\n",
1695 DEPRECATED_TARGET_READ_FP_P ());
1697 #ifdef DEPRECATED_TARGET_READ_FP
1698 fprintf_unfiltered (file
,
1699 "gdbarch_dump: %s # %s\n",
1700 "DEPRECATED_TARGET_READ_FP()",
1701 XSTRING (DEPRECATED_TARGET_READ_FP ()));
1702 fprintf_unfiltered (file
,
1703 "gdbarch_dump: DEPRECATED_TARGET_READ_FP = <0x%08lx>\n",
1704 (long) current_gdbarch
->deprecated_target_read_fp
1705 /*DEPRECATED_TARGET_READ_FP ()*/);
1707 #ifdef DEPRECATED_USE_GENERIC_DUMMY_FRAMES
1708 fprintf_unfiltered (file
,
1709 "gdbarch_dump: DEPRECATED_USE_GENERIC_DUMMY_FRAMES # %s\n",
1710 XSTRING (DEPRECATED_USE_GENERIC_DUMMY_FRAMES
));
1711 fprintf_unfiltered (file
,
1712 "gdbarch_dump: DEPRECATED_USE_GENERIC_DUMMY_FRAMES = %d\n",
1713 DEPRECATED_USE_GENERIC_DUMMY_FRAMES
);
1715 #ifdef DWARF2_REG_TO_REGNUM
1716 fprintf_unfiltered (file
,
1717 "gdbarch_dump: %s # %s\n",
1718 "DWARF2_REG_TO_REGNUM(dwarf2_regnr)",
1719 XSTRING (DWARF2_REG_TO_REGNUM (dwarf2_regnr
)));
1720 fprintf_unfiltered (file
,
1721 "gdbarch_dump: DWARF2_REG_TO_REGNUM = <0x%08lx>\n",
1722 (long) current_gdbarch
->dwarf2_reg_to_regnum
1723 /*DWARF2_REG_TO_REGNUM ()*/);
1725 #ifdef DWARF_REG_TO_REGNUM
1726 fprintf_unfiltered (file
,
1727 "gdbarch_dump: %s # %s\n",
1728 "DWARF_REG_TO_REGNUM(dwarf_regnr)",
1729 XSTRING (DWARF_REG_TO_REGNUM (dwarf_regnr
)));
1730 fprintf_unfiltered (file
,
1731 "gdbarch_dump: DWARF_REG_TO_REGNUM = <0x%08lx>\n",
1732 (long) current_gdbarch
->dwarf_reg_to_regnum
1733 /*DWARF_REG_TO_REGNUM ()*/);
1735 #ifdef ECOFF_REG_TO_REGNUM
1736 fprintf_unfiltered (file
,
1737 "gdbarch_dump: %s # %s\n",
1738 "ECOFF_REG_TO_REGNUM(ecoff_regnr)",
1739 XSTRING (ECOFF_REG_TO_REGNUM (ecoff_regnr
)));
1740 fprintf_unfiltered (file
,
1741 "gdbarch_dump: ECOFF_REG_TO_REGNUM = <0x%08lx>\n",
1742 (long) current_gdbarch
->ecoff_reg_to_regnum
1743 /*ECOFF_REG_TO_REGNUM ()*/);
1745 #ifdef ELF_MAKE_MSYMBOL_SPECIAL
1746 fprintf_unfiltered (file
,
1747 "gdbarch_dump: %s # %s\n",
1748 "ELF_MAKE_MSYMBOL_SPECIAL(sym, msym)",
1749 XSTRING (ELF_MAKE_MSYMBOL_SPECIAL (sym
, msym
)));
1750 fprintf_unfiltered (file
,
1751 "gdbarch_dump: ELF_MAKE_MSYMBOL_SPECIAL = <0x%08lx>\n",
1752 (long) current_gdbarch
->elf_make_msymbol_special
1753 /*ELF_MAKE_MSYMBOL_SPECIAL ()*/);
1755 #ifdef EXTRACT_RETURN_VALUE
1756 fprintf_unfiltered (file
,
1757 "gdbarch_dump: %s # %s\n",
1758 "EXTRACT_RETURN_VALUE(type, regcache, valbuf)",
1759 XSTRING (EXTRACT_RETURN_VALUE (type
, regcache
, valbuf
)));
1760 fprintf_unfiltered (file
,
1761 "gdbarch_dump: EXTRACT_RETURN_VALUE = <0x%08lx>\n",
1762 (long) current_gdbarch
->extract_return_value
1763 /*EXTRACT_RETURN_VALUE ()*/);
1765 #ifdef FETCH_POINTER_ARGUMENT_P
1766 fprintf_unfiltered (file
,
1767 "gdbarch_dump: %s # %s\n",
1768 "FETCH_POINTER_ARGUMENT_P()",
1769 XSTRING (FETCH_POINTER_ARGUMENT_P ()));
1770 fprintf_unfiltered (file
,
1771 "gdbarch_dump: FETCH_POINTER_ARGUMENT_P() = %d\n",
1772 FETCH_POINTER_ARGUMENT_P ());
1774 #ifdef FETCH_POINTER_ARGUMENT
1775 fprintf_unfiltered (file
,
1776 "gdbarch_dump: %s # %s\n",
1777 "FETCH_POINTER_ARGUMENT(frame, argi, type)",
1778 XSTRING (FETCH_POINTER_ARGUMENT (frame
, argi
, type
)));
1779 fprintf_unfiltered (file
,
1780 "gdbarch_dump: FETCH_POINTER_ARGUMENT = <0x%08lx>\n",
1781 (long) current_gdbarch
->fetch_pointer_argument
1782 /*FETCH_POINTER_ARGUMENT ()*/);
1785 fprintf_unfiltered (file
,
1786 "gdbarch_dump: FP0_REGNUM # %s\n",
1787 XSTRING (FP0_REGNUM
));
1788 fprintf_unfiltered (file
,
1789 "gdbarch_dump: FP0_REGNUM = %d\n",
1792 #ifdef FRAME_ARGS_SKIP
1793 fprintf_unfiltered (file
,
1794 "gdbarch_dump: FRAME_ARGS_SKIP # %s\n",
1795 XSTRING (FRAME_ARGS_SKIP
));
1796 fprintf_unfiltered (file
,
1797 "gdbarch_dump: FRAME_ARGS_SKIP = %ld\n",
1798 (long) FRAME_ARGS_SKIP
);
1800 #ifdef FRAME_NUM_ARGS_P
1801 fprintf_unfiltered (file
,
1802 "gdbarch_dump: %s # %s\n",
1803 "FRAME_NUM_ARGS_P()",
1804 XSTRING (FRAME_NUM_ARGS_P ()));
1805 fprintf_unfiltered (file
,
1806 "gdbarch_dump: FRAME_NUM_ARGS_P() = %d\n",
1807 FRAME_NUM_ARGS_P ());
1809 #ifdef FRAME_NUM_ARGS
1810 fprintf_unfiltered (file
,
1811 "gdbarch_dump: %s # %s\n",
1812 "FRAME_NUM_ARGS(frame)",
1813 XSTRING (FRAME_NUM_ARGS (frame
)));
1814 fprintf_unfiltered (file
,
1815 "gdbarch_dump: FRAME_NUM_ARGS = <0x%08lx>\n",
1816 (long) current_gdbarch
->frame_num_args
1817 /*FRAME_NUM_ARGS ()*/);
1819 #ifdef FRAME_RED_ZONE_SIZE
1820 fprintf_unfiltered (file
,
1821 "gdbarch_dump: FRAME_RED_ZONE_SIZE # %s\n",
1822 XSTRING (FRAME_RED_ZONE_SIZE
));
1823 fprintf_unfiltered (file
,
1824 "gdbarch_dump: FRAME_RED_ZONE_SIZE = %d\n",
1825 FRAME_RED_ZONE_SIZE
);
1827 #ifdef FUNCTION_START_OFFSET
1828 fprintf_unfiltered (file
,
1829 "gdbarch_dump: FUNCTION_START_OFFSET # %s\n",
1830 XSTRING (FUNCTION_START_OFFSET
));
1831 fprintf_unfiltered (file
,
1832 "gdbarch_dump: FUNCTION_START_OFFSET = %ld\n",
1833 (long) FUNCTION_START_OFFSET
);
1835 #ifdef GET_LONGJMP_TARGET_P
1836 fprintf_unfiltered (file
,
1837 "gdbarch_dump: %s # %s\n",
1838 "GET_LONGJMP_TARGET_P()",
1839 XSTRING (GET_LONGJMP_TARGET_P ()));
1840 fprintf_unfiltered (file
,
1841 "gdbarch_dump: GET_LONGJMP_TARGET_P() = %d\n",
1842 GET_LONGJMP_TARGET_P ());
1844 #ifdef GET_LONGJMP_TARGET
1845 fprintf_unfiltered (file
,
1846 "gdbarch_dump: %s # %s\n",
1847 "GET_LONGJMP_TARGET(pc)",
1848 XSTRING (GET_LONGJMP_TARGET (pc
)));
1849 fprintf_unfiltered (file
,
1850 "gdbarch_dump: GET_LONGJMP_TARGET = <0x%08lx>\n",
1851 (long) current_gdbarch
->get_longjmp_target
1852 /*GET_LONGJMP_TARGET ()*/);
1854 #ifdef HAVE_NONSTEPPABLE_WATCHPOINT
1855 fprintf_unfiltered (file
,
1856 "gdbarch_dump: HAVE_NONSTEPPABLE_WATCHPOINT # %s\n",
1857 XSTRING (HAVE_NONSTEPPABLE_WATCHPOINT
));
1858 fprintf_unfiltered (file
,
1859 "gdbarch_dump: HAVE_NONSTEPPABLE_WATCHPOINT = %d\n",
1860 HAVE_NONSTEPPABLE_WATCHPOINT
);
1863 fprintf_unfiltered (file
,
1864 "gdbarch_dump: %s # %s\n",
1865 "INNER_THAN(lhs, rhs)",
1866 XSTRING (INNER_THAN (lhs
, rhs
)));
1867 fprintf_unfiltered (file
,
1868 "gdbarch_dump: INNER_THAN = <0x%08lx>\n",
1869 (long) current_gdbarch
->inner_than
1872 #ifdef INTEGER_TO_ADDRESS_P
1873 fprintf_unfiltered (file
,
1874 "gdbarch_dump: %s # %s\n",
1875 "INTEGER_TO_ADDRESS_P()",
1876 XSTRING (INTEGER_TO_ADDRESS_P ()));
1877 fprintf_unfiltered (file
,
1878 "gdbarch_dump: INTEGER_TO_ADDRESS_P() = %d\n",
1879 INTEGER_TO_ADDRESS_P ());
1881 #ifdef INTEGER_TO_ADDRESS
1882 fprintf_unfiltered (file
,
1883 "gdbarch_dump: %s # %s\n",
1884 "INTEGER_TO_ADDRESS(type, buf)",
1885 XSTRING (INTEGER_TO_ADDRESS (type
, buf
)));
1886 fprintf_unfiltered (file
,
1887 "gdbarch_dump: INTEGER_TO_ADDRESS = <0x%08lx>\n",
1888 (long) current_gdbarch
->integer_to_address
1889 /*INTEGER_TO_ADDRESS ()*/);
1891 #ifdef IN_SOLIB_CALL_TRAMPOLINE
1892 fprintf_unfiltered (file
,
1893 "gdbarch_dump: %s # %s\n",
1894 "IN_SOLIB_CALL_TRAMPOLINE(pc, name)",
1895 XSTRING (IN_SOLIB_CALL_TRAMPOLINE (pc
, name
)));
1896 fprintf_unfiltered (file
,
1897 "gdbarch_dump: IN_SOLIB_CALL_TRAMPOLINE = <0x%08lx>\n",
1898 (long) current_gdbarch
->in_solib_call_trampoline
1899 /*IN_SOLIB_CALL_TRAMPOLINE ()*/);
1901 #ifdef IN_SOLIB_RETURN_TRAMPOLINE
1902 fprintf_unfiltered (file
,
1903 "gdbarch_dump: %s # %s\n",
1904 "IN_SOLIB_RETURN_TRAMPOLINE(pc, name)",
1905 XSTRING (IN_SOLIB_RETURN_TRAMPOLINE (pc
, name
)));
1906 fprintf_unfiltered (file
,
1907 "gdbarch_dump: IN_SOLIB_RETURN_TRAMPOLINE = <0x%08lx>\n",
1908 (long) current_gdbarch
->in_solib_return_trampoline
1909 /*IN_SOLIB_RETURN_TRAMPOLINE ()*/);
1911 #ifdef MEMORY_INSERT_BREAKPOINT
1912 fprintf_unfiltered (file
,
1913 "gdbarch_dump: %s # %s\n",
1914 "MEMORY_INSERT_BREAKPOINT(addr, contents_cache)",
1915 XSTRING (MEMORY_INSERT_BREAKPOINT (addr
, contents_cache
)));
1916 fprintf_unfiltered (file
,
1917 "gdbarch_dump: MEMORY_INSERT_BREAKPOINT = <0x%08lx>\n",
1918 (long) current_gdbarch
->memory_insert_breakpoint
1919 /*MEMORY_INSERT_BREAKPOINT ()*/);
1921 #ifdef MEMORY_REMOVE_BREAKPOINT
1922 fprintf_unfiltered (file
,
1923 "gdbarch_dump: %s # %s\n",
1924 "MEMORY_REMOVE_BREAKPOINT(addr, contents_cache)",
1925 XSTRING (MEMORY_REMOVE_BREAKPOINT (addr
, contents_cache
)));
1926 fprintf_unfiltered (file
,
1927 "gdbarch_dump: MEMORY_REMOVE_BREAKPOINT = <0x%08lx>\n",
1928 (long) current_gdbarch
->memory_remove_breakpoint
1929 /*MEMORY_REMOVE_BREAKPOINT ()*/);
1931 #ifdef NAME_OF_MALLOC
1932 fprintf_unfiltered (file
,
1933 "gdbarch_dump: NAME_OF_MALLOC # %s\n",
1934 XSTRING (NAME_OF_MALLOC
));
1935 fprintf_unfiltered (file
,
1936 "gdbarch_dump: NAME_OF_MALLOC = %s\n",
1939 #ifdef NUM_PSEUDO_REGS
1940 fprintf_unfiltered (file
,
1941 "gdbarch_dump: NUM_PSEUDO_REGS # %s\n",
1942 XSTRING (NUM_PSEUDO_REGS
));
1943 fprintf_unfiltered (file
,
1944 "gdbarch_dump: NUM_PSEUDO_REGS = %d\n",
1948 fprintf_unfiltered (file
,
1949 "gdbarch_dump: NUM_REGS # %s\n",
1950 XSTRING (NUM_REGS
));
1951 fprintf_unfiltered (file
,
1952 "gdbarch_dump: NUM_REGS = %d\n",
1955 #ifdef PARM_BOUNDARY
1956 fprintf_unfiltered (file
,
1957 "gdbarch_dump: PARM_BOUNDARY # %s\n",
1958 XSTRING (PARM_BOUNDARY
));
1959 fprintf_unfiltered (file
,
1960 "gdbarch_dump: PARM_BOUNDARY = %d\n",
1964 fprintf_unfiltered (file
,
1965 "gdbarch_dump: PC_REGNUM # %s\n",
1966 XSTRING (PC_REGNUM
));
1967 fprintf_unfiltered (file
,
1968 "gdbarch_dump: PC_REGNUM = %d\n",
1971 #ifdef POINTER_TO_ADDRESS
1972 fprintf_unfiltered (file
,
1973 "gdbarch_dump: %s # %s\n",
1974 "POINTER_TO_ADDRESS(type, buf)",
1975 XSTRING (POINTER_TO_ADDRESS (type
, buf
)));
1976 fprintf_unfiltered (file
,
1977 "gdbarch_dump: POINTER_TO_ADDRESS = <0x%08lx>\n",
1978 (long) current_gdbarch
->pointer_to_address
1979 /*POINTER_TO_ADDRESS ()*/);
1981 fprintf_unfiltered (file
,
1982 "gdbarch_dump: gdbarch_print_float_info_p() = %d\n",
1983 gdbarch_print_float_info_p (current_gdbarch
));
1984 fprintf_unfiltered (file
,
1985 "gdbarch_dump: print_float_info = 0x%08lx\n",
1986 (long) current_gdbarch
->print_float_info
);
1987 fprintf_unfiltered (file
,
1988 "gdbarch_dump: print_registers_info = 0x%08lx\n",
1989 (long) current_gdbarch
->print_registers_info
);
1990 fprintf_unfiltered (file
,
1991 "gdbarch_dump: gdbarch_print_vector_info_p() = %d\n",
1992 gdbarch_print_vector_info_p (current_gdbarch
));
1993 fprintf_unfiltered (file
,
1994 "gdbarch_dump: print_vector_info = 0x%08lx\n",
1995 (long) current_gdbarch
->print_vector_info
);
1997 fprintf_unfiltered (file
,
1998 "gdbarch_dump: PS_REGNUM # %s\n",
1999 XSTRING (PS_REGNUM
));
2000 fprintf_unfiltered (file
,
2001 "gdbarch_dump: PS_REGNUM = %d\n",
2004 fprintf_unfiltered (file
,
2005 "gdbarch_dump: gdbarch_push_dummy_call_p() = %d\n",
2006 gdbarch_push_dummy_call_p (current_gdbarch
));
2007 fprintf_unfiltered (file
,
2008 "gdbarch_dump: push_dummy_call = 0x%08lx\n",
2009 (long) current_gdbarch
->push_dummy_call
);
2010 fprintf_unfiltered (file
,
2011 "gdbarch_dump: gdbarch_push_dummy_code_p() = %d\n",
2012 gdbarch_push_dummy_code_p (current_gdbarch
));
2013 fprintf_unfiltered (file
,
2014 "gdbarch_dump: push_dummy_code = 0x%08lx\n",
2015 (long) current_gdbarch
->push_dummy_code
);
2016 #ifdef REGISTER_BYTES_OK_P
2017 fprintf_unfiltered (file
,
2018 "gdbarch_dump: %s # %s\n",
2019 "REGISTER_BYTES_OK_P()",
2020 XSTRING (REGISTER_BYTES_OK_P ()));
2021 fprintf_unfiltered (file
,
2022 "gdbarch_dump: REGISTER_BYTES_OK_P() = %d\n",
2023 REGISTER_BYTES_OK_P ());
2025 #ifdef REGISTER_BYTES_OK
2026 fprintf_unfiltered (file
,
2027 "gdbarch_dump: %s # %s\n",
2028 "REGISTER_BYTES_OK(nr_bytes)",
2029 XSTRING (REGISTER_BYTES_OK (nr_bytes
)));
2030 fprintf_unfiltered (file
,
2031 "gdbarch_dump: REGISTER_BYTES_OK = <0x%08lx>\n",
2032 (long) current_gdbarch
->register_bytes_ok
2033 /*REGISTER_BYTES_OK ()*/);
2035 #ifdef REGISTER_NAME
2036 fprintf_unfiltered (file
,
2037 "gdbarch_dump: %s # %s\n",
2038 "REGISTER_NAME(regnr)",
2039 XSTRING (REGISTER_NAME (regnr
)));
2040 fprintf_unfiltered (file
,
2041 "gdbarch_dump: REGISTER_NAME = <0x%08lx>\n",
2042 (long) current_gdbarch
->register_name
2043 /*REGISTER_NAME ()*/);
2045 #ifdef REGISTER_SIM_REGNO
2046 fprintf_unfiltered (file
,
2047 "gdbarch_dump: %s # %s\n",
2048 "REGISTER_SIM_REGNO(reg_nr)",
2049 XSTRING (REGISTER_SIM_REGNO (reg_nr
)));
2050 fprintf_unfiltered (file
,
2051 "gdbarch_dump: REGISTER_SIM_REGNO = <0x%08lx>\n",
2052 (long) current_gdbarch
->register_sim_regno
2053 /*REGISTER_SIM_REGNO ()*/);
2055 #ifdef REGISTER_TO_VALUE
2056 fprintf_unfiltered (file
,
2057 "gdbarch_dump: %s # %s\n",
2058 "REGISTER_TO_VALUE(frame, regnum, type, buf)",
2059 XSTRING (REGISTER_TO_VALUE (frame
, regnum
, type
, buf
)));
2060 fprintf_unfiltered (file
,
2061 "gdbarch_dump: REGISTER_TO_VALUE = <0x%08lx>\n",
2062 (long) current_gdbarch
->register_to_value
2063 /*REGISTER_TO_VALUE ()*/);
2065 fprintf_unfiltered (file
,
2066 "gdbarch_dump: gdbarch_register_type_p() = %d\n",
2067 gdbarch_register_type_p (current_gdbarch
));
2068 fprintf_unfiltered (file
,
2069 "gdbarch_dump: register_type = 0x%08lx\n",
2070 (long) current_gdbarch
->register_type
);
2071 fprintf_unfiltered (file
,
2072 "gdbarch_dump: remote_translate_xfer_address = 0x%08lx\n",
2073 (long) current_gdbarch
->remote_translate_xfer_address
);
2074 #ifdef RETURN_VALUE_ON_STACK
2075 fprintf_unfiltered (file
,
2076 "gdbarch_dump: %s # %s\n",
2077 "RETURN_VALUE_ON_STACK(type)",
2078 XSTRING (RETURN_VALUE_ON_STACK (type
)));
2079 fprintf_unfiltered (file
,
2080 "gdbarch_dump: RETURN_VALUE_ON_STACK = <0x%08lx>\n",
2081 (long) current_gdbarch
->return_value_on_stack
2082 /*RETURN_VALUE_ON_STACK ()*/);
2084 #ifdef SDB_REG_TO_REGNUM
2085 fprintf_unfiltered (file
,
2086 "gdbarch_dump: %s # %s\n",
2087 "SDB_REG_TO_REGNUM(sdb_regnr)",
2088 XSTRING (SDB_REG_TO_REGNUM (sdb_regnr
)));
2089 fprintf_unfiltered (file
,
2090 "gdbarch_dump: SDB_REG_TO_REGNUM = <0x%08lx>\n",
2091 (long) current_gdbarch
->sdb_reg_to_regnum
2092 /*SDB_REG_TO_REGNUM ()*/);
2094 #ifdef SKIP_PROLOGUE
2095 fprintf_unfiltered (file
,
2096 "gdbarch_dump: %s # %s\n",
2097 "SKIP_PROLOGUE(ip)",
2098 XSTRING (SKIP_PROLOGUE (ip
)));
2099 fprintf_unfiltered (file
,
2100 "gdbarch_dump: SKIP_PROLOGUE = <0x%08lx>\n",
2101 (long) current_gdbarch
->skip_prologue
2102 /*SKIP_PROLOGUE ()*/);
2104 fprintf_unfiltered (file
,
2105 "gdbarch_dump: skip_solib_resolver = 0x%08lx\n",
2106 (long) current_gdbarch
->skip_solib_resolver
);
2107 #ifdef SKIP_TRAMPOLINE_CODE
2108 fprintf_unfiltered (file
,
2109 "gdbarch_dump: %s # %s\n",
2110 "SKIP_TRAMPOLINE_CODE(pc)",
2111 XSTRING (SKIP_TRAMPOLINE_CODE (pc
)));
2112 fprintf_unfiltered (file
,
2113 "gdbarch_dump: SKIP_TRAMPOLINE_CODE = <0x%08lx>\n",
2114 (long) current_gdbarch
->skip_trampoline_code
2115 /*SKIP_TRAMPOLINE_CODE ()*/);
2117 #ifdef SMASH_TEXT_ADDRESS
2118 fprintf_unfiltered (file
,
2119 "gdbarch_dump: %s # %s\n",
2120 "SMASH_TEXT_ADDRESS(addr)",
2121 XSTRING (SMASH_TEXT_ADDRESS (addr
)));
2122 fprintf_unfiltered (file
,
2123 "gdbarch_dump: SMASH_TEXT_ADDRESS = <0x%08lx>\n",
2124 (long) current_gdbarch
->smash_text_address
2125 /*SMASH_TEXT_ADDRESS ()*/);
2127 #ifdef SOFTWARE_SINGLE_STEP_P
2128 fprintf_unfiltered (file
,
2129 "gdbarch_dump: %s # %s\n",
2130 "SOFTWARE_SINGLE_STEP_P()",
2131 XSTRING (SOFTWARE_SINGLE_STEP_P ()));
2132 fprintf_unfiltered (file
,
2133 "gdbarch_dump: SOFTWARE_SINGLE_STEP_P() = %d\n",
2134 SOFTWARE_SINGLE_STEP_P ());
2136 #ifdef SOFTWARE_SINGLE_STEP
2137 fprintf_unfiltered (file
,
2138 "gdbarch_dump: %s # %s\n",
2139 "SOFTWARE_SINGLE_STEP(sig, insert_breakpoints_p)",
2140 XSTRING (SOFTWARE_SINGLE_STEP (sig
, insert_breakpoints_p
)));
2141 fprintf_unfiltered (file
,
2142 "gdbarch_dump: SOFTWARE_SINGLE_STEP = <0x%08lx>\n",
2143 (long) current_gdbarch
->software_single_step
2144 /*SOFTWARE_SINGLE_STEP ()*/);
2147 fprintf_unfiltered (file
,
2148 "gdbarch_dump: SP_REGNUM # %s\n",
2149 XSTRING (SP_REGNUM
));
2150 fprintf_unfiltered (file
,
2151 "gdbarch_dump: SP_REGNUM = %d\n",
2154 #ifdef STAB_REG_TO_REGNUM
2155 fprintf_unfiltered (file
,
2156 "gdbarch_dump: %s # %s\n",
2157 "STAB_REG_TO_REGNUM(stab_regnr)",
2158 XSTRING (STAB_REG_TO_REGNUM (stab_regnr
)));
2159 fprintf_unfiltered (file
,
2160 "gdbarch_dump: STAB_REG_TO_REGNUM = <0x%08lx>\n",
2161 (long) current_gdbarch
->stab_reg_to_regnum
2162 /*STAB_REG_TO_REGNUM ()*/);
2164 #ifdef STORE_RETURN_VALUE
2165 fprintf_unfiltered (file
,
2166 "gdbarch_dump: %s # %s\n",
2167 "STORE_RETURN_VALUE(type, regcache, valbuf)",
2168 XSTRING (STORE_RETURN_VALUE (type
, regcache
, valbuf
)));
2169 fprintf_unfiltered (file
,
2170 "gdbarch_dump: STORE_RETURN_VALUE = <0x%08lx>\n",
2171 (long) current_gdbarch
->store_return_value
2172 /*STORE_RETURN_VALUE ()*/);
2174 #ifdef TARGET_ADDR_BIT
2175 fprintf_unfiltered (file
,
2176 "gdbarch_dump: TARGET_ADDR_BIT # %s\n",
2177 XSTRING (TARGET_ADDR_BIT
));
2178 fprintf_unfiltered (file
,
2179 "gdbarch_dump: TARGET_ADDR_BIT = %d\n",
2182 #ifdef TARGET_ARCHITECTURE
2183 fprintf_unfiltered (file
,
2184 "gdbarch_dump: TARGET_ARCHITECTURE # %s\n",
2185 XSTRING (TARGET_ARCHITECTURE
));
2186 if (TARGET_ARCHITECTURE
!= NULL
)
2187 fprintf_unfiltered (file
,
2188 "gdbarch_dump: TARGET_ARCHITECTURE = %s\n",
2189 TARGET_ARCHITECTURE
->printable_name
);
2191 #ifdef TARGET_BFD_VMA_BIT
2192 fprintf_unfiltered (file
,
2193 "gdbarch_dump: TARGET_BFD_VMA_BIT # %s\n",
2194 XSTRING (TARGET_BFD_VMA_BIT
));
2195 fprintf_unfiltered (file
,
2196 "gdbarch_dump: TARGET_BFD_VMA_BIT = %d\n",
2197 TARGET_BFD_VMA_BIT
);
2199 #ifdef TARGET_BYTE_ORDER
2200 fprintf_unfiltered (file
,
2201 "gdbarch_dump: TARGET_BYTE_ORDER # %s\n",
2202 XSTRING (TARGET_BYTE_ORDER
));
2203 fprintf_unfiltered (file
,
2204 "gdbarch_dump: TARGET_BYTE_ORDER = %ld\n",
2205 (long) TARGET_BYTE_ORDER
);
2207 #ifdef TARGET_CHAR_SIGNED
2208 fprintf_unfiltered (file
,
2209 "gdbarch_dump: TARGET_CHAR_SIGNED # %s\n",
2210 XSTRING (TARGET_CHAR_SIGNED
));
2211 fprintf_unfiltered (file
,
2212 "gdbarch_dump: TARGET_CHAR_SIGNED = %d\n",
2213 TARGET_CHAR_SIGNED
);
2215 #ifdef TARGET_DOUBLE_BIT
2216 fprintf_unfiltered (file
,
2217 "gdbarch_dump: TARGET_DOUBLE_BIT # %s\n",
2218 XSTRING (TARGET_DOUBLE_BIT
));
2219 fprintf_unfiltered (file
,
2220 "gdbarch_dump: TARGET_DOUBLE_BIT = %d\n",
2223 #ifdef TARGET_DOUBLE_FORMAT
2224 fprintf_unfiltered (file
,
2225 "gdbarch_dump: TARGET_DOUBLE_FORMAT # %s\n",
2226 XSTRING (TARGET_DOUBLE_FORMAT
));
2227 fprintf_unfiltered (file
,
2228 "gdbarch_dump: TARGET_DOUBLE_FORMAT = %s\n",
2229 (TARGET_DOUBLE_FORMAT
)->name
);
2231 #ifdef TARGET_FLOAT_BIT
2232 fprintf_unfiltered (file
,
2233 "gdbarch_dump: TARGET_FLOAT_BIT # %s\n",
2234 XSTRING (TARGET_FLOAT_BIT
));
2235 fprintf_unfiltered (file
,
2236 "gdbarch_dump: TARGET_FLOAT_BIT = %d\n",
2239 #ifdef TARGET_FLOAT_FORMAT
2240 fprintf_unfiltered (file
,
2241 "gdbarch_dump: TARGET_FLOAT_FORMAT # %s\n",
2242 XSTRING (TARGET_FLOAT_FORMAT
));
2243 fprintf_unfiltered (file
,
2244 "gdbarch_dump: TARGET_FLOAT_FORMAT = %s\n",
2245 (TARGET_FLOAT_FORMAT
)->name
);
2247 #ifdef TARGET_INT_BIT
2248 fprintf_unfiltered (file
,
2249 "gdbarch_dump: TARGET_INT_BIT # %s\n",
2250 XSTRING (TARGET_INT_BIT
));
2251 fprintf_unfiltered (file
,
2252 "gdbarch_dump: TARGET_INT_BIT = %d\n",
2255 #ifdef TARGET_LONG_BIT
2256 fprintf_unfiltered (file
,
2257 "gdbarch_dump: TARGET_LONG_BIT # %s\n",
2258 XSTRING (TARGET_LONG_BIT
));
2259 fprintf_unfiltered (file
,
2260 "gdbarch_dump: TARGET_LONG_BIT = %d\n",
2263 #ifdef TARGET_LONG_DOUBLE_BIT
2264 fprintf_unfiltered (file
,
2265 "gdbarch_dump: TARGET_LONG_DOUBLE_BIT # %s\n",
2266 XSTRING (TARGET_LONG_DOUBLE_BIT
));
2267 fprintf_unfiltered (file
,
2268 "gdbarch_dump: TARGET_LONG_DOUBLE_BIT = %d\n",
2269 TARGET_LONG_DOUBLE_BIT
);
2271 #ifdef TARGET_LONG_DOUBLE_FORMAT
2272 fprintf_unfiltered (file
,
2273 "gdbarch_dump: TARGET_LONG_DOUBLE_FORMAT # %s\n",
2274 XSTRING (TARGET_LONG_DOUBLE_FORMAT
));
2275 fprintf_unfiltered (file
,
2276 "gdbarch_dump: TARGET_LONG_DOUBLE_FORMAT = %s\n",
2277 (TARGET_LONG_DOUBLE_FORMAT
)->name
);
2279 #ifdef TARGET_LONG_LONG_BIT
2280 fprintf_unfiltered (file
,
2281 "gdbarch_dump: TARGET_LONG_LONG_BIT # %s\n",
2282 XSTRING (TARGET_LONG_LONG_BIT
));
2283 fprintf_unfiltered (file
,
2284 "gdbarch_dump: TARGET_LONG_LONG_BIT = %d\n",
2285 TARGET_LONG_LONG_BIT
);
2288 fprintf_unfiltered (file
,
2289 "gdbarch_dump: TARGET_OSABI # %s\n",
2290 XSTRING (TARGET_OSABI
));
2291 fprintf_unfiltered (file
,
2292 "gdbarch_dump: TARGET_OSABI = %ld\n",
2293 (long) TARGET_OSABI
);
2295 #ifdef TARGET_PRINT_INSN
2296 fprintf_unfiltered (file
,
2297 "gdbarch_dump: %s # %s\n",
2298 "TARGET_PRINT_INSN(vma, info)",
2299 XSTRING (TARGET_PRINT_INSN (vma
, info
)));
2300 fprintf_unfiltered (file
,
2301 "gdbarch_dump: TARGET_PRINT_INSN = <0x%08lx>\n",
2302 (long) current_gdbarch
->print_insn
2303 /*TARGET_PRINT_INSN ()*/);
2305 #ifdef TARGET_PTR_BIT
2306 fprintf_unfiltered (file
,
2307 "gdbarch_dump: TARGET_PTR_BIT # %s\n",
2308 XSTRING (TARGET_PTR_BIT
));
2309 fprintf_unfiltered (file
,
2310 "gdbarch_dump: TARGET_PTR_BIT = %d\n",
2313 #ifdef TARGET_READ_PC_P
2314 fprintf_unfiltered (file
,
2315 "gdbarch_dump: %s # %s\n",
2316 "TARGET_READ_PC_P()",
2317 XSTRING (TARGET_READ_PC_P ()));
2318 fprintf_unfiltered (file
,
2319 "gdbarch_dump: TARGET_READ_PC_P() = %d\n",
2320 TARGET_READ_PC_P ());
2322 #ifdef TARGET_READ_PC
2323 fprintf_unfiltered (file
,
2324 "gdbarch_dump: %s # %s\n",
2325 "TARGET_READ_PC(ptid)",
2326 XSTRING (TARGET_READ_PC (ptid
)));
2327 fprintf_unfiltered (file
,
2328 "gdbarch_dump: TARGET_READ_PC = <0x%08lx>\n",
2329 (long) current_gdbarch
->read_pc
2330 /*TARGET_READ_PC ()*/);
2332 #ifdef TARGET_READ_SP_P
2333 fprintf_unfiltered (file
,
2334 "gdbarch_dump: %s # %s\n",
2335 "TARGET_READ_SP_P()",
2336 XSTRING (TARGET_READ_SP_P ()));
2337 fprintf_unfiltered (file
,
2338 "gdbarch_dump: TARGET_READ_SP_P() = %d\n",
2339 TARGET_READ_SP_P ());
2341 #ifdef TARGET_READ_SP
2342 fprintf_unfiltered (file
,
2343 "gdbarch_dump: %s # %s\n",
2345 XSTRING (TARGET_READ_SP ()));
2346 fprintf_unfiltered (file
,
2347 "gdbarch_dump: TARGET_READ_SP = <0x%08lx>\n",
2348 (long) current_gdbarch
->read_sp
2349 /*TARGET_READ_SP ()*/);
2351 #ifdef TARGET_SHORT_BIT
2352 fprintf_unfiltered (file
,
2353 "gdbarch_dump: TARGET_SHORT_BIT # %s\n",
2354 XSTRING (TARGET_SHORT_BIT
));
2355 fprintf_unfiltered (file
,
2356 "gdbarch_dump: TARGET_SHORT_BIT = %d\n",
2359 #ifdef TARGET_VIRTUAL_FRAME_POINTER
2360 fprintf_unfiltered (file
,
2361 "gdbarch_dump: %s # %s\n",
2362 "TARGET_VIRTUAL_FRAME_POINTER(pc, frame_regnum, frame_offset)",
2363 XSTRING (TARGET_VIRTUAL_FRAME_POINTER (pc
, frame_regnum
, frame_offset
)));
2364 fprintf_unfiltered (file
,
2365 "gdbarch_dump: TARGET_VIRTUAL_FRAME_POINTER = <0x%08lx>\n",
2366 (long) current_gdbarch
->virtual_frame_pointer
2367 /*TARGET_VIRTUAL_FRAME_POINTER ()*/);
2369 #ifdef TARGET_WRITE_PC
2370 fprintf_unfiltered (file
,
2371 "gdbarch_dump: %s # %s\n",
2372 "TARGET_WRITE_PC(val, ptid)",
2373 XSTRING (TARGET_WRITE_PC (val
, ptid
)));
2374 fprintf_unfiltered (file
,
2375 "gdbarch_dump: TARGET_WRITE_PC = <0x%08lx>\n",
2376 (long) current_gdbarch
->write_pc
2377 /*TARGET_WRITE_PC ()*/);
2379 fprintf_unfiltered (file
,
2380 "gdbarch_dump: gdbarch_unwind_dummy_id_p() = %d\n",
2381 gdbarch_unwind_dummy_id_p (current_gdbarch
));
2382 fprintf_unfiltered (file
,
2383 "gdbarch_dump: unwind_dummy_id = 0x%08lx\n",
2384 (long) current_gdbarch
->unwind_dummy_id
);
2385 fprintf_unfiltered (file
,
2386 "gdbarch_dump: gdbarch_unwind_pc_p() = %d\n",
2387 gdbarch_unwind_pc_p (current_gdbarch
));
2388 fprintf_unfiltered (file
,
2389 "gdbarch_dump: unwind_pc = 0x%08lx\n",
2390 (long) current_gdbarch
->unwind_pc
);
2391 fprintf_unfiltered (file
,
2392 "gdbarch_dump: gdbarch_unwind_sp_p() = %d\n",
2393 gdbarch_unwind_sp_p (current_gdbarch
));
2394 fprintf_unfiltered (file
,
2395 "gdbarch_dump: unwind_sp = 0x%08lx\n",
2396 (long) current_gdbarch
->unwind_sp
);
2397 #ifdef USE_STRUCT_CONVENTION
2398 fprintf_unfiltered (file
,
2399 "gdbarch_dump: %s # %s\n",
2400 "USE_STRUCT_CONVENTION(gcc_p, value_type)",
2401 XSTRING (USE_STRUCT_CONVENTION (gcc_p
, value_type
)));
2402 fprintf_unfiltered (file
,
2403 "gdbarch_dump: USE_STRUCT_CONVENTION = <0x%08lx>\n",
2404 (long) current_gdbarch
->use_struct_convention
2405 /*USE_STRUCT_CONVENTION ()*/);
2407 #ifdef VALUE_TO_REGISTER
2408 fprintf_unfiltered (file
,
2409 "gdbarch_dump: %s # %s\n",
2410 "VALUE_TO_REGISTER(frame, regnum, type, buf)",
2411 XSTRING (VALUE_TO_REGISTER (frame
, regnum
, type
, buf
)));
2412 fprintf_unfiltered (file
,
2413 "gdbarch_dump: VALUE_TO_REGISTER = <0x%08lx>\n",
2414 (long) current_gdbarch
->value_to_register
2415 /*VALUE_TO_REGISTER ()*/);
2417 if (current_gdbarch
->dump_tdep
!= NULL
)
2418 current_gdbarch
->dump_tdep (current_gdbarch
, file
);
2421 struct gdbarch_tdep
*
2422 gdbarch_tdep (struct gdbarch
*gdbarch
)
2424 if (gdbarch_debug
>= 2)
2425 fprintf_unfiltered (gdb_stdlog
, "gdbarch_tdep called\n");
2426 return gdbarch
->tdep
;
2430 const struct bfd_arch_info
*
2431 gdbarch_bfd_arch_info (struct gdbarch
*gdbarch
)
2433 gdb_assert (gdbarch
!= NULL
);
2434 if (gdbarch_debug
>= 2)
2435 fprintf_unfiltered (gdb_stdlog
, "gdbarch_bfd_arch_info called\n");
2436 return gdbarch
->bfd_arch_info
;
2440 gdbarch_byte_order (struct gdbarch
*gdbarch
)
2442 gdb_assert (gdbarch
!= NULL
);
2443 if (gdbarch_debug
>= 2)
2444 fprintf_unfiltered (gdb_stdlog
, "gdbarch_byte_order called\n");
2445 return gdbarch
->byte_order
;
2449 gdbarch_osabi (struct gdbarch
*gdbarch
)
2451 gdb_assert (gdbarch
!= NULL
);
2452 if (gdbarch_debug
>= 2)
2453 fprintf_unfiltered (gdb_stdlog
, "gdbarch_osabi called\n");
2454 return gdbarch
->osabi
;
2458 gdbarch_short_bit (struct gdbarch
*gdbarch
)
2460 gdb_assert (gdbarch
!= NULL
);
2461 /* Skip verify of short_bit, invalid_p == 0 */
2462 if (gdbarch_debug
>= 2)
2463 fprintf_unfiltered (gdb_stdlog
, "gdbarch_short_bit called\n");
2464 return gdbarch
->short_bit
;
2468 set_gdbarch_short_bit (struct gdbarch
*gdbarch
,
2471 gdbarch
->short_bit
= short_bit
;
2475 gdbarch_int_bit (struct gdbarch
*gdbarch
)
2477 gdb_assert (gdbarch
!= NULL
);
2478 /* Skip verify of int_bit, invalid_p == 0 */
2479 if (gdbarch_debug
>= 2)
2480 fprintf_unfiltered (gdb_stdlog
, "gdbarch_int_bit called\n");
2481 return gdbarch
->int_bit
;
2485 set_gdbarch_int_bit (struct gdbarch
*gdbarch
,
2488 gdbarch
->int_bit
= int_bit
;
2492 gdbarch_long_bit (struct gdbarch
*gdbarch
)
2494 gdb_assert (gdbarch
!= NULL
);
2495 /* Skip verify of long_bit, invalid_p == 0 */
2496 if (gdbarch_debug
>= 2)
2497 fprintf_unfiltered (gdb_stdlog
, "gdbarch_long_bit called\n");
2498 return gdbarch
->long_bit
;
2502 set_gdbarch_long_bit (struct gdbarch
*gdbarch
,
2505 gdbarch
->long_bit
= long_bit
;
2509 gdbarch_long_long_bit (struct gdbarch
*gdbarch
)
2511 gdb_assert (gdbarch
!= NULL
);
2512 /* Skip verify of long_long_bit, invalid_p == 0 */
2513 if (gdbarch_debug
>= 2)
2514 fprintf_unfiltered (gdb_stdlog
, "gdbarch_long_long_bit called\n");
2515 return gdbarch
->long_long_bit
;
2519 set_gdbarch_long_long_bit (struct gdbarch
*gdbarch
,
2522 gdbarch
->long_long_bit
= long_long_bit
;
2526 gdbarch_float_bit (struct gdbarch
*gdbarch
)
2528 gdb_assert (gdbarch
!= NULL
);
2529 /* Skip verify of float_bit, invalid_p == 0 */
2530 if (gdbarch_debug
>= 2)
2531 fprintf_unfiltered (gdb_stdlog
, "gdbarch_float_bit called\n");
2532 return gdbarch
->float_bit
;
2536 set_gdbarch_float_bit (struct gdbarch
*gdbarch
,
2539 gdbarch
->float_bit
= float_bit
;
2543 gdbarch_double_bit (struct gdbarch
*gdbarch
)
2545 gdb_assert (gdbarch
!= NULL
);
2546 /* Skip verify of double_bit, invalid_p == 0 */
2547 if (gdbarch_debug
>= 2)
2548 fprintf_unfiltered (gdb_stdlog
, "gdbarch_double_bit called\n");
2549 return gdbarch
->double_bit
;
2553 set_gdbarch_double_bit (struct gdbarch
*gdbarch
,
2556 gdbarch
->double_bit
= double_bit
;
2560 gdbarch_long_double_bit (struct gdbarch
*gdbarch
)
2562 gdb_assert (gdbarch
!= NULL
);
2563 /* Skip verify of long_double_bit, invalid_p == 0 */
2564 if (gdbarch_debug
>= 2)
2565 fprintf_unfiltered (gdb_stdlog
, "gdbarch_long_double_bit called\n");
2566 return gdbarch
->long_double_bit
;
2570 set_gdbarch_long_double_bit (struct gdbarch
*gdbarch
,
2571 int long_double_bit
)
2573 gdbarch
->long_double_bit
= long_double_bit
;
2577 gdbarch_ptr_bit (struct gdbarch
*gdbarch
)
2579 gdb_assert (gdbarch
!= NULL
);
2580 /* Skip verify of ptr_bit, invalid_p == 0 */
2581 if (gdbarch_debug
>= 2)
2582 fprintf_unfiltered (gdb_stdlog
, "gdbarch_ptr_bit called\n");
2583 return gdbarch
->ptr_bit
;
2587 set_gdbarch_ptr_bit (struct gdbarch
*gdbarch
,
2590 gdbarch
->ptr_bit
= ptr_bit
;
2594 gdbarch_addr_bit (struct gdbarch
*gdbarch
)
2596 gdb_assert (gdbarch
!= NULL
);
2597 /* Check variable changed from pre-default. */
2598 gdb_assert (gdbarch
->addr_bit
!= 0);
2599 if (gdbarch_debug
>= 2)
2600 fprintf_unfiltered (gdb_stdlog
, "gdbarch_addr_bit called\n");
2601 return gdbarch
->addr_bit
;
2605 set_gdbarch_addr_bit (struct gdbarch
*gdbarch
,
2608 gdbarch
->addr_bit
= addr_bit
;
2612 gdbarch_bfd_vma_bit (struct gdbarch
*gdbarch
)
2614 gdb_assert (gdbarch
!= NULL
);
2615 /* Skip verify of bfd_vma_bit, invalid_p == 0 */
2616 if (gdbarch_debug
>= 2)
2617 fprintf_unfiltered (gdb_stdlog
, "gdbarch_bfd_vma_bit called\n");
2618 return gdbarch
->bfd_vma_bit
;
2622 set_gdbarch_bfd_vma_bit (struct gdbarch
*gdbarch
,
2625 gdbarch
->bfd_vma_bit
= bfd_vma_bit
;
2629 gdbarch_char_signed (struct gdbarch
*gdbarch
)
2631 gdb_assert (gdbarch
!= NULL
);
2632 /* Check variable changed from pre-default. */
2633 gdb_assert (gdbarch
->char_signed
!= -1);
2634 if (gdbarch_debug
>= 2)
2635 fprintf_unfiltered (gdb_stdlog
, "gdbarch_char_signed called\n");
2636 return gdbarch
->char_signed
;
2640 set_gdbarch_char_signed (struct gdbarch
*gdbarch
,
2643 gdbarch
->char_signed
= char_signed
;
2647 gdbarch_read_pc_p (struct gdbarch
*gdbarch
)
2649 gdb_assert (gdbarch
!= NULL
);
2650 return gdbarch
->read_pc
!= NULL
;
2654 gdbarch_read_pc (struct gdbarch
*gdbarch
, ptid_t ptid
)
2656 gdb_assert (gdbarch
!= NULL
);
2657 gdb_assert (gdbarch
->read_pc
!= NULL
);
2658 if (gdbarch_debug
>= 2)
2659 fprintf_unfiltered (gdb_stdlog
, "gdbarch_read_pc called\n");
2660 return gdbarch
->read_pc (ptid
);
2664 set_gdbarch_read_pc (struct gdbarch
*gdbarch
,
2665 gdbarch_read_pc_ftype read_pc
)
2667 gdbarch
->read_pc
= read_pc
;
2671 gdbarch_write_pc (struct gdbarch
*gdbarch
, CORE_ADDR val
, ptid_t ptid
)
2673 gdb_assert (gdbarch
!= NULL
);
2674 gdb_assert (gdbarch
->write_pc
!= NULL
);
2675 if (gdbarch_debug
>= 2)
2676 fprintf_unfiltered (gdb_stdlog
, "gdbarch_write_pc called\n");
2677 gdbarch
->write_pc (val
, ptid
);
2681 set_gdbarch_write_pc (struct gdbarch
*gdbarch
,
2682 gdbarch_write_pc_ftype write_pc
)
2684 gdbarch
->write_pc
= write_pc
;
2688 gdbarch_read_sp_p (struct gdbarch
*gdbarch
)
2690 gdb_assert (gdbarch
!= NULL
);
2691 return gdbarch
->read_sp
!= NULL
;
2695 gdbarch_read_sp (struct gdbarch
*gdbarch
)
2697 gdb_assert (gdbarch
!= NULL
);
2698 gdb_assert (gdbarch
->read_sp
!= NULL
);
2699 if (gdbarch_debug
>= 2)
2700 fprintf_unfiltered (gdb_stdlog
, "gdbarch_read_sp called\n");
2701 return gdbarch
->read_sp ();
2705 set_gdbarch_read_sp (struct gdbarch
*gdbarch
,
2706 gdbarch_read_sp_ftype read_sp
)
2708 gdbarch
->read_sp
= read_sp
;
2712 gdbarch_virtual_frame_pointer (struct gdbarch
*gdbarch
, CORE_ADDR pc
, int *frame_regnum
, LONGEST
*frame_offset
)
2714 gdb_assert (gdbarch
!= NULL
);
2715 gdb_assert (gdbarch
->virtual_frame_pointer
!= NULL
);
2716 if (gdbarch_debug
>= 2)
2717 fprintf_unfiltered (gdb_stdlog
, "gdbarch_virtual_frame_pointer called\n");
2718 gdbarch
->virtual_frame_pointer (pc
, frame_regnum
, frame_offset
);
2722 set_gdbarch_virtual_frame_pointer (struct gdbarch
*gdbarch
,
2723 gdbarch_virtual_frame_pointer_ftype virtual_frame_pointer
)
2725 gdbarch
->virtual_frame_pointer
= virtual_frame_pointer
;
2729 gdbarch_pseudo_register_read_p (struct gdbarch
*gdbarch
)
2731 gdb_assert (gdbarch
!= NULL
);
2732 return gdbarch
->pseudo_register_read
!= NULL
;
2736 gdbarch_pseudo_register_read (struct gdbarch
*gdbarch
, struct regcache
*regcache
, int cookednum
, void *buf
)
2738 gdb_assert (gdbarch
!= NULL
);
2739 gdb_assert (gdbarch
->pseudo_register_read
!= NULL
);
2740 if (gdbarch_debug
>= 2)
2741 fprintf_unfiltered (gdb_stdlog
, "gdbarch_pseudo_register_read called\n");
2742 gdbarch
->pseudo_register_read (gdbarch
, regcache
, cookednum
, buf
);
2746 set_gdbarch_pseudo_register_read (struct gdbarch
*gdbarch
,
2747 gdbarch_pseudo_register_read_ftype pseudo_register_read
)
2749 gdbarch
->pseudo_register_read
= pseudo_register_read
;
2753 gdbarch_pseudo_register_write_p (struct gdbarch
*gdbarch
)
2755 gdb_assert (gdbarch
!= NULL
);
2756 return gdbarch
->pseudo_register_write
!= NULL
;
2760 gdbarch_pseudo_register_write (struct gdbarch
*gdbarch
, struct regcache
*regcache
, int cookednum
, const void *buf
)
2762 gdb_assert (gdbarch
!= NULL
);
2763 gdb_assert (gdbarch
->pseudo_register_write
!= NULL
);
2764 if (gdbarch_debug
>= 2)
2765 fprintf_unfiltered (gdb_stdlog
, "gdbarch_pseudo_register_write called\n");
2766 gdbarch
->pseudo_register_write (gdbarch
, regcache
, cookednum
, buf
);
2770 set_gdbarch_pseudo_register_write (struct gdbarch
*gdbarch
,
2771 gdbarch_pseudo_register_write_ftype pseudo_register_write
)
2773 gdbarch
->pseudo_register_write
= pseudo_register_write
;
2777 gdbarch_num_regs (struct gdbarch
*gdbarch
)
2779 gdb_assert (gdbarch
!= NULL
);
2780 /* Check variable changed from pre-default. */
2781 gdb_assert (gdbarch
->num_regs
!= -1);
2782 if (gdbarch_debug
>= 2)
2783 fprintf_unfiltered (gdb_stdlog
, "gdbarch_num_regs called\n");
2784 return gdbarch
->num_regs
;
2788 set_gdbarch_num_regs (struct gdbarch
*gdbarch
,
2791 gdbarch
->num_regs
= num_regs
;
2795 gdbarch_num_pseudo_regs (struct gdbarch
*gdbarch
)
2797 gdb_assert (gdbarch
!= NULL
);
2798 /* Skip verify of num_pseudo_regs, invalid_p == 0 */
2799 if (gdbarch_debug
>= 2)
2800 fprintf_unfiltered (gdb_stdlog
, "gdbarch_num_pseudo_regs called\n");
2801 return gdbarch
->num_pseudo_regs
;
2805 set_gdbarch_num_pseudo_regs (struct gdbarch
*gdbarch
,
2806 int num_pseudo_regs
)
2808 gdbarch
->num_pseudo_regs
= num_pseudo_regs
;
2812 gdbarch_sp_regnum (struct gdbarch
*gdbarch
)
2814 gdb_assert (gdbarch
!= NULL
);
2815 /* Skip verify of sp_regnum, invalid_p == 0 */
2816 if (gdbarch_debug
>= 2)
2817 fprintf_unfiltered (gdb_stdlog
, "gdbarch_sp_regnum called\n");
2818 return gdbarch
->sp_regnum
;
2822 set_gdbarch_sp_regnum (struct gdbarch
*gdbarch
,
2825 gdbarch
->sp_regnum
= sp_regnum
;
2829 gdbarch_pc_regnum (struct gdbarch
*gdbarch
)
2831 gdb_assert (gdbarch
!= NULL
);
2832 /* Skip verify of pc_regnum, invalid_p == 0 */
2833 if (gdbarch_debug
>= 2)
2834 fprintf_unfiltered (gdb_stdlog
, "gdbarch_pc_regnum called\n");
2835 return gdbarch
->pc_regnum
;
2839 set_gdbarch_pc_regnum (struct gdbarch
*gdbarch
,
2842 gdbarch
->pc_regnum
= pc_regnum
;
2846 gdbarch_ps_regnum (struct gdbarch
*gdbarch
)
2848 gdb_assert (gdbarch
!= NULL
);
2849 /* Skip verify of ps_regnum, invalid_p == 0 */
2850 if (gdbarch_debug
>= 2)
2851 fprintf_unfiltered (gdb_stdlog
, "gdbarch_ps_regnum called\n");
2852 return gdbarch
->ps_regnum
;
2856 set_gdbarch_ps_regnum (struct gdbarch
*gdbarch
,
2859 gdbarch
->ps_regnum
= ps_regnum
;
2863 gdbarch_fp0_regnum (struct gdbarch
*gdbarch
)
2865 gdb_assert (gdbarch
!= NULL
);
2866 /* Skip verify of fp0_regnum, invalid_p == 0 */
2867 if (gdbarch_debug
>= 2)
2868 fprintf_unfiltered (gdb_stdlog
, "gdbarch_fp0_regnum called\n");
2869 return gdbarch
->fp0_regnum
;
2873 set_gdbarch_fp0_regnum (struct gdbarch
*gdbarch
,
2876 gdbarch
->fp0_regnum
= fp0_regnum
;
2880 gdbarch_stab_reg_to_regnum (struct gdbarch
*gdbarch
, int stab_regnr
)
2882 gdb_assert (gdbarch
!= NULL
);
2883 gdb_assert (gdbarch
->stab_reg_to_regnum
!= NULL
);
2884 if (gdbarch_debug
>= 2)
2885 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stab_reg_to_regnum called\n");
2886 return gdbarch
->stab_reg_to_regnum (stab_regnr
);
2890 set_gdbarch_stab_reg_to_regnum (struct gdbarch
*gdbarch
,
2891 gdbarch_stab_reg_to_regnum_ftype stab_reg_to_regnum
)
2893 gdbarch
->stab_reg_to_regnum
= stab_reg_to_regnum
;
2897 gdbarch_ecoff_reg_to_regnum (struct gdbarch
*gdbarch
, int ecoff_regnr
)
2899 gdb_assert (gdbarch
!= NULL
);
2900 gdb_assert (gdbarch
->ecoff_reg_to_regnum
!= NULL
);
2901 if (gdbarch_debug
>= 2)
2902 fprintf_unfiltered (gdb_stdlog
, "gdbarch_ecoff_reg_to_regnum called\n");
2903 return gdbarch
->ecoff_reg_to_regnum (ecoff_regnr
);
2907 set_gdbarch_ecoff_reg_to_regnum (struct gdbarch
*gdbarch
,
2908 gdbarch_ecoff_reg_to_regnum_ftype ecoff_reg_to_regnum
)
2910 gdbarch
->ecoff_reg_to_regnum
= ecoff_reg_to_regnum
;
2914 gdbarch_dwarf_reg_to_regnum (struct gdbarch
*gdbarch
, int dwarf_regnr
)
2916 gdb_assert (gdbarch
!= NULL
);
2917 gdb_assert (gdbarch
->dwarf_reg_to_regnum
!= NULL
);
2918 if (gdbarch_debug
>= 2)
2919 fprintf_unfiltered (gdb_stdlog
, "gdbarch_dwarf_reg_to_regnum called\n");
2920 return gdbarch
->dwarf_reg_to_regnum (dwarf_regnr
);
2924 set_gdbarch_dwarf_reg_to_regnum (struct gdbarch
*gdbarch
,
2925 gdbarch_dwarf_reg_to_regnum_ftype dwarf_reg_to_regnum
)
2927 gdbarch
->dwarf_reg_to_regnum
= dwarf_reg_to_regnum
;
2931 gdbarch_sdb_reg_to_regnum (struct gdbarch
*gdbarch
, int sdb_regnr
)
2933 gdb_assert (gdbarch
!= NULL
);
2934 gdb_assert (gdbarch
->sdb_reg_to_regnum
!= NULL
);
2935 if (gdbarch_debug
>= 2)
2936 fprintf_unfiltered (gdb_stdlog
, "gdbarch_sdb_reg_to_regnum called\n");
2937 return gdbarch
->sdb_reg_to_regnum (sdb_regnr
);
2941 set_gdbarch_sdb_reg_to_regnum (struct gdbarch
*gdbarch
,
2942 gdbarch_sdb_reg_to_regnum_ftype sdb_reg_to_regnum
)
2944 gdbarch
->sdb_reg_to_regnum
= sdb_reg_to_regnum
;
2948 gdbarch_dwarf2_reg_to_regnum (struct gdbarch
*gdbarch
, int dwarf2_regnr
)
2950 gdb_assert (gdbarch
!= NULL
);
2951 gdb_assert (gdbarch
->dwarf2_reg_to_regnum
!= NULL
);
2952 if (gdbarch_debug
>= 2)
2953 fprintf_unfiltered (gdb_stdlog
, "gdbarch_dwarf2_reg_to_regnum called\n");
2954 return gdbarch
->dwarf2_reg_to_regnum (dwarf2_regnr
);
2958 set_gdbarch_dwarf2_reg_to_regnum (struct gdbarch
*gdbarch
,
2959 gdbarch_dwarf2_reg_to_regnum_ftype dwarf2_reg_to_regnum
)
2961 gdbarch
->dwarf2_reg_to_regnum
= dwarf2_reg_to_regnum
;
2965 gdbarch_register_name (struct gdbarch
*gdbarch
, int regnr
)
2967 gdb_assert (gdbarch
!= NULL
);
2968 gdb_assert (gdbarch
->register_name
!= NULL
);
2969 if (gdbarch_debug
>= 2)
2970 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_name called\n");
2971 return gdbarch
->register_name (regnr
);
2975 set_gdbarch_register_name (struct gdbarch
*gdbarch
,
2976 gdbarch_register_name_ftype register_name
)
2978 gdbarch
->register_name
= register_name
;
2982 gdbarch_register_type_p (struct gdbarch
*gdbarch
)
2984 gdb_assert (gdbarch
!= NULL
);
2985 return gdbarch
->register_type
!= NULL
;
2989 gdbarch_register_type (struct gdbarch
*gdbarch
, int reg_nr
)
2991 gdb_assert (gdbarch
!= NULL
);
2992 gdb_assert (gdbarch
->register_type
!= NULL
);
2993 if (gdbarch_debug
>= 2)
2994 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_type called\n");
2995 return gdbarch
->register_type (gdbarch
, reg_nr
);
2999 set_gdbarch_register_type (struct gdbarch
*gdbarch
,
3000 gdbarch_register_type_ftype register_type
)
3002 gdbarch
->register_type
= register_type
;
3006 gdbarch_deprecated_register_virtual_type_p (struct gdbarch
*gdbarch
)
3008 gdb_assert (gdbarch
!= NULL
);
3009 return gdbarch
->deprecated_register_virtual_type
!= NULL
;
3013 gdbarch_deprecated_register_virtual_type (struct gdbarch
*gdbarch
, int reg_nr
)
3015 gdb_assert (gdbarch
!= NULL
);
3016 gdb_assert (gdbarch
->deprecated_register_virtual_type
!= NULL
);
3017 if (gdbarch_debug
>= 2)
3018 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_register_virtual_type called\n");
3019 return gdbarch
->deprecated_register_virtual_type (reg_nr
);
3023 set_gdbarch_deprecated_register_virtual_type (struct gdbarch
*gdbarch
,
3024 gdbarch_deprecated_register_virtual_type_ftype deprecated_register_virtual_type
)
3026 gdbarch
->deprecated_register_virtual_type
= deprecated_register_virtual_type
;
3030 gdbarch_deprecated_register_bytes (struct gdbarch
*gdbarch
)
3032 gdb_assert (gdbarch
!= NULL
);
3033 if (gdbarch_debug
>= 2)
3034 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_register_bytes called\n");
3035 return gdbarch
->deprecated_register_bytes
;
3039 set_gdbarch_deprecated_register_bytes (struct gdbarch
*gdbarch
,
3040 int deprecated_register_bytes
)
3042 gdbarch
->deprecated_register_bytes
= deprecated_register_bytes
;
3046 gdbarch_deprecated_register_byte_p (struct gdbarch
*gdbarch
)
3048 gdb_assert (gdbarch
!= NULL
);
3049 return gdbarch
->deprecated_register_byte
!= generic_register_byte
;
3053 gdbarch_deprecated_register_byte (struct gdbarch
*gdbarch
, int reg_nr
)
3055 gdb_assert (gdbarch
!= NULL
);
3056 gdb_assert (gdbarch
->deprecated_register_byte
!= NULL
);
3057 /* Do not check predicate: gdbarch->deprecated_register_byte != generic_register_byte, allow call. */
3058 if (gdbarch_debug
>= 2)
3059 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_register_byte called\n");
3060 return gdbarch
->deprecated_register_byte (reg_nr
);
3064 set_gdbarch_deprecated_register_byte (struct gdbarch
*gdbarch
,
3065 gdbarch_deprecated_register_byte_ftype deprecated_register_byte
)
3067 gdbarch
->deprecated_register_byte
= deprecated_register_byte
;
3071 gdbarch_deprecated_register_raw_size_p (struct gdbarch
*gdbarch
)
3073 gdb_assert (gdbarch
!= NULL
);
3074 return gdbarch
->deprecated_register_raw_size
!= generic_register_size
;
3078 gdbarch_deprecated_register_raw_size (struct gdbarch
*gdbarch
, int reg_nr
)
3080 gdb_assert (gdbarch
!= NULL
);
3081 gdb_assert (gdbarch
->deprecated_register_raw_size
!= NULL
);
3082 /* Do not check predicate: gdbarch->deprecated_register_raw_size != generic_register_size, allow call. */
3083 if (gdbarch_debug
>= 2)
3084 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_register_raw_size called\n");
3085 return gdbarch
->deprecated_register_raw_size (reg_nr
);
3089 set_gdbarch_deprecated_register_raw_size (struct gdbarch
*gdbarch
,
3090 gdbarch_deprecated_register_raw_size_ftype deprecated_register_raw_size
)
3092 gdbarch
->deprecated_register_raw_size
= deprecated_register_raw_size
;
3096 gdbarch_deprecated_register_virtual_size_p (struct gdbarch
*gdbarch
)
3098 gdb_assert (gdbarch
!= NULL
);
3099 return gdbarch
->deprecated_register_virtual_size
!= generic_register_size
;
3103 gdbarch_deprecated_register_virtual_size (struct gdbarch
*gdbarch
, int reg_nr
)
3105 gdb_assert (gdbarch
!= NULL
);
3106 gdb_assert (gdbarch
->deprecated_register_virtual_size
!= NULL
);
3107 /* Do not check predicate: gdbarch->deprecated_register_virtual_size != generic_register_size, allow call. */
3108 if (gdbarch_debug
>= 2)
3109 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_register_virtual_size called\n");
3110 return gdbarch
->deprecated_register_virtual_size (reg_nr
);
3114 set_gdbarch_deprecated_register_virtual_size (struct gdbarch
*gdbarch
,
3115 gdbarch_deprecated_register_virtual_size_ftype deprecated_register_virtual_size
)
3117 gdbarch
->deprecated_register_virtual_size
= deprecated_register_virtual_size
;
3121 gdbarch_deprecated_max_register_raw_size_p (struct gdbarch
*gdbarch
)
3123 gdb_assert (gdbarch
!= NULL
);
3124 return gdbarch
->deprecated_max_register_raw_size
!= 0;
3128 gdbarch_deprecated_max_register_raw_size (struct gdbarch
*gdbarch
)
3130 gdb_assert (gdbarch
!= NULL
);
3131 if (gdbarch_debug
>= 2)
3132 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_max_register_raw_size called\n");
3133 return gdbarch
->deprecated_max_register_raw_size
;
3137 set_gdbarch_deprecated_max_register_raw_size (struct gdbarch
*gdbarch
,
3138 int deprecated_max_register_raw_size
)
3140 gdbarch
->deprecated_max_register_raw_size
= deprecated_max_register_raw_size
;
3144 gdbarch_deprecated_max_register_virtual_size_p (struct gdbarch
*gdbarch
)
3146 gdb_assert (gdbarch
!= NULL
);
3147 return gdbarch
->deprecated_max_register_virtual_size
!= 0;
3151 gdbarch_deprecated_max_register_virtual_size (struct gdbarch
*gdbarch
)
3153 gdb_assert (gdbarch
!= NULL
);
3154 if (gdbarch_debug
>= 2)
3155 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_max_register_virtual_size called\n");
3156 return gdbarch
->deprecated_max_register_virtual_size
;
3160 set_gdbarch_deprecated_max_register_virtual_size (struct gdbarch
*gdbarch
,
3161 int deprecated_max_register_virtual_size
)
3163 gdbarch
->deprecated_max_register_virtual_size
= deprecated_max_register_virtual_size
;
3167 gdbarch_unwind_dummy_id_p (struct gdbarch
*gdbarch
)
3169 gdb_assert (gdbarch
!= NULL
);
3170 return gdbarch
->unwind_dummy_id
!= NULL
;
3174 gdbarch_unwind_dummy_id (struct gdbarch
*gdbarch
, struct frame_info
*info
)
3176 gdb_assert (gdbarch
!= NULL
);
3177 gdb_assert (gdbarch
->unwind_dummy_id
!= NULL
);
3178 if (gdbarch_debug
>= 2)
3179 fprintf_unfiltered (gdb_stdlog
, "gdbarch_unwind_dummy_id called\n");
3180 return gdbarch
->unwind_dummy_id (gdbarch
, info
);
3184 set_gdbarch_unwind_dummy_id (struct gdbarch
*gdbarch
,
3185 gdbarch_unwind_dummy_id_ftype unwind_dummy_id
)
3187 gdbarch
->unwind_dummy_id
= unwind_dummy_id
;
3191 gdbarch_deprecated_save_dummy_frame_tos_p (struct gdbarch
*gdbarch
)
3193 gdb_assert (gdbarch
!= NULL
);
3194 return gdbarch
->deprecated_save_dummy_frame_tos
!= NULL
;
3198 gdbarch_deprecated_save_dummy_frame_tos (struct gdbarch
*gdbarch
, CORE_ADDR sp
)
3200 gdb_assert (gdbarch
!= NULL
);
3201 gdb_assert (gdbarch
->deprecated_save_dummy_frame_tos
!= NULL
);
3202 if (gdbarch_debug
>= 2)
3203 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_save_dummy_frame_tos called\n");
3204 gdbarch
->deprecated_save_dummy_frame_tos (sp
);
3208 set_gdbarch_deprecated_save_dummy_frame_tos (struct gdbarch
*gdbarch
,
3209 gdbarch_deprecated_save_dummy_frame_tos_ftype deprecated_save_dummy_frame_tos
)
3211 gdbarch
->deprecated_save_dummy_frame_tos
= deprecated_save_dummy_frame_tos
;
3215 gdbarch_deprecated_fp_regnum (struct gdbarch
*gdbarch
)
3217 gdb_assert (gdbarch
!= NULL
);
3218 /* Skip verify of deprecated_fp_regnum, invalid_p == 0 */
3219 if (gdbarch_debug
>= 2)
3220 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_fp_regnum called\n");
3221 return gdbarch
->deprecated_fp_regnum
;
3225 set_gdbarch_deprecated_fp_regnum (struct gdbarch
*gdbarch
,
3226 int deprecated_fp_regnum
)
3228 gdbarch
->deprecated_fp_regnum
= deprecated_fp_regnum
;
3232 gdbarch_deprecated_target_read_fp_p (struct gdbarch
*gdbarch
)
3234 gdb_assert (gdbarch
!= NULL
);
3235 return gdbarch
->deprecated_target_read_fp
!= NULL
;
3239 gdbarch_deprecated_target_read_fp (struct gdbarch
*gdbarch
)
3241 gdb_assert (gdbarch
!= NULL
);
3242 gdb_assert (gdbarch
->deprecated_target_read_fp
!= NULL
);
3243 if (gdbarch_debug
>= 2)
3244 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_target_read_fp called\n");
3245 return gdbarch
->deprecated_target_read_fp ();
3249 set_gdbarch_deprecated_target_read_fp (struct gdbarch
*gdbarch
,
3250 gdbarch_deprecated_target_read_fp_ftype deprecated_target_read_fp
)
3252 gdbarch
->deprecated_target_read_fp
= deprecated_target_read_fp
;
3256 gdbarch_push_dummy_call_p (struct gdbarch
*gdbarch
)
3258 gdb_assert (gdbarch
!= NULL
);
3259 return gdbarch
->push_dummy_call
!= NULL
;
3263 gdbarch_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
)
3265 gdb_assert (gdbarch
!= NULL
);
3266 gdb_assert (gdbarch
->push_dummy_call
!= NULL
);
3267 if (gdbarch_debug
>= 2)
3268 fprintf_unfiltered (gdb_stdlog
, "gdbarch_push_dummy_call called\n");
3269 return gdbarch
->push_dummy_call (gdbarch
, func_addr
, regcache
, bp_addr
, nargs
, args
, sp
, struct_return
, struct_addr
);
3273 set_gdbarch_push_dummy_call (struct gdbarch
*gdbarch
,
3274 gdbarch_push_dummy_call_ftype push_dummy_call
)
3276 gdbarch
->push_dummy_call
= push_dummy_call
;
3280 gdbarch_deprecated_push_arguments_p (struct gdbarch
*gdbarch
)
3282 gdb_assert (gdbarch
!= NULL
);
3283 return gdbarch
->deprecated_push_arguments
!= NULL
;
3287 gdbarch_deprecated_push_arguments (struct gdbarch
*gdbarch
, int nargs
, struct value
**args
, CORE_ADDR sp
, int struct_return
, CORE_ADDR struct_addr
)
3289 gdb_assert (gdbarch
!= NULL
);
3290 gdb_assert (gdbarch
->deprecated_push_arguments
!= NULL
);
3291 if (gdbarch_debug
>= 2)
3292 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_push_arguments called\n");
3293 return gdbarch
->deprecated_push_arguments (nargs
, args
, sp
, struct_return
, struct_addr
);
3297 set_gdbarch_deprecated_push_arguments (struct gdbarch
*gdbarch
,
3298 gdbarch_deprecated_push_arguments_ftype deprecated_push_arguments
)
3300 gdbarch
->deprecated_push_arguments
= deprecated_push_arguments
;
3304 gdbarch_deprecated_use_generic_dummy_frames (struct gdbarch
*gdbarch
)
3306 gdb_assert (gdbarch
!= NULL
);
3307 /* Skip verify of deprecated_use_generic_dummy_frames, invalid_p == 0 */
3308 if (gdbarch_debug
>= 2)
3309 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_use_generic_dummy_frames called\n");
3310 return gdbarch
->deprecated_use_generic_dummy_frames
;
3314 set_gdbarch_deprecated_use_generic_dummy_frames (struct gdbarch
*gdbarch
,
3315 int deprecated_use_generic_dummy_frames
)
3317 gdbarch
->deprecated_use_generic_dummy_frames
= deprecated_use_generic_dummy_frames
;
3321 gdbarch_deprecated_push_return_address_p (struct gdbarch
*gdbarch
)
3323 gdb_assert (gdbarch
!= NULL
);
3324 return gdbarch
->deprecated_push_return_address
!= NULL
;
3328 gdbarch_deprecated_push_return_address (struct gdbarch
*gdbarch
, CORE_ADDR pc
, CORE_ADDR sp
)
3330 gdb_assert (gdbarch
!= NULL
);
3331 gdb_assert (gdbarch
->deprecated_push_return_address
!= NULL
);
3332 if (gdbarch_debug
>= 2)
3333 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_push_return_address called\n");
3334 return gdbarch
->deprecated_push_return_address (pc
, sp
);
3338 set_gdbarch_deprecated_push_return_address (struct gdbarch
*gdbarch
,
3339 gdbarch_deprecated_push_return_address_ftype deprecated_push_return_address
)
3341 gdbarch
->deprecated_push_return_address
= deprecated_push_return_address
;
3345 gdbarch_deprecated_dummy_write_sp_p (struct gdbarch
*gdbarch
)
3347 gdb_assert (gdbarch
!= NULL
);
3348 return gdbarch
->deprecated_dummy_write_sp
!= NULL
;
3352 gdbarch_deprecated_dummy_write_sp (struct gdbarch
*gdbarch
, CORE_ADDR val
)
3354 gdb_assert (gdbarch
!= NULL
);
3355 gdb_assert (gdbarch
->deprecated_dummy_write_sp
!= NULL
);
3356 if (gdbarch_debug
>= 2)
3357 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_dummy_write_sp called\n");
3358 gdbarch
->deprecated_dummy_write_sp (val
);
3362 set_gdbarch_deprecated_dummy_write_sp (struct gdbarch
*gdbarch
,
3363 gdbarch_deprecated_dummy_write_sp_ftype deprecated_dummy_write_sp
)
3365 gdbarch
->deprecated_dummy_write_sp
= deprecated_dummy_write_sp
;
3369 gdbarch_deprecated_register_size (struct gdbarch
*gdbarch
)
3371 gdb_assert (gdbarch
!= NULL
);
3372 if (gdbarch_debug
>= 2)
3373 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_register_size called\n");
3374 return gdbarch
->deprecated_register_size
;
3378 set_gdbarch_deprecated_register_size (struct gdbarch
*gdbarch
,
3379 int deprecated_register_size
)
3381 gdbarch
->deprecated_register_size
= deprecated_register_size
;
3385 gdbarch_call_dummy_location (struct gdbarch
*gdbarch
)
3387 gdb_assert (gdbarch
!= NULL
);
3388 /* Skip verify of call_dummy_location, invalid_p == 0 */
3389 if (gdbarch_debug
>= 2)
3390 fprintf_unfiltered (gdb_stdlog
, "gdbarch_call_dummy_location called\n");
3391 return gdbarch
->call_dummy_location
;
3395 set_gdbarch_call_dummy_location (struct gdbarch
*gdbarch
,
3396 int call_dummy_location
)
3398 gdbarch
->call_dummy_location
= call_dummy_location
;
3402 gdbarch_deprecated_call_dummy_start_offset (struct gdbarch
*gdbarch
)
3404 gdb_assert (gdbarch
!= NULL
);
3405 if (gdbarch_debug
>= 2)
3406 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_call_dummy_start_offset called\n");
3407 return gdbarch
->deprecated_call_dummy_start_offset
;
3411 set_gdbarch_deprecated_call_dummy_start_offset (struct gdbarch
*gdbarch
,
3412 CORE_ADDR deprecated_call_dummy_start_offset
)
3414 gdbarch
->deprecated_call_dummy_start_offset
= deprecated_call_dummy_start_offset
;
3418 gdbarch_deprecated_call_dummy_breakpoint_offset (struct gdbarch
*gdbarch
)
3420 gdb_assert (gdbarch
!= NULL
);
3421 if (gdbarch_debug
>= 2)
3422 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_call_dummy_breakpoint_offset called\n");
3423 return gdbarch
->deprecated_call_dummy_breakpoint_offset
;
3427 set_gdbarch_deprecated_call_dummy_breakpoint_offset (struct gdbarch
*gdbarch
,
3428 CORE_ADDR deprecated_call_dummy_breakpoint_offset
)
3430 gdbarch
->deprecated_call_dummy_breakpoint_offset
= deprecated_call_dummy_breakpoint_offset
;
3434 gdbarch_deprecated_call_dummy_words (struct gdbarch
*gdbarch
)
3436 gdb_assert (gdbarch
!= NULL
);
3437 /* Skip verify of deprecated_call_dummy_words, invalid_p == 0 */
3438 if (gdbarch_debug
>= 2)
3439 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_call_dummy_words called\n");
3440 return gdbarch
->deprecated_call_dummy_words
;
3444 set_gdbarch_deprecated_call_dummy_words (struct gdbarch
*gdbarch
,
3445 LONGEST
* deprecated_call_dummy_words
)
3447 gdbarch
->deprecated_call_dummy_words
= deprecated_call_dummy_words
;
3451 gdbarch_deprecated_sizeof_call_dummy_words (struct gdbarch
*gdbarch
)
3453 gdb_assert (gdbarch
!= NULL
);
3454 /* Skip verify of deprecated_sizeof_call_dummy_words, invalid_p == 0 */
3455 if (gdbarch_debug
>= 2)
3456 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_sizeof_call_dummy_words called\n");
3457 return gdbarch
->deprecated_sizeof_call_dummy_words
;
3461 set_gdbarch_deprecated_sizeof_call_dummy_words (struct gdbarch
*gdbarch
,
3462 int deprecated_sizeof_call_dummy_words
)
3464 gdbarch
->deprecated_sizeof_call_dummy_words
= deprecated_sizeof_call_dummy_words
;
3468 gdbarch_deprecated_fix_call_dummy_p (struct gdbarch
*gdbarch
)
3470 gdb_assert (gdbarch
!= NULL
);
3471 return gdbarch
->deprecated_fix_call_dummy
!= NULL
;
3475 gdbarch_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
)
3477 gdb_assert (gdbarch
!= NULL
);
3478 gdb_assert (gdbarch
->deprecated_fix_call_dummy
!= NULL
);
3479 if (gdbarch_debug
>= 2)
3480 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_fix_call_dummy called\n");
3481 gdbarch
->deprecated_fix_call_dummy (dummy
, pc
, fun
, nargs
, args
, type
, gcc_p
);
3485 set_gdbarch_deprecated_fix_call_dummy (struct gdbarch
*gdbarch
,
3486 gdbarch_deprecated_fix_call_dummy_ftype deprecated_fix_call_dummy
)
3488 gdbarch
->deprecated_fix_call_dummy
= deprecated_fix_call_dummy
;
3492 gdbarch_push_dummy_code_p (struct gdbarch
*gdbarch
)
3494 gdb_assert (gdbarch
!= NULL
);
3495 return gdbarch
->push_dummy_code
!= NULL
;
3499 gdbarch_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
)
3501 gdb_assert (gdbarch
!= NULL
);
3502 gdb_assert (gdbarch
->push_dummy_code
!= NULL
);
3503 if (gdbarch_debug
>= 2)
3504 fprintf_unfiltered (gdb_stdlog
, "gdbarch_push_dummy_code called\n");
3505 return gdbarch
->push_dummy_code (gdbarch
, sp
, funaddr
, using_gcc
, args
, nargs
, value_type
, real_pc
, bp_addr
);
3509 set_gdbarch_push_dummy_code (struct gdbarch
*gdbarch
,
3510 gdbarch_push_dummy_code_ftype push_dummy_code
)
3512 gdbarch
->push_dummy_code
= push_dummy_code
;
3516 gdbarch_deprecated_push_dummy_frame_p (struct gdbarch
*gdbarch
)
3518 gdb_assert (gdbarch
!= NULL
);
3519 return gdbarch
->deprecated_push_dummy_frame
!= NULL
;
3523 gdbarch_deprecated_push_dummy_frame (struct gdbarch
*gdbarch
)
3525 gdb_assert (gdbarch
!= NULL
);
3526 gdb_assert (gdbarch
->deprecated_push_dummy_frame
!= NULL
);
3527 if (gdbarch_debug
>= 2)
3528 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_push_dummy_frame called\n");
3529 gdbarch
->deprecated_push_dummy_frame ();
3533 set_gdbarch_deprecated_push_dummy_frame (struct gdbarch
*gdbarch
,
3534 gdbarch_deprecated_push_dummy_frame_ftype deprecated_push_dummy_frame
)
3536 gdbarch
->deprecated_push_dummy_frame
= deprecated_push_dummy_frame
;
3540 gdbarch_deprecated_do_registers_info_p (struct gdbarch
*gdbarch
)
3542 gdb_assert (gdbarch
!= NULL
);
3543 return gdbarch
->deprecated_do_registers_info
!= NULL
;
3547 gdbarch_deprecated_do_registers_info (struct gdbarch
*gdbarch
, int reg_nr
, int fpregs
)
3549 gdb_assert (gdbarch
!= NULL
);
3550 gdb_assert (gdbarch
->deprecated_do_registers_info
!= NULL
);
3551 if (gdbarch_debug
>= 2)
3552 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_do_registers_info called\n");
3553 gdbarch
->deprecated_do_registers_info (reg_nr
, fpregs
);
3557 set_gdbarch_deprecated_do_registers_info (struct gdbarch
*gdbarch
,
3558 gdbarch_deprecated_do_registers_info_ftype deprecated_do_registers_info
)
3560 gdbarch
->deprecated_do_registers_info
= deprecated_do_registers_info
;
3564 gdbarch_print_registers_info (struct gdbarch
*gdbarch
, struct ui_file
*file
, struct frame_info
*frame
, int regnum
, int all
)
3566 gdb_assert (gdbarch
!= NULL
);
3567 gdb_assert (gdbarch
->print_registers_info
!= NULL
);
3568 if (gdbarch_debug
>= 2)
3569 fprintf_unfiltered (gdb_stdlog
, "gdbarch_print_registers_info called\n");
3570 gdbarch
->print_registers_info (gdbarch
, file
, frame
, regnum
, all
);
3574 set_gdbarch_print_registers_info (struct gdbarch
*gdbarch
,
3575 gdbarch_print_registers_info_ftype print_registers_info
)
3577 gdbarch
->print_registers_info
= print_registers_info
;
3581 gdbarch_print_float_info_p (struct gdbarch
*gdbarch
)
3583 gdb_assert (gdbarch
!= NULL
);
3584 return gdbarch
->print_float_info
!= NULL
;
3588 gdbarch_print_float_info (struct gdbarch
*gdbarch
, struct ui_file
*file
, struct frame_info
*frame
, const char *args
)
3590 gdb_assert (gdbarch
!= NULL
);
3591 gdb_assert (gdbarch
->print_float_info
!= NULL
);
3592 if (gdbarch_debug
>= 2)
3593 fprintf_unfiltered (gdb_stdlog
, "gdbarch_print_float_info called\n");
3594 gdbarch
->print_float_info (gdbarch
, file
, frame
, args
);
3598 set_gdbarch_print_float_info (struct gdbarch
*gdbarch
,
3599 gdbarch_print_float_info_ftype print_float_info
)
3601 gdbarch
->print_float_info
= print_float_info
;
3605 gdbarch_print_vector_info_p (struct gdbarch
*gdbarch
)
3607 gdb_assert (gdbarch
!= NULL
);
3608 return gdbarch
->print_vector_info
!= NULL
;
3612 gdbarch_print_vector_info (struct gdbarch
*gdbarch
, struct ui_file
*file
, struct frame_info
*frame
, const char *args
)
3614 gdb_assert (gdbarch
!= NULL
);
3615 gdb_assert (gdbarch
->print_vector_info
!= NULL
);
3616 if (gdbarch_debug
>= 2)
3617 fprintf_unfiltered (gdb_stdlog
, "gdbarch_print_vector_info called\n");
3618 gdbarch
->print_vector_info (gdbarch
, file
, frame
, args
);
3622 set_gdbarch_print_vector_info (struct gdbarch
*gdbarch
,
3623 gdbarch_print_vector_info_ftype print_vector_info
)
3625 gdbarch
->print_vector_info
= print_vector_info
;
3629 gdbarch_register_sim_regno (struct gdbarch
*gdbarch
, int reg_nr
)
3631 gdb_assert (gdbarch
!= NULL
);
3632 gdb_assert (gdbarch
->register_sim_regno
!= NULL
);
3633 if (gdbarch_debug
>= 2)
3634 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_sim_regno called\n");
3635 return gdbarch
->register_sim_regno (reg_nr
);
3639 set_gdbarch_register_sim_regno (struct gdbarch
*gdbarch
,
3640 gdbarch_register_sim_regno_ftype register_sim_regno
)
3642 gdbarch
->register_sim_regno
= register_sim_regno
;
3646 gdbarch_register_bytes_ok_p (struct gdbarch
*gdbarch
)
3648 gdb_assert (gdbarch
!= NULL
);
3649 return gdbarch
->register_bytes_ok
!= NULL
;
3653 gdbarch_register_bytes_ok (struct gdbarch
*gdbarch
, long nr_bytes
)
3655 gdb_assert (gdbarch
!= NULL
);
3656 gdb_assert (gdbarch
->register_bytes_ok
!= NULL
);
3657 if (gdbarch_debug
>= 2)
3658 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_bytes_ok called\n");
3659 return gdbarch
->register_bytes_ok (nr_bytes
);
3663 set_gdbarch_register_bytes_ok (struct gdbarch
*gdbarch
,
3664 gdbarch_register_bytes_ok_ftype register_bytes_ok
)
3666 gdbarch
->register_bytes_ok
= register_bytes_ok
;
3670 gdbarch_cannot_fetch_register (struct gdbarch
*gdbarch
, int regnum
)
3672 gdb_assert (gdbarch
!= NULL
);
3673 gdb_assert (gdbarch
->cannot_fetch_register
!= NULL
);
3674 if (gdbarch_debug
>= 2)
3675 fprintf_unfiltered (gdb_stdlog
, "gdbarch_cannot_fetch_register called\n");
3676 return gdbarch
->cannot_fetch_register (regnum
);
3680 set_gdbarch_cannot_fetch_register (struct gdbarch
*gdbarch
,
3681 gdbarch_cannot_fetch_register_ftype cannot_fetch_register
)
3683 gdbarch
->cannot_fetch_register
= cannot_fetch_register
;
3687 gdbarch_cannot_store_register (struct gdbarch
*gdbarch
, int regnum
)
3689 gdb_assert (gdbarch
!= NULL
);
3690 gdb_assert (gdbarch
->cannot_store_register
!= NULL
);
3691 if (gdbarch_debug
>= 2)
3692 fprintf_unfiltered (gdb_stdlog
, "gdbarch_cannot_store_register called\n");
3693 return gdbarch
->cannot_store_register (regnum
);
3697 set_gdbarch_cannot_store_register (struct gdbarch
*gdbarch
,
3698 gdbarch_cannot_store_register_ftype cannot_store_register
)
3700 gdbarch
->cannot_store_register
= cannot_store_register
;
3704 gdbarch_get_longjmp_target_p (struct gdbarch
*gdbarch
)
3706 gdb_assert (gdbarch
!= NULL
);
3707 return gdbarch
->get_longjmp_target
!= NULL
;
3711 gdbarch_get_longjmp_target (struct gdbarch
*gdbarch
, CORE_ADDR
*pc
)
3713 gdb_assert (gdbarch
!= NULL
);
3714 gdb_assert (gdbarch
->get_longjmp_target
!= NULL
);
3715 if (gdbarch_debug
>= 2)
3716 fprintf_unfiltered (gdb_stdlog
, "gdbarch_get_longjmp_target called\n");
3717 return gdbarch
->get_longjmp_target (pc
);
3721 set_gdbarch_get_longjmp_target (struct gdbarch
*gdbarch
,
3722 gdbarch_get_longjmp_target_ftype get_longjmp_target
)
3724 gdbarch
->get_longjmp_target
= get_longjmp_target
;
3728 gdbarch_deprecated_pc_in_call_dummy_p (struct gdbarch
*gdbarch
)
3730 gdb_assert (gdbarch
!= NULL
);
3731 return gdbarch
->deprecated_pc_in_call_dummy
!= deprecated_pc_in_call_dummy
;
3735 gdbarch_deprecated_pc_in_call_dummy (struct gdbarch
*gdbarch
, CORE_ADDR pc
, CORE_ADDR sp
, CORE_ADDR frame_address
)
3737 gdb_assert (gdbarch
!= NULL
);
3738 gdb_assert (gdbarch
->deprecated_pc_in_call_dummy
!= NULL
);
3739 /* Do not check predicate: gdbarch->deprecated_pc_in_call_dummy != deprecated_pc_in_call_dummy, allow call. */
3740 if (gdbarch_debug
>= 2)
3741 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_pc_in_call_dummy called\n");
3742 return gdbarch
->deprecated_pc_in_call_dummy (pc
, sp
, frame_address
);
3746 set_gdbarch_deprecated_pc_in_call_dummy (struct gdbarch
*gdbarch
,
3747 gdbarch_deprecated_pc_in_call_dummy_ftype deprecated_pc_in_call_dummy
)
3749 gdbarch
->deprecated_pc_in_call_dummy
= deprecated_pc_in_call_dummy
;
3753 gdbarch_deprecated_init_frame_pc_p (struct gdbarch
*gdbarch
)
3755 gdb_assert (gdbarch
!= NULL
);
3756 return gdbarch
->deprecated_init_frame_pc
!= NULL
;
3760 gdbarch_deprecated_init_frame_pc (struct gdbarch
*gdbarch
, int fromleaf
, struct frame_info
*prev
)
3762 gdb_assert (gdbarch
!= NULL
);
3763 gdb_assert (gdbarch
->deprecated_init_frame_pc
!= NULL
);
3764 if (gdbarch_debug
>= 2)
3765 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_init_frame_pc called\n");
3766 return gdbarch
->deprecated_init_frame_pc (fromleaf
, prev
);
3770 set_gdbarch_deprecated_init_frame_pc (struct gdbarch
*gdbarch
,
3771 gdbarch_deprecated_init_frame_pc_ftype deprecated_init_frame_pc
)
3773 gdbarch
->deprecated_init_frame_pc
= deprecated_init_frame_pc
;
3777 gdbarch_believe_pcc_promotion (struct gdbarch
*gdbarch
)
3779 gdb_assert (gdbarch
!= NULL
);
3780 if (gdbarch_debug
>= 2)
3781 fprintf_unfiltered (gdb_stdlog
, "gdbarch_believe_pcc_promotion called\n");
3782 return gdbarch
->believe_pcc_promotion
;
3786 set_gdbarch_believe_pcc_promotion (struct gdbarch
*gdbarch
,
3787 int believe_pcc_promotion
)
3789 gdbarch
->believe_pcc_promotion
= believe_pcc_promotion
;
3793 gdbarch_believe_pcc_promotion_type (struct gdbarch
*gdbarch
)
3795 gdb_assert (gdbarch
!= NULL
);
3796 if (gdbarch_debug
>= 2)
3797 fprintf_unfiltered (gdb_stdlog
, "gdbarch_believe_pcc_promotion_type called\n");
3798 return gdbarch
->believe_pcc_promotion_type
;
3802 set_gdbarch_believe_pcc_promotion_type (struct gdbarch
*gdbarch
,
3803 int believe_pcc_promotion_type
)
3805 gdbarch
->believe_pcc_promotion_type
= believe_pcc_promotion_type
;
3809 gdbarch_deprecated_get_saved_register_p (struct gdbarch
*gdbarch
)
3811 gdb_assert (gdbarch
!= NULL
);
3812 return gdbarch
->deprecated_get_saved_register
!= NULL
;
3816 gdbarch_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
)
3818 gdb_assert (gdbarch
!= NULL
);
3819 gdb_assert (gdbarch
->deprecated_get_saved_register
!= NULL
);
3820 if (gdbarch_debug
>= 2)
3821 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_get_saved_register called\n");
3822 gdbarch
->deprecated_get_saved_register (raw_buffer
, optimized
, addrp
, frame
, regnum
, lval
);
3826 set_gdbarch_deprecated_get_saved_register (struct gdbarch
*gdbarch
,
3827 gdbarch_deprecated_get_saved_register_ftype deprecated_get_saved_register
)
3829 gdbarch
->deprecated_get_saved_register
= deprecated_get_saved_register
;
3833 gdbarch_deprecated_register_convertible_p (struct gdbarch
*gdbarch
)
3835 gdb_assert (gdbarch
!= NULL
);
3836 return gdbarch
->deprecated_register_convertible
!= NULL
;
3840 gdbarch_deprecated_register_convertible (struct gdbarch
*gdbarch
, int nr
)
3842 gdb_assert (gdbarch
!= NULL
);
3843 gdb_assert (gdbarch
->deprecated_register_convertible
!= NULL
);
3844 if (gdbarch_debug
>= 2)
3845 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_register_convertible called\n");
3846 return gdbarch
->deprecated_register_convertible (nr
);
3850 set_gdbarch_deprecated_register_convertible (struct gdbarch
*gdbarch
,
3851 gdbarch_deprecated_register_convertible_ftype deprecated_register_convertible
)
3853 gdbarch
->deprecated_register_convertible
= deprecated_register_convertible
;
3857 gdbarch_deprecated_register_convert_to_virtual (struct gdbarch
*gdbarch
, int regnum
, struct type
*type
, char *from
, char *to
)
3859 gdb_assert (gdbarch
!= NULL
);
3860 gdb_assert (gdbarch
->deprecated_register_convert_to_virtual
!= NULL
);
3861 if (gdbarch_debug
>= 2)
3862 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_register_convert_to_virtual called\n");
3863 gdbarch
->deprecated_register_convert_to_virtual (regnum
, type
, from
, to
);
3867 set_gdbarch_deprecated_register_convert_to_virtual (struct gdbarch
*gdbarch
,
3868 gdbarch_deprecated_register_convert_to_virtual_ftype deprecated_register_convert_to_virtual
)
3870 gdbarch
->deprecated_register_convert_to_virtual
= deprecated_register_convert_to_virtual
;
3874 gdbarch_deprecated_register_convert_to_raw (struct gdbarch
*gdbarch
, struct type
*type
, int regnum
, const char *from
, char *to
)
3876 gdb_assert (gdbarch
!= NULL
);
3877 gdb_assert (gdbarch
->deprecated_register_convert_to_raw
!= NULL
);
3878 if (gdbarch_debug
>= 2)
3879 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_register_convert_to_raw called\n");
3880 gdbarch
->deprecated_register_convert_to_raw (type
, regnum
, from
, to
);
3884 set_gdbarch_deprecated_register_convert_to_raw (struct gdbarch
*gdbarch
,
3885 gdbarch_deprecated_register_convert_to_raw_ftype deprecated_register_convert_to_raw
)
3887 gdbarch
->deprecated_register_convert_to_raw
= deprecated_register_convert_to_raw
;
3891 gdbarch_convert_register_p (struct gdbarch
*gdbarch
, int regnum
, struct type
*type
)
3893 gdb_assert (gdbarch
!= NULL
);
3894 gdb_assert (gdbarch
->convert_register_p
!= NULL
);
3895 if (gdbarch_debug
>= 2)
3896 fprintf_unfiltered (gdb_stdlog
, "gdbarch_convert_register_p called\n");
3897 return gdbarch
->convert_register_p (regnum
, type
);
3901 set_gdbarch_convert_register_p (struct gdbarch
*gdbarch
,
3902 gdbarch_convert_register_p_ftype convert_register_p
)
3904 gdbarch
->convert_register_p
= convert_register_p
;
3908 gdbarch_register_to_value (struct gdbarch
*gdbarch
, struct frame_info
*frame
, int regnum
, struct type
*type
, void *buf
)
3910 gdb_assert (gdbarch
!= NULL
);
3911 gdb_assert (gdbarch
->register_to_value
!= NULL
);
3912 if (gdbarch_debug
>= 2)
3913 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_to_value called\n");
3914 gdbarch
->register_to_value (frame
, regnum
, type
, buf
);
3918 set_gdbarch_register_to_value (struct gdbarch
*gdbarch
,
3919 gdbarch_register_to_value_ftype register_to_value
)
3921 gdbarch
->register_to_value
= register_to_value
;
3925 gdbarch_value_to_register (struct gdbarch
*gdbarch
, struct frame_info
*frame
, int regnum
, struct type
*type
, const void *buf
)
3927 gdb_assert (gdbarch
!= NULL
);
3928 gdb_assert (gdbarch
->value_to_register
!= NULL
);
3929 if (gdbarch_debug
>= 2)
3930 fprintf_unfiltered (gdb_stdlog
, "gdbarch_value_to_register called\n");
3931 gdbarch
->value_to_register (frame
, regnum
, type
, buf
);
3935 set_gdbarch_value_to_register (struct gdbarch
*gdbarch
,
3936 gdbarch_value_to_register_ftype value_to_register
)
3938 gdbarch
->value_to_register
= value_to_register
;
3942 gdbarch_pointer_to_address (struct gdbarch
*gdbarch
, struct type
*type
, const void *buf
)
3944 gdb_assert (gdbarch
!= NULL
);
3945 gdb_assert (gdbarch
->pointer_to_address
!= NULL
);
3946 if (gdbarch_debug
>= 2)
3947 fprintf_unfiltered (gdb_stdlog
, "gdbarch_pointer_to_address called\n");
3948 return gdbarch
->pointer_to_address (type
, buf
);
3952 set_gdbarch_pointer_to_address (struct gdbarch
*gdbarch
,
3953 gdbarch_pointer_to_address_ftype pointer_to_address
)
3955 gdbarch
->pointer_to_address
= pointer_to_address
;
3959 gdbarch_address_to_pointer (struct gdbarch
*gdbarch
, struct type
*type
, void *buf
, CORE_ADDR addr
)
3961 gdb_assert (gdbarch
!= NULL
);
3962 gdb_assert (gdbarch
->address_to_pointer
!= NULL
);
3963 if (gdbarch_debug
>= 2)
3964 fprintf_unfiltered (gdb_stdlog
, "gdbarch_address_to_pointer called\n");
3965 gdbarch
->address_to_pointer (type
, buf
, addr
);
3969 set_gdbarch_address_to_pointer (struct gdbarch
*gdbarch
,
3970 gdbarch_address_to_pointer_ftype address_to_pointer
)
3972 gdbarch
->address_to_pointer
= address_to_pointer
;
3976 gdbarch_integer_to_address_p (struct gdbarch
*gdbarch
)
3978 gdb_assert (gdbarch
!= NULL
);
3979 return gdbarch
->integer_to_address
!= NULL
;
3983 gdbarch_integer_to_address (struct gdbarch
*gdbarch
, struct type
*type
, void *buf
)
3985 gdb_assert (gdbarch
!= NULL
);
3986 gdb_assert (gdbarch
->integer_to_address
!= NULL
);
3987 if (gdbarch_debug
>= 2)
3988 fprintf_unfiltered (gdb_stdlog
, "gdbarch_integer_to_address called\n");
3989 return gdbarch
->integer_to_address (type
, buf
);
3993 set_gdbarch_integer_to_address (struct gdbarch
*gdbarch
,
3994 gdbarch_integer_to_address_ftype integer_to_address
)
3996 gdbarch
->integer_to_address
= integer_to_address
;
4000 gdbarch_deprecated_pop_frame_p (struct gdbarch
*gdbarch
)
4002 gdb_assert (gdbarch
!= NULL
);
4003 return gdbarch
->deprecated_pop_frame
!= NULL
;
4007 gdbarch_deprecated_pop_frame (struct gdbarch
*gdbarch
)
4009 gdb_assert (gdbarch
!= NULL
);
4010 gdb_assert (gdbarch
->deprecated_pop_frame
!= NULL
);
4011 if (gdbarch_debug
>= 2)
4012 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_pop_frame called\n");
4013 gdbarch
->deprecated_pop_frame ();
4017 set_gdbarch_deprecated_pop_frame (struct gdbarch
*gdbarch
,
4018 gdbarch_deprecated_pop_frame_ftype deprecated_pop_frame
)
4020 gdbarch
->deprecated_pop_frame
= deprecated_pop_frame
;
4024 gdbarch_deprecated_store_struct_return_p (struct gdbarch
*gdbarch
)
4026 gdb_assert (gdbarch
!= NULL
);
4027 return gdbarch
->deprecated_store_struct_return
!= NULL
;
4031 gdbarch_deprecated_store_struct_return (struct gdbarch
*gdbarch
, CORE_ADDR addr
, CORE_ADDR sp
)
4033 gdb_assert (gdbarch
!= NULL
);
4034 gdb_assert (gdbarch
->deprecated_store_struct_return
!= NULL
);
4035 if (gdbarch_debug
>= 2)
4036 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_store_struct_return called\n");
4037 gdbarch
->deprecated_store_struct_return (addr
, sp
);
4041 set_gdbarch_deprecated_store_struct_return (struct gdbarch
*gdbarch
,
4042 gdbarch_deprecated_store_struct_return_ftype deprecated_store_struct_return
)
4044 gdbarch
->deprecated_store_struct_return
= deprecated_store_struct_return
;
4048 gdbarch_return_value_p (struct gdbarch
*gdbarch
)
4050 gdb_assert (gdbarch
!= NULL
);
4051 return gdbarch
->return_value
!= NULL
;
4054 enum return_value_convention
4055 gdbarch_return_value (struct gdbarch
*gdbarch
, struct type
*valtype
, struct regcache
*regcache
, void *readbuf
, const void *writebuf
)
4057 gdb_assert (gdbarch
!= NULL
);
4058 gdb_assert (gdbarch
->return_value
!= NULL
);
4059 if (gdbarch_debug
>= 2)
4060 fprintf_unfiltered (gdb_stdlog
, "gdbarch_return_value called\n");
4061 return gdbarch
->return_value (gdbarch
, valtype
, regcache
, readbuf
, writebuf
);
4065 set_gdbarch_return_value (struct gdbarch
*gdbarch
,
4066 gdbarch_return_value_ftype return_value
)
4068 gdbarch
->return_value
= return_value
;
4072 gdbarch_return_value_on_stack (struct gdbarch
*gdbarch
, struct type
*type
)
4074 gdb_assert (gdbarch
!= NULL
);
4075 gdb_assert (gdbarch
->return_value_on_stack
!= NULL
);
4076 if (gdbarch_debug
>= 2)
4077 fprintf_unfiltered (gdb_stdlog
, "gdbarch_return_value_on_stack called\n");
4078 return gdbarch
->return_value_on_stack (type
);
4082 set_gdbarch_return_value_on_stack (struct gdbarch
*gdbarch
,
4083 gdbarch_return_value_on_stack_ftype return_value_on_stack
)
4085 gdbarch
->return_value_on_stack
= return_value_on_stack
;
4089 gdbarch_extract_return_value (struct gdbarch
*gdbarch
, struct type
*type
, struct regcache
*regcache
, void *valbuf
)
4091 gdb_assert (gdbarch
!= NULL
);
4092 gdb_assert (gdbarch
->extract_return_value
!= NULL
);
4093 if (gdbarch_debug
>= 2)
4094 fprintf_unfiltered (gdb_stdlog
, "gdbarch_extract_return_value called\n");
4095 gdbarch
->extract_return_value (type
, regcache
, valbuf
);
4099 set_gdbarch_extract_return_value (struct gdbarch
*gdbarch
,
4100 gdbarch_extract_return_value_ftype extract_return_value
)
4102 gdbarch
->extract_return_value
= extract_return_value
;
4106 gdbarch_store_return_value (struct gdbarch
*gdbarch
, struct type
*type
, struct regcache
*regcache
, const void *valbuf
)
4108 gdb_assert (gdbarch
!= NULL
);
4109 gdb_assert (gdbarch
->store_return_value
!= NULL
);
4110 if (gdbarch_debug
>= 2)
4111 fprintf_unfiltered (gdb_stdlog
, "gdbarch_store_return_value called\n");
4112 gdbarch
->store_return_value (type
, regcache
, valbuf
);
4116 set_gdbarch_store_return_value (struct gdbarch
*gdbarch
,
4117 gdbarch_store_return_value_ftype store_return_value
)
4119 gdbarch
->store_return_value
= store_return_value
;
4123 gdbarch_deprecated_extract_return_value (struct gdbarch
*gdbarch
, struct type
*type
, char *regbuf
, char *valbuf
)
4125 gdb_assert (gdbarch
!= NULL
);
4126 gdb_assert (gdbarch
->deprecated_extract_return_value
!= NULL
);
4127 if (gdbarch_debug
>= 2)
4128 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_extract_return_value called\n");
4129 gdbarch
->deprecated_extract_return_value (type
, regbuf
, valbuf
);
4133 set_gdbarch_deprecated_extract_return_value (struct gdbarch
*gdbarch
,
4134 gdbarch_deprecated_extract_return_value_ftype deprecated_extract_return_value
)
4136 gdbarch
->deprecated_extract_return_value
= deprecated_extract_return_value
;
4140 gdbarch_deprecated_store_return_value (struct gdbarch
*gdbarch
, struct type
*type
, char *valbuf
)
4142 gdb_assert (gdbarch
!= NULL
);
4143 gdb_assert (gdbarch
->deprecated_store_return_value
!= NULL
);
4144 if (gdbarch_debug
>= 2)
4145 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_store_return_value called\n");
4146 gdbarch
->deprecated_store_return_value (type
, valbuf
);
4150 set_gdbarch_deprecated_store_return_value (struct gdbarch
*gdbarch
,
4151 gdbarch_deprecated_store_return_value_ftype deprecated_store_return_value
)
4153 gdbarch
->deprecated_store_return_value
= deprecated_store_return_value
;
4157 gdbarch_use_struct_convention (struct gdbarch
*gdbarch
, int gcc_p
, struct type
*value_type
)
4159 gdb_assert (gdbarch
!= NULL
);
4160 gdb_assert (gdbarch
->use_struct_convention
!= NULL
);
4161 if (gdbarch_debug
>= 2)
4162 fprintf_unfiltered (gdb_stdlog
, "gdbarch_use_struct_convention called\n");
4163 return gdbarch
->use_struct_convention (gcc_p
, value_type
);
4167 set_gdbarch_use_struct_convention (struct gdbarch
*gdbarch
,
4168 gdbarch_use_struct_convention_ftype use_struct_convention
)
4170 gdbarch
->use_struct_convention
= use_struct_convention
;
4174 gdbarch_deprecated_extract_struct_value_address_p (struct gdbarch
*gdbarch
)
4176 gdb_assert (gdbarch
!= NULL
);
4177 return gdbarch
->deprecated_extract_struct_value_address
!= NULL
;
4181 gdbarch_deprecated_extract_struct_value_address (struct gdbarch
*gdbarch
, struct regcache
*regcache
)
4183 gdb_assert (gdbarch
!= NULL
);
4184 gdb_assert (gdbarch
->deprecated_extract_struct_value_address
!= NULL
);
4185 if (gdbarch_debug
>= 2)
4186 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_extract_struct_value_address called\n");
4187 return gdbarch
->deprecated_extract_struct_value_address (regcache
);
4191 set_gdbarch_deprecated_extract_struct_value_address (struct gdbarch
*gdbarch
,
4192 gdbarch_deprecated_extract_struct_value_address_ftype deprecated_extract_struct_value_address
)
4194 gdbarch
->deprecated_extract_struct_value_address
= deprecated_extract_struct_value_address
;
4198 gdbarch_deprecated_frame_init_saved_regs_p (struct gdbarch
*gdbarch
)
4200 gdb_assert (gdbarch
!= NULL
);
4201 return gdbarch
->deprecated_frame_init_saved_regs
!= NULL
;
4205 gdbarch_deprecated_frame_init_saved_regs (struct gdbarch
*gdbarch
, struct frame_info
*frame
)
4207 gdb_assert (gdbarch
!= NULL
);
4208 gdb_assert (gdbarch
->deprecated_frame_init_saved_regs
!= NULL
);
4209 if (gdbarch_debug
>= 2)
4210 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_frame_init_saved_regs called\n");
4211 gdbarch
->deprecated_frame_init_saved_regs (frame
);
4215 set_gdbarch_deprecated_frame_init_saved_regs (struct gdbarch
*gdbarch
,
4216 gdbarch_deprecated_frame_init_saved_regs_ftype deprecated_frame_init_saved_regs
)
4218 gdbarch
->deprecated_frame_init_saved_regs
= deprecated_frame_init_saved_regs
;
4222 gdbarch_deprecated_init_extra_frame_info_p (struct gdbarch
*gdbarch
)
4224 gdb_assert (gdbarch
!= NULL
);
4225 return gdbarch
->deprecated_init_extra_frame_info
!= NULL
;
4229 gdbarch_deprecated_init_extra_frame_info (struct gdbarch
*gdbarch
, int fromleaf
, struct frame_info
*frame
)
4231 gdb_assert (gdbarch
!= NULL
);
4232 gdb_assert (gdbarch
->deprecated_init_extra_frame_info
!= NULL
);
4233 if (gdbarch_debug
>= 2)
4234 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_init_extra_frame_info called\n");
4235 gdbarch
->deprecated_init_extra_frame_info (fromleaf
, frame
);
4239 set_gdbarch_deprecated_init_extra_frame_info (struct gdbarch
*gdbarch
,
4240 gdbarch_deprecated_init_extra_frame_info_ftype deprecated_init_extra_frame_info
)
4242 gdbarch
->deprecated_init_extra_frame_info
= deprecated_init_extra_frame_info
;
4246 gdbarch_skip_prologue (struct gdbarch
*gdbarch
, CORE_ADDR ip
)
4248 gdb_assert (gdbarch
!= NULL
);
4249 gdb_assert (gdbarch
->skip_prologue
!= NULL
);
4250 if (gdbarch_debug
>= 2)
4251 fprintf_unfiltered (gdb_stdlog
, "gdbarch_skip_prologue called\n");
4252 return gdbarch
->skip_prologue (ip
);
4256 set_gdbarch_skip_prologue (struct gdbarch
*gdbarch
,
4257 gdbarch_skip_prologue_ftype skip_prologue
)
4259 gdbarch
->skip_prologue
= skip_prologue
;
4263 gdbarch_inner_than (struct gdbarch
*gdbarch
, CORE_ADDR lhs
, CORE_ADDR rhs
)
4265 gdb_assert (gdbarch
!= NULL
);
4266 gdb_assert (gdbarch
->inner_than
!= NULL
);
4267 if (gdbarch_debug
>= 2)
4268 fprintf_unfiltered (gdb_stdlog
, "gdbarch_inner_than called\n");
4269 return gdbarch
->inner_than (lhs
, rhs
);
4273 set_gdbarch_inner_than (struct gdbarch
*gdbarch
,
4274 gdbarch_inner_than_ftype inner_than
)
4276 gdbarch
->inner_than
= inner_than
;
4279 const unsigned char *
4280 gdbarch_breakpoint_from_pc (struct gdbarch
*gdbarch
, CORE_ADDR
*pcptr
, int *lenptr
)
4282 gdb_assert (gdbarch
!= NULL
);
4283 gdb_assert (gdbarch
->breakpoint_from_pc
!= NULL
);
4284 if (gdbarch_debug
>= 2)
4285 fprintf_unfiltered (gdb_stdlog
, "gdbarch_breakpoint_from_pc called\n");
4286 return gdbarch
->breakpoint_from_pc (pcptr
, lenptr
);
4290 set_gdbarch_breakpoint_from_pc (struct gdbarch
*gdbarch
,
4291 gdbarch_breakpoint_from_pc_ftype breakpoint_from_pc
)
4293 gdbarch
->breakpoint_from_pc
= breakpoint_from_pc
;
4297 gdbarch_adjust_breakpoint_address_p (struct gdbarch
*gdbarch
)
4299 gdb_assert (gdbarch
!= NULL
);
4300 return gdbarch
->adjust_breakpoint_address
!= NULL
;
4304 gdbarch_adjust_breakpoint_address (struct gdbarch
*gdbarch
, CORE_ADDR bpaddr
)
4306 gdb_assert (gdbarch
!= NULL
);
4307 gdb_assert (gdbarch
->adjust_breakpoint_address
!= NULL
);
4308 if (gdbarch_debug
>= 2)
4309 fprintf_unfiltered (gdb_stdlog
, "gdbarch_adjust_breakpoint_address called\n");
4310 return gdbarch
->adjust_breakpoint_address (gdbarch
, bpaddr
);
4314 set_gdbarch_adjust_breakpoint_address (struct gdbarch
*gdbarch
,
4315 gdbarch_adjust_breakpoint_address_ftype adjust_breakpoint_address
)
4317 gdbarch
->adjust_breakpoint_address
= adjust_breakpoint_address
;
4321 gdbarch_memory_insert_breakpoint (struct gdbarch
*gdbarch
, CORE_ADDR addr
, char *contents_cache
)
4323 gdb_assert (gdbarch
!= NULL
);
4324 gdb_assert (gdbarch
->memory_insert_breakpoint
!= NULL
);
4325 if (gdbarch_debug
>= 2)
4326 fprintf_unfiltered (gdb_stdlog
, "gdbarch_memory_insert_breakpoint called\n");
4327 return gdbarch
->memory_insert_breakpoint (addr
, contents_cache
);
4331 set_gdbarch_memory_insert_breakpoint (struct gdbarch
*gdbarch
,
4332 gdbarch_memory_insert_breakpoint_ftype memory_insert_breakpoint
)
4334 gdbarch
->memory_insert_breakpoint
= memory_insert_breakpoint
;
4338 gdbarch_memory_remove_breakpoint (struct gdbarch
*gdbarch
, CORE_ADDR addr
, char *contents_cache
)
4340 gdb_assert (gdbarch
!= NULL
);
4341 gdb_assert (gdbarch
->memory_remove_breakpoint
!= NULL
);
4342 if (gdbarch_debug
>= 2)
4343 fprintf_unfiltered (gdb_stdlog
, "gdbarch_memory_remove_breakpoint called\n");
4344 return gdbarch
->memory_remove_breakpoint (addr
, contents_cache
);
4348 set_gdbarch_memory_remove_breakpoint (struct gdbarch
*gdbarch
,
4349 gdbarch_memory_remove_breakpoint_ftype memory_remove_breakpoint
)
4351 gdbarch
->memory_remove_breakpoint
= memory_remove_breakpoint
;
4355 gdbarch_decr_pc_after_break (struct gdbarch
*gdbarch
)
4357 gdb_assert (gdbarch
!= NULL
);
4358 /* Skip verify of decr_pc_after_break, invalid_p == 0 */
4359 if (gdbarch_debug
>= 2)
4360 fprintf_unfiltered (gdb_stdlog
, "gdbarch_decr_pc_after_break called\n");
4361 return gdbarch
->decr_pc_after_break
;
4365 set_gdbarch_decr_pc_after_break (struct gdbarch
*gdbarch
,
4366 CORE_ADDR decr_pc_after_break
)
4368 gdbarch
->decr_pc_after_break
= decr_pc_after_break
;
4372 gdbarch_function_start_offset (struct gdbarch
*gdbarch
)
4374 gdb_assert (gdbarch
!= NULL
);
4375 /* Skip verify of function_start_offset, invalid_p == 0 */
4376 if (gdbarch_debug
>= 2)
4377 fprintf_unfiltered (gdb_stdlog
, "gdbarch_function_start_offset called\n");
4378 return gdbarch
->function_start_offset
;
4382 set_gdbarch_function_start_offset (struct gdbarch
*gdbarch
,
4383 CORE_ADDR function_start_offset
)
4385 gdbarch
->function_start_offset
= function_start_offset
;
4389 gdbarch_remote_translate_xfer_address (struct gdbarch
*gdbarch
, struct regcache
*regcache
, CORE_ADDR gdb_addr
, int gdb_len
, CORE_ADDR
*rem_addr
, int *rem_len
)
4391 gdb_assert (gdbarch
!= NULL
);
4392 gdb_assert (gdbarch
->remote_translate_xfer_address
!= NULL
);
4393 if (gdbarch_debug
>= 2)
4394 fprintf_unfiltered (gdb_stdlog
, "gdbarch_remote_translate_xfer_address called\n");
4395 gdbarch
->remote_translate_xfer_address (gdbarch
, regcache
, gdb_addr
, gdb_len
, rem_addr
, rem_len
);
4399 set_gdbarch_remote_translate_xfer_address (struct gdbarch
*gdbarch
,
4400 gdbarch_remote_translate_xfer_address_ftype remote_translate_xfer_address
)
4402 gdbarch
->remote_translate_xfer_address
= remote_translate_xfer_address
;
4406 gdbarch_frame_args_skip (struct gdbarch
*gdbarch
)
4408 gdb_assert (gdbarch
!= NULL
);
4409 /* Skip verify of frame_args_skip, invalid_p == 0 */
4410 if (gdbarch_debug
>= 2)
4411 fprintf_unfiltered (gdb_stdlog
, "gdbarch_frame_args_skip called\n");
4412 return gdbarch
->frame_args_skip
;
4416 set_gdbarch_frame_args_skip (struct gdbarch
*gdbarch
,
4417 CORE_ADDR frame_args_skip
)
4419 gdbarch
->frame_args_skip
= frame_args_skip
;
4423 gdbarch_deprecated_frameless_function_invocation_p (struct gdbarch
*gdbarch
)
4425 gdb_assert (gdbarch
!= NULL
);
4426 return gdbarch
->deprecated_frameless_function_invocation
!= NULL
;
4430 gdbarch_deprecated_frameless_function_invocation (struct gdbarch
*gdbarch
, struct frame_info
*fi
)
4432 gdb_assert (gdbarch
!= NULL
);
4433 gdb_assert (gdbarch
->deprecated_frameless_function_invocation
!= NULL
);
4434 if (gdbarch_debug
>= 2)
4435 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_frameless_function_invocation called\n");
4436 return gdbarch
->deprecated_frameless_function_invocation (fi
);
4440 set_gdbarch_deprecated_frameless_function_invocation (struct gdbarch
*gdbarch
,
4441 gdbarch_deprecated_frameless_function_invocation_ftype deprecated_frameless_function_invocation
)
4443 gdbarch
->deprecated_frameless_function_invocation
= deprecated_frameless_function_invocation
;
4447 gdbarch_deprecated_frame_chain_p (struct gdbarch
*gdbarch
)
4449 gdb_assert (gdbarch
!= NULL
);
4450 return gdbarch
->deprecated_frame_chain
!= NULL
;
4454 gdbarch_deprecated_frame_chain (struct gdbarch
*gdbarch
, struct frame_info
*frame
)
4456 gdb_assert (gdbarch
!= NULL
);
4457 gdb_assert (gdbarch
->deprecated_frame_chain
!= NULL
);
4458 if (gdbarch_debug
>= 2)
4459 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_frame_chain called\n");
4460 return gdbarch
->deprecated_frame_chain (frame
);
4464 set_gdbarch_deprecated_frame_chain (struct gdbarch
*gdbarch
,
4465 gdbarch_deprecated_frame_chain_ftype deprecated_frame_chain
)
4467 gdbarch
->deprecated_frame_chain
= deprecated_frame_chain
;
4471 gdbarch_deprecated_frame_chain_valid_p (struct gdbarch
*gdbarch
)
4473 gdb_assert (gdbarch
!= NULL
);
4474 return gdbarch
->deprecated_frame_chain_valid
!= NULL
;
4478 gdbarch_deprecated_frame_chain_valid (struct gdbarch
*gdbarch
, CORE_ADDR chain
, struct frame_info
*thisframe
)
4480 gdb_assert (gdbarch
!= NULL
);
4481 gdb_assert (gdbarch
->deprecated_frame_chain_valid
!= NULL
);
4482 if (gdbarch_debug
>= 2)
4483 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_frame_chain_valid called\n");
4484 return gdbarch
->deprecated_frame_chain_valid (chain
, thisframe
);
4488 set_gdbarch_deprecated_frame_chain_valid (struct gdbarch
*gdbarch
,
4489 gdbarch_deprecated_frame_chain_valid_ftype deprecated_frame_chain_valid
)
4491 gdbarch
->deprecated_frame_chain_valid
= deprecated_frame_chain_valid
;
4495 gdbarch_deprecated_frame_saved_pc_p (struct gdbarch
*gdbarch
)
4497 gdb_assert (gdbarch
!= NULL
);
4498 return gdbarch
->deprecated_frame_saved_pc
!= NULL
;
4502 gdbarch_deprecated_frame_saved_pc (struct gdbarch
*gdbarch
, struct frame_info
*fi
)
4504 gdb_assert (gdbarch
!= NULL
);
4505 gdb_assert (gdbarch
->deprecated_frame_saved_pc
!= NULL
);
4506 if (gdbarch_debug
>= 2)
4507 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_frame_saved_pc called\n");
4508 return gdbarch
->deprecated_frame_saved_pc (fi
);
4512 set_gdbarch_deprecated_frame_saved_pc (struct gdbarch
*gdbarch
,
4513 gdbarch_deprecated_frame_saved_pc_ftype deprecated_frame_saved_pc
)
4515 gdbarch
->deprecated_frame_saved_pc
= deprecated_frame_saved_pc
;
4519 gdbarch_unwind_pc_p (struct gdbarch
*gdbarch
)
4521 gdb_assert (gdbarch
!= NULL
);
4522 return gdbarch
->unwind_pc
!= NULL
;
4526 gdbarch_unwind_pc (struct gdbarch
*gdbarch
, struct frame_info
*next_frame
)
4528 gdb_assert (gdbarch
!= NULL
);
4529 gdb_assert (gdbarch
->unwind_pc
!= NULL
);
4530 if (gdbarch_debug
>= 2)
4531 fprintf_unfiltered (gdb_stdlog
, "gdbarch_unwind_pc called\n");
4532 return gdbarch
->unwind_pc (gdbarch
, next_frame
);
4536 set_gdbarch_unwind_pc (struct gdbarch
*gdbarch
,
4537 gdbarch_unwind_pc_ftype unwind_pc
)
4539 gdbarch
->unwind_pc
= unwind_pc
;
4543 gdbarch_unwind_sp_p (struct gdbarch
*gdbarch
)
4545 gdb_assert (gdbarch
!= NULL
);
4546 return gdbarch
->unwind_sp
!= NULL
;
4550 gdbarch_unwind_sp (struct gdbarch
*gdbarch
, struct frame_info
*next_frame
)
4552 gdb_assert (gdbarch
!= NULL
);
4553 gdb_assert (gdbarch
->unwind_sp
!= NULL
);
4554 if (gdbarch_debug
>= 2)
4555 fprintf_unfiltered (gdb_stdlog
, "gdbarch_unwind_sp called\n");
4556 return gdbarch
->unwind_sp (gdbarch
, next_frame
);
4560 set_gdbarch_unwind_sp (struct gdbarch
*gdbarch
,
4561 gdbarch_unwind_sp_ftype unwind_sp
)
4563 gdbarch
->unwind_sp
= unwind_sp
;
4567 gdbarch_deprecated_frame_args_address_p (struct gdbarch
*gdbarch
)
4569 gdb_assert (gdbarch
!= NULL
);
4570 return gdbarch
->deprecated_frame_args_address
!= get_frame_base
;
4574 gdbarch_deprecated_frame_args_address (struct gdbarch
*gdbarch
, struct frame_info
*fi
)
4576 gdb_assert (gdbarch
!= NULL
);
4577 gdb_assert (gdbarch
->deprecated_frame_args_address
!= NULL
);
4578 /* Do not check predicate: gdbarch->deprecated_frame_args_address != get_frame_base, allow call. */
4579 if (gdbarch_debug
>= 2)
4580 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_frame_args_address called\n");
4581 return gdbarch
->deprecated_frame_args_address (fi
);
4585 set_gdbarch_deprecated_frame_args_address (struct gdbarch
*gdbarch
,
4586 gdbarch_deprecated_frame_args_address_ftype deprecated_frame_args_address
)
4588 gdbarch
->deprecated_frame_args_address
= deprecated_frame_args_address
;
4592 gdbarch_deprecated_frame_locals_address_p (struct gdbarch
*gdbarch
)
4594 gdb_assert (gdbarch
!= NULL
);
4595 return gdbarch
->deprecated_frame_locals_address
!= get_frame_base
;
4599 gdbarch_deprecated_frame_locals_address (struct gdbarch
*gdbarch
, struct frame_info
*fi
)
4601 gdb_assert (gdbarch
!= NULL
);
4602 gdb_assert (gdbarch
->deprecated_frame_locals_address
!= NULL
);
4603 /* Do not check predicate: gdbarch->deprecated_frame_locals_address != get_frame_base, allow call. */
4604 if (gdbarch_debug
>= 2)
4605 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_frame_locals_address called\n");
4606 return gdbarch
->deprecated_frame_locals_address (fi
);
4610 set_gdbarch_deprecated_frame_locals_address (struct gdbarch
*gdbarch
,
4611 gdbarch_deprecated_frame_locals_address_ftype deprecated_frame_locals_address
)
4613 gdbarch
->deprecated_frame_locals_address
= deprecated_frame_locals_address
;
4617 gdbarch_deprecated_saved_pc_after_call_p (struct gdbarch
*gdbarch
)
4619 gdb_assert (gdbarch
!= NULL
);
4620 return gdbarch
->deprecated_saved_pc_after_call
!= NULL
;
4624 gdbarch_deprecated_saved_pc_after_call (struct gdbarch
*gdbarch
, struct frame_info
*frame
)
4626 gdb_assert (gdbarch
!= NULL
);
4627 gdb_assert (gdbarch
->deprecated_saved_pc_after_call
!= NULL
);
4628 if (gdbarch_debug
>= 2)
4629 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_saved_pc_after_call called\n");
4630 return gdbarch
->deprecated_saved_pc_after_call (frame
);
4634 set_gdbarch_deprecated_saved_pc_after_call (struct gdbarch
*gdbarch
,
4635 gdbarch_deprecated_saved_pc_after_call_ftype deprecated_saved_pc_after_call
)
4637 gdbarch
->deprecated_saved_pc_after_call
= deprecated_saved_pc_after_call
;
4641 gdbarch_frame_num_args_p (struct gdbarch
*gdbarch
)
4643 gdb_assert (gdbarch
!= NULL
);
4644 return gdbarch
->frame_num_args
!= NULL
;
4648 gdbarch_frame_num_args (struct gdbarch
*gdbarch
, struct frame_info
*frame
)
4650 gdb_assert (gdbarch
!= NULL
);
4651 gdb_assert (gdbarch
->frame_num_args
!= NULL
);
4652 if (gdbarch_debug
>= 2)
4653 fprintf_unfiltered (gdb_stdlog
, "gdbarch_frame_num_args called\n");
4654 return gdbarch
->frame_num_args (frame
);
4658 set_gdbarch_frame_num_args (struct gdbarch
*gdbarch
,
4659 gdbarch_frame_num_args_ftype frame_num_args
)
4661 gdbarch
->frame_num_args
= frame_num_args
;
4665 gdbarch_deprecated_stack_align_p (struct gdbarch
*gdbarch
)
4667 gdb_assert (gdbarch
!= NULL
);
4668 return gdbarch
->deprecated_stack_align
!= NULL
;
4672 gdbarch_deprecated_stack_align (struct gdbarch
*gdbarch
, CORE_ADDR sp
)
4674 gdb_assert (gdbarch
!= NULL
);
4675 gdb_assert (gdbarch
->deprecated_stack_align
!= NULL
);
4676 if (gdbarch_debug
>= 2)
4677 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_stack_align called\n");
4678 return gdbarch
->deprecated_stack_align (sp
);
4682 set_gdbarch_deprecated_stack_align (struct gdbarch
*gdbarch
,
4683 gdbarch_deprecated_stack_align_ftype deprecated_stack_align
)
4685 gdbarch
->deprecated_stack_align
= deprecated_stack_align
;
4689 gdbarch_frame_align_p (struct gdbarch
*gdbarch
)
4691 gdb_assert (gdbarch
!= NULL
);
4692 return gdbarch
->frame_align
!= NULL
;
4696 gdbarch_frame_align (struct gdbarch
*gdbarch
, CORE_ADDR address
)
4698 gdb_assert (gdbarch
!= NULL
);
4699 gdb_assert (gdbarch
->frame_align
!= NULL
);
4700 if (gdbarch_debug
>= 2)
4701 fprintf_unfiltered (gdb_stdlog
, "gdbarch_frame_align called\n");
4702 return gdbarch
->frame_align (gdbarch
, address
);
4706 set_gdbarch_frame_align (struct gdbarch
*gdbarch
,
4707 gdbarch_frame_align_ftype frame_align
)
4709 gdbarch
->frame_align
= frame_align
;
4713 gdbarch_deprecated_reg_struct_has_addr_p (struct gdbarch
*gdbarch
)
4715 gdb_assert (gdbarch
!= NULL
);
4716 return gdbarch
->deprecated_reg_struct_has_addr
!= NULL
;
4720 gdbarch_deprecated_reg_struct_has_addr (struct gdbarch
*gdbarch
, int gcc_p
, struct type
*type
)
4722 gdb_assert (gdbarch
!= NULL
);
4723 gdb_assert (gdbarch
->deprecated_reg_struct_has_addr
!= NULL
);
4724 if (gdbarch_debug
>= 2)
4725 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_reg_struct_has_addr called\n");
4726 return gdbarch
->deprecated_reg_struct_has_addr (gcc_p
, type
);
4730 set_gdbarch_deprecated_reg_struct_has_addr (struct gdbarch
*gdbarch
,
4731 gdbarch_deprecated_reg_struct_has_addr_ftype deprecated_reg_struct_has_addr
)
4733 gdbarch
->deprecated_reg_struct_has_addr
= deprecated_reg_struct_has_addr
;
4737 gdbarch_stabs_argument_has_addr (struct gdbarch
*gdbarch
, struct type
*type
)
4739 gdb_assert (gdbarch
!= NULL
);
4740 gdb_assert (gdbarch
->stabs_argument_has_addr
!= NULL
);
4741 if (gdbarch_debug
>= 2)
4742 fprintf_unfiltered (gdb_stdlog
, "gdbarch_stabs_argument_has_addr called\n");
4743 return gdbarch
->stabs_argument_has_addr (gdbarch
, type
);
4747 set_gdbarch_stabs_argument_has_addr (struct gdbarch
*gdbarch
,
4748 gdbarch_stabs_argument_has_addr_ftype stabs_argument_has_addr
)
4750 gdbarch
->stabs_argument_has_addr
= stabs_argument_has_addr
;
4754 gdbarch_frame_red_zone_size (struct gdbarch
*gdbarch
)
4756 gdb_assert (gdbarch
!= NULL
);
4757 if (gdbarch_debug
>= 2)
4758 fprintf_unfiltered (gdb_stdlog
, "gdbarch_frame_red_zone_size called\n");
4759 return gdbarch
->frame_red_zone_size
;
4763 set_gdbarch_frame_red_zone_size (struct gdbarch
*gdbarch
,
4764 int frame_red_zone_size
)
4766 gdbarch
->frame_red_zone_size
= frame_red_zone_size
;
4770 gdbarch_parm_boundary (struct gdbarch
*gdbarch
)
4772 gdb_assert (gdbarch
!= NULL
);
4773 if (gdbarch_debug
>= 2)
4774 fprintf_unfiltered (gdb_stdlog
, "gdbarch_parm_boundary called\n");
4775 return gdbarch
->parm_boundary
;
4779 set_gdbarch_parm_boundary (struct gdbarch
*gdbarch
,
4782 gdbarch
->parm_boundary
= parm_boundary
;
4785 const struct floatformat
*
4786 gdbarch_float_format (struct gdbarch
*gdbarch
)
4788 gdb_assert (gdbarch
!= NULL
);
4789 if (gdbarch_debug
>= 2)
4790 fprintf_unfiltered (gdb_stdlog
, "gdbarch_float_format called\n");
4791 return gdbarch
->float_format
;
4795 set_gdbarch_float_format (struct gdbarch
*gdbarch
,
4796 const struct floatformat
* float_format
)
4798 gdbarch
->float_format
= float_format
;
4801 const struct floatformat
*
4802 gdbarch_double_format (struct gdbarch
*gdbarch
)
4804 gdb_assert (gdbarch
!= NULL
);
4805 if (gdbarch_debug
>= 2)
4806 fprintf_unfiltered (gdb_stdlog
, "gdbarch_double_format called\n");
4807 return gdbarch
->double_format
;
4811 set_gdbarch_double_format (struct gdbarch
*gdbarch
,
4812 const struct floatformat
* double_format
)
4814 gdbarch
->double_format
= double_format
;
4817 const struct floatformat
*
4818 gdbarch_long_double_format (struct gdbarch
*gdbarch
)
4820 gdb_assert (gdbarch
!= NULL
);
4821 if (gdbarch_debug
>= 2)
4822 fprintf_unfiltered (gdb_stdlog
, "gdbarch_long_double_format called\n");
4823 return gdbarch
->long_double_format
;
4827 set_gdbarch_long_double_format (struct gdbarch
*gdbarch
,
4828 const struct floatformat
* long_double_format
)
4830 gdbarch
->long_double_format
= long_double_format
;
4834 gdbarch_convert_from_func_ptr_addr (struct gdbarch
*gdbarch
, CORE_ADDR addr
, struct target_ops
*targ
)
4836 gdb_assert (gdbarch
!= NULL
);
4837 gdb_assert (gdbarch
->convert_from_func_ptr_addr
!= NULL
);
4838 if (gdbarch_debug
>= 2)
4839 fprintf_unfiltered (gdb_stdlog
, "gdbarch_convert_from_func_ptr_addr called\n");
4840 return gdbarch
->convert_from_func_ptr_addr (gdbarch
, addr
, targ
);
4844 set_gdbarch_convert_from_func_ptr_addr (struct gdbarch
*gdbarch
,
4845 gdbarch_convert_from_func_ptr_addr_ftype convert_from_func_ptr_addr
)
4847 gdbarch
->convert_from_func_ptr_addr
= convert_from_func_ptr_addr
;
4851 gdbarch_addr_bits_remove (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
4853 gdb_assert (gdbarch
!= NULL
);
4854 gdb_assert (gdbarch
->addr_bits_remove
!= NULL
);
4855 if (gdbarch_debug
>= 2)
4856 fprintf_unfiltered (gdb_stdlog
, "gdbarch_addr_bits_remove called\n");
4857 return gdbarch
->addr_bits_remove (addr
);
4861 set_gdbarch_addr_bits_remove (struct gdbarch
*gdbarch
,
4862 gdbarch_addr_bits_remove_ftype addr_bits_remove
)
4864 gdbarch
->addr_bits_remove
= addr_bits_remove
;
4868 gdbarch_smash_text_address (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
4870 gdb_assert (gdbarch
!= NULL
);
4871 gdb_assert (gdbarch
->smash_text_address
!= NULL
);
4872 if (gdbarch_debug
>= 2)
4873 fprintf_unfiltered (gdb_stdlog
, "gdbarch_smash_text_address called\n");
4874 return gdbarch
->smash_text_address (addr
);
4878 set_gdbarch_smash_text_address (struct gdbarch
*gdbarch
,
4879 gdbarch_smash_text_address_ftype smash_text_address
)
4881 gdbarch
->smash_text_address
= smash_text_address
;
4885 gdbarch_software_single_step_p (struct gdbarch
*gdbarch
)
4887 gdb_assert (gdbarch
!= NULL
);
4888 return gdbarch
->software_single_step
!= NULL
;
4892 gdbarch_software_single_step (struct gdbarch
*gdbarch
, enum target_signal sig
, int insert_breakpoints_p
)
4894 gdb_assert (gdbarch
!= NULL
);
4895 gdb_assert (gdbarch
->software_single_step
!= NULL
);
4896 if (gdbarch_debug
>= 2)
4897 fprintf_unfiltered (gdb_stdlog
, "gdbarch_software_single_step called\n");
4898 gdbarch
->software_single_step (sig
, insert_breakpoints_p
);
4902 set_gdbarch_software_single_step (struct gdbarch
*gdbarch
,
4903 gdbarch_software_single_step_ftype software_single_step
)
4905 gdbarch
->software_single_step
= software_single_step
;
4909 gdbarch_print_insn (struct gdbarch
*gdbarch
, bfd_vma vma
, struct disassemble_info
*info
)
4911 gdb_assert (gdbarch
!= NULL
);
4912 gdb_assert (gdbarch
->print_insn
!= NULL
);
4913 if (gdbarch_debug
>= 2)
4914 fprintf_unfiltered (gdb_stdlog
, "gdbarch_print_insn called\n");
4915 return gdbarch
->print_insn (vma
, info
);
4919 set_gdbarch_print_insn (struct gdbarch
*gdbarch
,
4920 gdbarch_print_insn_ftype print_insn
)
4922 gdbarch
->print_insn
= print_insn
;
4926 gdbarch_skip_trampoline_code (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
4928 gdb_assert (gdbarch
!= NULL
);
4929 gdb_assert (gdbarch
->skip_trampoline_code
!= NULL
);
4930 if (gdbarch_debug
>= 2)
4931 fprintf_unfiltered (gdb_stdlog
, "gdbarch_skip_trampoline_code called\n");
4932 return gdbarch
->skip_trampoline_code (pc
);
4936 set_gdbarch_skip_trampoline_code (struct gdbarch
*gdbarch
,
4937 gdbarch_skip_trampoline_code_ftype skip_trampoline_code
)
4939 gdbarch
->skip_trampoline_code
= skip_trampoline_code
;
4943 gdbarch_skip_solib_resolver (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
4945 gdb_assert (gdbarch
!= NULL
);
4946 gdb_assert (gdbarch
->skip_solib_resolver
!= NULL
);
4947 if (gdbarch_debug
>= 2)
4948 fprintf_unfiltered (gdb_stdlog
, "gdbarch_skip_solib_resolver called\n");
4949 return gdbarch
->skip_solib_resolver (gdbarch
, pc
);
4953 set_gdbarch_skip_solib_resolver (struct gdbarch
*gdbarch
,
4954 gdbarch_skip_solib_resolver_ftype skip_solib_resolver
)
4956 gdbarch
->skip_solib_resolver
= skip_solib_resolver
;
4960 gdbarch_in_solib_call_trampoline (struct gdbarch
*gdbarch
, CORE_ADDR pc
, char *name
)
4962 gdb_assert (gdbarch
!= NULL
);
4963 gdb_assert (gdbarch
->in_solib_call_trampoline
!= NULL
);
4964 if (gdbarch_debug
>= 2)
4965 fprintf_unfiltered (gdb_stdlog
, "gdbarch_in_solib_call_trampoline called\n");
4966 return gdbarch
->in_solib_call_trampoline (pc
, name
);
4970 set_gdbarch_in_solib_call_trampoline (struct gdbarch
*gdbarch
,
4971 gdbarch_in_solib_call_trampoline_ftype in_solib_call_trampoline
)
4973 gdbarch
->in_solib_call_trampoline
= in_solib_call_trampoline
;
4977 gdbarch_in_solib_return_trampoline (struct gdbarch
*gdbarch
, CORE_ADDR pc
, char *name
)
4979 gdb_assert (gdbarch
!= NULL
);
4980 gdb_assert (gdbarch
->in_solib_return_trampoline
!= NULL
);
4981 if (gdbarch_debug
>= 2)
4982 fprintf_unfiltered (gdb_stdlog
, "gdbarch_in_solib_return_trampoline called\n");
4983 return gdbarch
->in_solib_return_trampoline (pc
, name
);
4987 set_gdbarch_in_solib_return_trampoline (struct gdbarch
*gdbarch
,
4988 gdbarch_in_solib_return_trampoline_ftype in_solib_return_trampoline
)
4990 gdbarch
->in_solib_return_trampoline
= in_solib_return_trampoline
;
4994 gdbarch_deprecated_pc_in_sigtramp_p (struct gdbarch
*gdbarch
)
4996 gdb_assert (gdbarch
!= NULL
);
4997 return gdbarch
->deprecated_pc_in_sigtramp
!= legacy_pc_in_sigtramp
;
5001 gdbarch_deprecated_pc_in_sigtramp (struct gdbarch
*gdbarch
, CORE_ADDR pc
, char *name
)
5003 gdb_assert (gdbarch
!= NULL
);
5004 gdb_assert (gdbarch
->deprecated_pc_in_sigtramp
!= NULL
);
5005 /* Do not check predicate: gdbarch->deprecated_pc_in_sigtramp != legacy_pc_in_sigtramp, allow call. */
5006 if (gdbarch_debug
>= 2)
5007 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_pc_in_sigtramp called\n");
5008 return gdbarch
->deprecated_pc_in_sigtramp (pc
, name
);
5012 set_gdbarch_deprecated_pc_in_sigtramp (struct gdbarch
*gdbarch
,
5013 gdbarch_deprecated_pc_in_sigtramp_ftype deprecated_pc_in_sigtramp
)
5015 gdbarch
->deprecated_pc_in_sigtramp
= deprecated_pc_in_sigtramp
;
5019 gdbarch_deprecated_sigtramp_start_p (struct gdbarch
*gdbarch
)
5021 gdb_assert (gdbarch
!= NULL
);
5022 return gdbarch
->deprecated_sigtramp_start
!= NULL
;
5026 gdbarch_deprecated_sigtramp_start (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
5028 gdb_assert (gdbarch
!= NULL
);
5029 gdb_assert (gdbarch
->deprecated_sigtramp_start
!= NULL
);
5030 if (gdbarch_debug
>= 2)
5031 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_sigtramp_start called\n");
5032 return gdbarch
->deprecated_sigtramp_start (pc
);
5036 set_gdbarch_deprecated_sigtramp_start (struct gdbarch
*gdbarch
,
5037 gdbarch_deprecated_sigtramp_start_ftype deprecated_sigtramp_start
)
5039 gdbarch
->deprecated_sigtramp_start
= deprecated_sigtramp_start
;
5043 gdbarch_deprecated_sigtramp_end_p (struct gdbarch
*gdbarch
)
5045 gdb_assert (gdbarch
!= NULL
);
5046 return gdbarch
->deprecated_sigtramp_end
!= NULL
;
5050 gdbarch_deprecated_sigtramp_end (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
5052 gdb_assert (gdbarch
!= NULL
);
5053 gdb_assert (gdbarch
->deprecated_sigtramp_end
!= NULL
);
5054 if (gdbarch_debug
>= 2)
5055 fprintf_unfiltered (gdb_stdlog
, "gdbarch_deprecated_sigtramp_end called\n");
5056 return gdbarch
->deprecated_sigtramp_end (pc
);
5060 set_gdbarch_deprecated_sigtramp_end (struct gdbarch
*gdbarch
,
5061 gdbarch_deprecated_sigtramp_end_ftype deprecated_sigtramp_end
)
5063 gdbarch
->deprecated_sigtramp_end
= deprecated_sigtramp_end
;
5067 gdbarch_in_function_epilogue_p (struct gdbarch
*gdbarch
, CORE_ADDR addr
)
5069 gdb_assert (gdbarch
!= NULL
);
5070 gdb_assert (gdbarch
->in_function_epilogue_p
!= NULL
);
5071 if (gdbarch_debug
>= 2)
5072 fprintf_unfiltered (gdb_stdlog
, "gdbarch_in_function_epilogue_p called\n");
5073 return gdbarch
->in_function_epilogue_p (gdbarch
, addr
);
5077 set_gdbarch_in_function_epilogue_p (struct gdbarch
*gdbarch
,
5078 gdbarch_in_function_epilogue_p_ftype in_function_epilogue_p
)
5080 gdbarch
->in_function_epilogue_p
= in_function_epilogue_p
;
5084 gdbarch_construct_inferior_arguments (struct gdbarch
*gdbarch
, int argc
, char **argv
)
5086 gdb_assert (gdbarch
!= NULL
);
5087 gdb_assert (gdbarch
->construct_inferior_arguments
!= NULL
);
5088 if (gdbarch_debug
>= 2)
5089 fprintf_unfiltered (gdb_stdlog
, "gdbarch_construct_inferior_arguments called\n");
5090 return gdbarch
->construct_inferior_arguments (gdbarch
, argc
, argv
);
5094 set_gdbarch_construct_inferior_arguments (struct gdbarch
*gdbarch
,
5095 gdbarch_construct_inferior_arguments_ftype construct_inferior_arguments
)
5097 gdbarch
->construct_inferior_arguments
= construct_inferior_arguments
;
5101 gdbarch_elf_make_msymbol_special (struct gdbarch
*gdbarch
, asymbol
*sym
, struct minimal_symbol
*msym
)
5103 gdb_assert (gdbarch
!= NULL
);
5104 gdb_assert (gdbarch
->elf_make_msymbol_special
!= NULL
);
5105 if (gdbarch_debug
>= 2)
5106 fprintf_unfiltered (gdb_stdlog
, "gdbarch_elf_make_msymbol_special called\n");
5107 gdbarch
->elf_make_msymbol_special (sym
, msym
);
5111 set_gdbarch_elf_make_msymbol_special (struct gdbarch
*gdbarch
,
5112 gdbarch_elf_make_msymbol_special_ftype elf_make_msymbol_special
)
5114 gdbarch
->elf_make_msymbol_special
= elf_make_msymbol_special
;
5118 gdbarch_coff_make_msymbol_special (struct gdbarch
*gdbarch
, int val
, struct minimal_symbol
*msym
)
5120 gdb_assert (gdbarch
!= NULL
);
5121 gdb_assert (gdbarch
->coff_make_msymbol_special
!= NULL
);
5122 if (gdbarch_debug
>= 2)
5123 fprintf_unfiltered (gdb_stdlog
, "gdbarch_coff_make_msymbol_special called\n");
5124 gdbarch
->coff_make_msymbol_special (val
, msym
);
5128 set_gdbarch_coff_make_msymbol_special (struct gdbarch
*gdbarch
,
5129 gdbarch_coff_make_msymbol_special_ftype coff_make_msymbol_special
)
5131 gdbarch
->coff_make_msymbol_special
= coff_make_msymbol_special
;
5135 gdbarch_name_of_malloc (struct gdbarch
*gdbarch
)
5137 gdb_assert (gdbarch
!= NULL
);
5138 /* Skip verify of name_of_malloc, invalid_p == 0 */
5139 if (gdbarch_debug
>= 2)
5140 fprintf_unfiltered (gdb_stdlog
, "gdbarch_name_of_malloc called\n");
5141 return gdbarch
->name_of_malloc
;
5145 set_gdbarch_name_of_malloc (struct gdbarch
*gdbarch
,
5146 const char * name_of_malloc
)
5148 gdbarch
->name_of_malloc
= name_of_malloc
;
5152 gdbarch_cannot_step_breakpoint (struct gdbarch
*gdbarch
)
5154 gdb_assert (gdbarch
!= NULL
);
5155 /* Skip verify of cannot_step_breakpoint, invalid_p == 0 */
5156 if (gdbarch_debug
>= 2)
5157 fprintf_unfiltered (gdb_stdlog
, "gdbarch_cannot_step_breakpoint called\n");
5158 return gdbarch
->cannot_step_breakpoint
;
5162 set_gdbarch_cannot_step_breakpoint (struct gdbarch
*gdbarch
,
5163 int cannot_step_breakpoint
)
5165 gdbarch
->cannot_step_breakpoint
= cannot_step_breakpoint
;
5169 gdbarch_have_nonsteppable_watchpoint (struct gdbarch
*gdbarch
)
5171 gdb_assert (gdbarch
!= NULL
);
5172 /* Skip verify of have_nonsteppable_watchpoint, invalid_p == 0 */
5173 if (gdbarch_debug
>= 2)
5174 fprintf_unfiltered (gdb_stdlog
, "gdbarch_have_nonsteppable_watchpoint called\n");
5175 return gdbarch
->have_nonsteppable_watchpoint
;
5179 set_gdbarch_have_nonsteppable_watchpoint (struct gdbarch
*gdbarch
,
5180 int have_nonsteppable_watchpoint
)
5182 gdbarch
->have_nonsteppable_watchpoint
= have_nonsteppable_watchpoint
;
5186 gdbarch_address_class_type_flags_p (struct gdbarch
*gdbarch
)
5188 gdb_assert (gdbarch
!= NULL
);
5189 return gdbarch
->address_class_type_flags
!= NULL
;
5193 gdbarch_address_class_type_flags (struct gdbarch
*gdbarch
, int byte_size
, int dwarf2_addr_class
)
5195 gdb_assert (gdbarch
!= NULL
);
5196 gdb_assert (gdbarch
->address_class_type_flags
!= NULL
);
5197 if (gdbarch_debug
>= 2)
5198 fprintf_unfiltered (gdb_stdlog
, "gdbarch_address_class_type_flags called\n");
5199 return gdbarch
->address_class_type_flags (byte_size
, dwarf2_addr_class
);
5203 set_gdbarch_address_class_type_flags (struct gdbarch
*gdbarch
,
5204 gdbarch_address_class_type_flags_ftype address_class_type_flags
)
5206 gdbarch
->address_class_type_flags
= address_class_type_flags
;
5210 gdbarch_address_class_type_flags_to_name_p (struct gdbarch
*gdbarch
)
5212 gdb_assert (gdbarch
!= NULL
);
5213 return gdbarch
->address_class_type_flags_to_name
!= NULL
;
5217 gdbarch_address_class_type_flags_to_name (struct gdbarch
*gdbarch
, int type_flags
)
5219 gdb_assert (gdbarch
!= NULL
);
5220 gdb_assert (gdbarch
->address_class_type_flags_to_name
!= NULL
);
5221 if (gdbarch_debug
>= 2)
5222 fprintf_unfiltered (gdb_stdlog
, "gdbarch_address_class_type_flags_to_name called\n");
5223 return gdbarch
->address_class_type_flags_to_name (gdbarch
, type_flags
);
5227 set_gdbarch_address_class_type_flags_to_name (struct gdbarch
*gdbarch
,
5228 gdbarch_address_class_type_flags_to_name_ftype address_class_type_flags_to_name
)
5230 gdbarch
->address_class_type_flags_to_name
= address_class_type_flags_to_name
;
5234 gdbarch_address_class_name_to_type_flags_p (struct gdbarch
*gdbarch
)
5236 gdb_assert (gdbarch
!= NULL
);
5237 return gdbarch
->address_class_name_to_type_flags
!= NULL
;
5241 gdbarch_address_class_name_to_type_flags (struct gdbarch
*gdbarch
, const char *name
, int *type_flags_ptr
)
5243 gdb_assert (gdbarch
!= NULL
);
5244 gdb_assert (gdbarch
->address_class_name_to_type_flags
!= NULL
);
5245 if (gdbarch_debug
>= 2)
5246 fprintf_unfiltered (gdb_stdlog
, "gdbarch_address_class_name_to_type_flags called\n");
5247 return gdbarch
->address_class_name_to_type_flags (gdbarch
, name
, type_flags_ptr
);
5251 set_gdbarch_address_class_name_to_type_flags (struct gdbarch
*gdbarch
,
5252 gdbarch_address_class_name_to_type_flags_ftype address_class_name_to_type_flags
)
5254 gdbarch
->address_class_name_to_type_flags
= address_class_name_to_type_flags
;
5258 gdbarch_register_reggroup_p (struct gdbarch
*gdbarch
, int regnum
, struct reggroup
*reggroup
)
5260 gdb_assert (gdbarch
!= NULL
);
5261 gdb_assert (gdbarch
->register_reggroup_p
!= NULL
);
5262 if (gdbarch_debug
>= 2)
5263 fprintf_unfiltered (gdb_stdlog
, "gdbarch_register_reggroup_p called\n");
5264 return gdbarch
->register_reggroup_p (gdbarch
, regnum
, reggroup
);
5268 set_gdbarch_register_reggroup_p (struct gdbarch
*gdbarch
,
5269 gdbarch_register_reggroup_p_ftype register_reggroup_p
)
5271 gdbarch
->register_reggroup_p
= register_reggroup_p
;
5275 gdbarch_fetch_pointer_argument_p (struct gdbarch
*gdbarch
)
5277 gdb_assert (gdbarch
!= NULL
);
5278 return gdbarch
->fetch_pointer_argument
!= NULL
;
5282 gdbarch_fetch_pointer_argument (struct gdbarch
*gdbarch
, struct frame_info
*frame
, int argi
, struct type
*type
)
5284 gdb_assert (gdbarch
!= NULL
);
5285 gdb_assert (gdbarch
->fetch_pointer_argument
!= NULL
);
5286 if (gdbarch_debug
>= 2)
5287 fprintf_unfiltered (gdb_stdlog
, "gdbarch_fetch_pointer_argument called\n");
5288 return gdbarch
->fetch_pointer_argument (frame
, argi
, type
);
5292 set_gdbarch_fetch_pointer_argument (struct gdbarch
*gdbarch
,
5293 gdbarch_fetch_pointer_argument_ftype fetch_pointer_argument
)
5295 gdbarch
->fetch_pointer_argument
= fetch_pointer_argument
;
5299 gdbarch_regset_from_core_section_p (struct gdbarch
*gdbarch
)
5301 gdb_assert (gdbarch
!= NULL
);
5302 return gdbarch
->regset_from_core_section
!= NULL
;
5305 const struct regset
*
5306 gdbarch_regset_from_core_section (struct gdbarch
*gdbarch
, const char *sect_name
, size_t sect_size
)
5308 gdb_assert (gdbarch
!= NULL
);
5309 gdb_assert (gdbarch
->regset_from_core_section
!= NULL
);
5310 if (gdbarch_debug
>= 2)
5311 fprintf_unfiltered (gdb_stdlog
, "gdbarch_regset_from_core_section called\n");
5312 return gdbarch
->regset_from_core_section (gdbarch
, sect_name
, sect_size
);
5316 set_gdbarch_regset_from_core_section (struct gdbarch
*gdbarch
,
5317 gdbarch_regset_from_core_section_ftype regset_from_core_section
)
5319 gdbarch
->regset_from_core_section
= regset_from_core_section
;
5323 /* Keep a registry of per-architecture data-pointers required by GDB
5330 gdbarch_data_pre_init_ftype
*pre_init
;
5331 gdbarch_data_post_init_ftype
*post_init
;
5334 struct gdbarch_data_registration
5336 struct gdbarch_data
*data
;
5337 struct gdbarch_data_registration
*next
;
5340 struct gdbarch_data_registry
5343 struct gdbarch_data_registration
*registrations
;
5346 struct gdbarch_data_registry gdbarch_data_registry
=
5351 static struct gdbarch_data
*
5352 gdbarch_data_register (gdbarch_data_pre_init_ftype
*pre_init
,
5353 gdbarch_data_post_init_ftype
*post_init
)
5355 struct gdbarch_data_registration
**curr
;
5356 /* Append the new registraration. */
5357 for (curr
= &gdbarch_data_registry
.registrations
;
5359 curr
= &(*curr
)->next
);
5360 (*curr
) = XMALLOC (struct gdbarch_data_registration
);
5361 (*curr
)->next
= NULL
;
5362 (*curr
)->data
= XMALLOC (struct gdbarch_data
);
5363 (*curr
)->data
->index
= gdbarch_data_registry
.nr
++;
5364 (*curr
)->data
->pre_init
= pre_init
;
5365 (*curr
)->data
->post_init
= post_init
;
5366 (*curr
)->data
->init_p
= 1;
5367 return (*curr
)->data
;
5370 struct gdbarch_data
*
5371 gdbarch_data_register_pre_init (gdbarch_data_pre_init_ftype
*pre_init
)
5373 return gdbarch_data_register (pre_init
, NULL
);
5376 struct gdbarch_data
*
5377 gdbarch_data_register_post_init (gdbarch_data_post_init_ftype
*post_init
)
5379 return gdbarch_data_register (NULL
, post_init
);
5382 /* Create/delete the gdbarch data vector. */
5385 alloc_gdbarch_data (struct gdbarch
*gdbarch
)
5387 gdb_assert (gdbarch
->data
== NULL
);
5388 gdbarch
->nr_data
= gdbarch_data_registry
.nr
;
5389 gdbarch
->data
= GDBARCH_OBSTACK_CALLOC (gdbarch
, gdbarch
->nr_data
, void *);
5392 /* Initialize the current value of the specified per-architecture
5396 deprecated_set_gdbarch_data (struct gdbarch
*gdbarch
,
5397 struct gdbarch_data
*data
,
5400 gdb_assert (data
->index
< gdbarch
->nr_data
);
5401 gdb_assert (gdbarch
->data
[data
->index
] == NULL
);
5402 gdb_assert (data
->pre_init
== NULL
);
5403 gdbarch
->data
[data
->index
] = pointer
;
5406 /* Return the current value of the specified per-architecture
5410 gdbarch_data (struct gdbarch
*gdbarch
, struct gdbarch_data
*data
)
5412 gdb_assert (data
->index
< gdbarch
->nr_data
);
5413 if (gdbarch
->data
[data
->index
] == NULL
)
5415 /* The data-pointer isn't initialized, call init() to get a
5417 if (data
->pre_init
!= NULL
)
5418 /* Mid architecture creation: pass just the obstack, and not
5419 the entire architecture, as that way it isn't possible for
5420 pre-init code to refer to undefined architecture
5422 gdbarch
->data
[data
->index
] = data
->pre_init (gdbarch
->obstack
);
5423 else if (gdbarch
->initialized_p
5424 && data
->post_init
!= NULL
)
5425 /* Post architecture creation: pass the entire architecture
5426 (as all fields are valid), but be careful to also detect
5427 recursive references. */
5429 gdb_assert (data
->init_p
);
5431 gdbarch
->data
[data
->index
] = data
->post_init (gdbarch
);
5435 /* The architecture initialization hasn't completed - punt -
5436 hope that the caller knows what they are doing. Once
5437 deprecated_set_gdbarch_data has been initialized, this can be
5438 changed to an internal error. */
5440 gdb_assert (gdbarch
->data
[data
->index
] != NULL
);
5442 return gdbarch
->data
[data
->index
];
5447 /* Keep a registry of swapped data required by GDB modules. */
5452 struct gdbarch_swap_registration
*source
;
5453 struct gdbarch_swap
*next
;
5456 struct gdbarch_swap_registration
5459 unsigned long sizeof_data
;
5460 gdbarch_swap_ftype
*init
;
5461 struct gdbarch_swap_registration
*next
;
5464 struct gdbarch_swap_registry
5467 struct gdbarch_swap_registration
*registrations
;
5470 struct gdbarch_swap_registry gdbarch_swap_registry
=
5476 deprecated_register_gdbarch_swap (void *data
,
5477 unsigned long sizeof_data
,
5478 gdbarch_swap_ftype
*init
)
5480 struct gdbarch_swap_registration
**rego
;
5481 for (rego
= &gdbarch_swap_registry
.registrations
;
5483 rego
= &(*rego
)->next
);
5484 (*rego
) = XMALLOC (struct gdbarch_swap_registration
);
5485 (*rego
)->next
= NULL
;
5486 (*rego
)->init
= init
;
5487 (*rego
)->data
= data
;
5488 (*rego
)->sizeof_data
= sizeof_data
;
5492 current_gdbarch_swap_init_hack (void)
5494 struct gdbarch_swap_registration
*rego
;
5495 struct gdbarch_swap
**curr
= ¤t_gdbarch
->swap
;
5496 for (rego
= gdbarch_swap_registry
.registrations
;
5500 if (rego
->data
!= NULL
)
5502 (*curr
) = GDBARCH_OBSTACK_ZALLOC (current_gdbarch
,
5503 struct gdbarch_swap
);
5504 (*curr
)->source
= rego
;
5505 (*curr
)->swap
= gdbarch_obstack_zalloc (current_gdbarch
,
5507 (*curr
)->next
= NULL
;
5508 curr
= &(*curr
)->next
;
5510 if (rego
->init
!= NULL
)
5515 static struct gdbarch
*
5516 current_gdbarch_swap_out_hack (void)
5518 struct gdbarch
*old_gdbarch
= current_gdbarch
;
5519 struct gdbarch_swap
*curr
;
5521 gdb_assert (old_gdbarch
!= NULL
);
5522 for (curr
= old_gdbarch
->swap
;
5526 memcpy (curr
->swap
, curr
->source
->data
, curr
->source
->sizeof_data
);
5527 memset (curr
->source
->data
, 0, curr
->source
->sizeof_data
);
5529 current_gdbarch
= NULL
;
5534 current_gdbarch_swap_in_hack (struct gdbarch
*new_gdbarch
)
5536 struct gdbarch_swap
*curr
;
5538 gdb_assert (current_gdbarch
== NULL
);
5539 for (curr
= new_gdbarch
->swap
;
5542 memcpy (curr
->source
->data
, curr
->swap
, curr
->source
->sizeof_data
);
5543 current_gdbarch
= new_gdbarch
;
5547 /* Keep a registry of the architectures known by GDB. */
5549 struct gdbarch_registration
5551 enum bfd_architecture bfd_architecture
;
5552 gdbarch_init_ftype
*init
;
5553 gdbarch_dump_tdep_ftype
*dump_tdep
;
5554 struct gdbarch_list
*arches
;
5555 struct gdbarch_registration
*next
;
5558 static struct gdbarch_registration
*gdbarch_registry
= NULL
;
5561 append_name (const char ***buf
, int *nr
, const char *name
)
5563 *buf
= xrealloc (*buf
, sizeof (char**) * (*nr
+ 1));
5569 gdbarch_printable_names (void)
5571 /* Accumulate a list of names based on the registed list of
5573 enum bfd_architecture a
;
5575 const char **arches
= NULL
;
5576 struct gdbarch_registration
*rego
;
5577 for (rego
= gdbarch_registry
;
5581 const struct bfd_arch_info
*ap
;
5582 ap
= bfd_lookup_arch (rego
->bfd_architecture
, 0);
5584 internal_error (__FILE__
, __LINE__
,
5585 "gdbarch_architecture_names: multi-arch unknown");
5588 append_name (&arches
, &nr_arches
, ap
->printable_name
);
5593 append_name (&arches
, &nr_arches
, NULL
);
5599 gdbarch_register (enum bfd_architecture bfd_architecture
,
5600 gdbarch_init_ftype
*init
,
5601 gdbarch_dump_tdep_ftype
*dump_tdep
)
5603 struct gdbarch_registration
**curr
;
5604 const struct bfd_arch_info
*bfd_arch_info
;
5605 /* Check that BFD recognizes this architecture */
5606 bfd_arch_info
= bfd_lookup_arch (bfd_architecture
, 0);
5607 if (bfd_arch_info
== NULL
)
5609 internal_error (__FILE__
, __LINE__
,
5610 "gdbarch: Attempt to register unknown architecture (%d)",
5613 /* Check that we haven't seen this architecture before */
5614 for (curr
= &gdbarch_registry
;
5616 curr
= &(*curr
)->next
)
5618 if (bfd_architecture
== (*curr
)->bfd_architecture
)
5619 internal_error (__FILE__
, __LINE__
,
5620 "gdbarch: Duplicate registraration of architecture (%s)",
5621 bfd_arch_info
->printable_name
);
5625 fprintf_unfiltered (gdb_stdlog
, "register_gdbarch_init (%s, 0x%08lx)\n",
5626 bfd_arch_info
->printable_name
,
5629 (*curr
) = XMALLOC (struct gdbarch_registration
);
5630 (*curr
)->bfd_architecture
= bfd_architecture
;
5631 (*curr
)->init
= init
;
5632 (*curr
)->dump_tdep
= dump_tdep
;
5633 (*curr
)->arches
= NULL
;
5634 (*curr
)->next
= NULL
;
5638 register_gdbarch_init (enum bfd_architecture bfd_architecture
,
5639 gdbarch_init_ftype
*init
)
5641 gdbarch_register (bfd_architecture
, init
, NULL
);
5645 /* Look for an architecture using gdbarch_info. Base search on only
5646 BFD_ARCH_INFO and BYTE_ORDER. */
5648 struct gdbarch_list
*
5649 gdbarch_list_lookup_by_info (struct gdbarch_list
*arches
,
5650 const struct gdbarch_info
*info
)
5652 for (; arches
!= NULL
; arches
= arches
->next
)
5654 if (info
->bfd_arch_info
!= arches
->gdbarch
->bfd_arch_info
)
5656 if (info
->byte_order
!= arches
->gdbarch
->byte_order
)
5658 if (info
->osabi
!= arches
->gdbarch
->osabi
)
5666 /* Find an architecture that matches the specified INFO. Create a new
5667 architecture if needed. Return that new architecture. Assumes
5668 that there is no current architecture. */
5670 static struct gdbarch
*
5671 find_arch_by_info (struct gdbarch
*old_gdbarch
, struct gdbarch_info info
)
5673 struct gdbarch
*new_gdbarch
;
5674 struct gdbarch_registration
*rego
;
5676 /* The existing architecture has been swapped out - all this code
5677 works from a clean slate. */
5678 gdb_assert (current_gdbarch
== NULL
);
5680 /* Fill in missing parts of the INFO struct using a number of
5681 sources: "set ..."; INFOabfd supplied; and the existing
5683 gdbarch_info_fill (old_gdbarch
, &info
);
5685 /* Must have found some sort of architecture. */
5686 gdb_assert (info
.bfd_arch_info
!= NULL
);
5690 fprintf_unfiltered (gdb_stdlog
,
5691 "find_arch_by_info: info.bfd_arch_info %s\n",
5692 (info
.bfd_arch_info
!= NULL
5693 ? info
.bfd_arch_info
->printable_name
5695 fprintf_unfiltered (gdb_stdlog
,
5696 "find_arch_by_info: info.byte_order %d (%s)\n",
5698 (info
.byte_order
== BFD_ENDIAN_BIG
? "big"
5699 : info
.byte_order
== BFD_ENDIAN_LITTLE
? "little"
5701 fprintf_unfiltered (gdb_stdlog
,
5702 "find_arch_by_info: info.osabi %d (%s)\n",
5703 info
.osabi
, gdbarch_osabi_name (info
.osabi
));
5704 fprintf_unfiltered (gdb_stdlog
,
5705 "find_arch_by_info: info.abfd 0x%lx\n",
5707 fprintf_unfiltered (gdb_stdlog
,
5708 "find_arch_by_info: info.tdep_info 0x%lx\n",
5709 (long) info
.tdep_info
);
5712 /* Find the tdep code that knows about this architecture. */
5713 for (rego
= gdbarch_registry
;
5716 if (rego
->bfd_architecture
== info
.bfd_arch_info
->arch
)
5721 fprintf_unfiltered (gdb_stdlog
, "find_arch_by_info: "
5722 "No matching architecture\n");
5726 /* Ask the tdep code for an architecture that matches "info". */
5727 new_gdbarch
= rego
->init (info
, rego
->arches
);
5729 /* Did the tdep code like it? No. Reject the change and revert to
5730 the old architecture. */
5731 if (new_gdbarch
== NULL
)
5734 fprintf_unfiltered (gdb_stdlog
, "find_arch_by_info: "
5735 "Target rejected architecture\n");
5739 /* Is this a pre-existing architecture (as determined by already
5740 being initialized)? Move it to the front of the architecture
5741 list (keeping the list sorted Most Recently Used). */
5742 if (new_gdbarch
->initialized_p
)
5744 struct gdbarch_list
**list
;
5745 struct gdbarch_list
*this;
5747 fprintf_unfiltered (gdb_stdlog
, "find_arch_by_info: "
5748 "Previous architecture 0x%08lx (%s) selected\n",
5750 new_gdbarch
->bfd_arch_info
->printable_name
);
5751 /* Find the existing arch in the list. */
5752 for (list
= ®o
->arches
;
5753 (*list
) != NULL
&& (*list
)->gdbarch
!= new_gdbarch
;
5754 list
= &(*list
)->next
);
5755 /* It had better be in the list of architectures. */
5756 gdb_assert ((*list
) != NULL
&& (*list
)->gdbarch
== new_gdbarch
);
5759 (*list
) = this->next
;
5760 /* Insert THIS at the front. */
5761 this->next
= rego
->arches
;
5762 rego
->arches
= this;
5767 /* It's a new architecture. */
5769 fprintf_unfiltered (gdb_stdlog
, "find_arch_by_info: "
5770 "New architecture 0x%08lx (%s) selected\n",
5772 new_gdbarch
->bfd_arch_info
->printable_name
);
5774 /* Insert the new architecture into the front of the architecture
5775 list (keep the list sorted Most Recently Used). */
5777 struct gdbarch_list
*this = XMALLOC (struct gdbarch_list
);
5778 this->next
= rego
->arches
;
5779 this->gdbarch
= new_gdbarch
;
5780 rego
->arches
= this;
5783 /* Check that the newly installed architecture is valid. Plug in
5784 any post init values. */
5785 new_gdbarch
->dump_tdep
= rego
->dump_tdep
;
5786 verify_gdbarch (new_gdbarch
);
5787 new_gdbarch
->initialized_p
= 1;
5789 /* Initialize any per-architecture swap areas. This phase requires
5790 a valid global CURRENT_GDBARCH. Set it momentarially, and then
5791 swap the entire architecture out. */
5792 current_gdbarch
= new_gdbarch
;
5793 current_gdbarch_swap_init_hack ();
5794 current_gdbarch_swap_out_hack ();
5797 gdbarch_dump (new_gdbarch
, gdb_stdlog
);
5803 gdbarch_find_by_info (struct gdbarch_info info
)
5805 /* Save the previously selected architecture, setting the global to
5806 NULL. This stops things like gdbarch->init() trying to use the
5807 previous architecture's configuration. The previous architecture
5808 may not even be of the same architecture family. The most recent
5809 architecture of the same family is found at the head of the
5810 rego->arches list. */
5811 struct gdbarch
*old_gdbarch
= current_gdbarch_swap_out_hack ();
5813 /* Find the specified architecture. */
5814 struct gdbarch
*new_gdbarch
= find_arch_by_info (old_gdbarch
, info
);
5816 /* Restore the existing architecture. */
5817 gdb_assert (current_gdbarch
== NULL
);
5818 current_gdbarch_swap_in_hack (old_gdbarch
);
5823 /* Make the specified architecture current, swapping the existing one
5827 deprecated_current_gdbarch_select_hack (struct gdbarch
*new_gdbarch
)
5829 gdb_assert (new_gdbarch
!= NULL
);
5830 gdb_assert (current_gdbarch
!= NULL
);
5831 gdb_assert (new_gdbarch
->initialized_p
);
5832 current_gdbarch_swap_out_hack ();
5833 current_gdbarch_swap_in_hack (new_gdbarch
);
5834 architecture_changed_event ();
5837 extern void _initialize_gdbarch (void);
5840 _initialize_gdbarch (void)
5842 struct cmd_list_element
*c
;
5844 add_show_from_set (add_set_cmd ("arch",
5847 (char *)&gdbarch_debug
,
5848 "Set architecture debugging.\n\
5849 When non-zero, architecture debugging is enabled.", &setdebuglist
),
5851 c
= add_set_cmd ("archdebug",
5854 (char *)&gdbarch_debug
,
5855 "Set architecture debugging.\n\
5856 When non-zero, architecture debugging is enabled.", &setlist
);
5858 deprecate_cmd (c
, "set debug arch");
5859 deprecate_cmd (add_show_from_set (c
, &showlist
), "show debug arch");