* valops.c (PUSH_ARGUMENTS): Delete definition.
[binutils-gdb.git] / gdb / gdbarch.h
1 /* *INDENT-OFF* */ /* THIS FILE IS GENERATED */
2
3 /* Dynamic architecture support for GDB, the GNU debugger.
4 Copyright 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
5
6 This file is part of GDB.
7
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
12
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA. */
22
23 /* This file was created with the aid of ``gdbarch.sh''.
24
25 The Bourne shell script ``gdbarch.sh'' creates the files
26 ``new-gdbarch.c'' and ``new-gdbarch.h and then compares them
27 against the existing ``gdbarch.[hc]''. Any differences found
28 being reported.
29
30 If editing this file, please also run gdbarch.sh and merge any
31 changes into that script. Conversely, when making sweeping changes
32 to this file, modifying gdbarch.sh and using its output may prove
33 easier. */
34
35 #ifndef GDBARCH_H
36 #define GDBARCH_H
37
38 #include "dis-asm.h" /* Get defs for disassemble_info, which unfortunately is a typedef. */
39 #if !GDB_MULTI_ARCH
40 #include "value.h" /* For default_coerce_float_to_double which is referenced by a macro. */
41 #endif
42
43 struct frame_info;
44 struct value;
45 struct objfile;
46 struct minimal_symbol;
47
48 extern struct gdbarch *current_gdbarch;
49
50
51 /* If any of the following are defined, the target wasn't correctly
52 converted. */
53
54 #if GDB_MULTI_ARCH
55 #if defined (EXTRA_FRAME_INFO)
56 #error "EXTRA_FRAME_INFO: replaced by struct frame_extra_info"
57 #endif
58 #endif
59
60 #if GDB_MULTI_ARCH
61 #if defined (FRAME_FIND_SAVED_REGS)
62 #error "FRAME_FIND_SAVED_REGS: replaced by FRAME_INIT_SAVED_REGS"
63 #endif
64 #endif
65
66 #if (GDB_MULTI_ARCH >= GDB_MULTI_ARCH_PURE) && defined (GDB_TM_FILE)
67 #error "GDB_TM_FILE: Pure multi-arch targets do not have a tm.h file."
68 #endif
69
70
71 /* The following are pre-initialized by GDBARCH. */
72
73 extern const struct bfd_arch_info * gdbarch_bfd_arch_info (struct gdbarch *gdbarch);
74 /* set_gdbarch_bfd_arch_info() - not applicable - pre-initialized. */
75 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_ARCHITECTURE)
76 #error "Non multi-arch definition of TARGET_ARCHITECTURE"
77 #endif
78 #if GDB_MULTI_ARCH
79 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_ARCHITECTURE)
80 #define TARGET_ARCHITECTURE (gdbarch_bfd_arch_info (current_gdbarch))
81 #endif
82 #endif
83
84 extern int gdbarch_byte_order (struct gdbarch *gdbarch);
85 /* set_gdbarch_byte_order() - not applicable - pre-initialized. */
86 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_BYTE_ORDER)
87 #error "Non multi-arch definition of TARGET_BYTE_ORDER"
88 #endif
89 #if GDB_MULTI_ARCH
90 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_BYTE_ORDER)
91 #define TARGET_BYTE_ORDER (gdbarch_byte_order (current_gdbarch))
92 #endif
93 #endif
94
95
96 /* The following are initialized by the target dependent code. */
97
98 /* Number of bits in a char or unsigned char for the target machine.
99 Just like CHAR_BIT in <limits.h> but describes the target machine.
100 v::TARGET_CHAR_BIT:int:char_bit::::8 * sizeof (char):8::0:
101
102 Number of bits in a short or unsigned short for the target machine. */
103
104 /* Default (value) for non- multi-arch platforms. */
105 #if (!GDB_MULTI_ARCH) && !defined (TARGET_SHORT_BIT)
106 #define TARGET_SHORT_BIT (2*TARGET_CHAR_BIT)
107 #endif
108
109 extern int gdbarch_short_bit (struct gdbarch *gdbarch);
110 extern void set_gdbarch_short_bit (struct gdbarch *gdbarch, int short_bit);
111 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_SHORT_BIT)
112 #error "Non multi-arch definition of TARGET_SHORT_BIT"
113 #endif
114 #if GDB_MULTI_ARCH
115 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_SHORT_BIT)
116 #define TARGET_SHORT_BIT (gdbarch_short_bit (current_gdbarch))
117 #endif
118 #endif
119
120 /* Number of bits in an int or unsigned int for the target machine. */
121
122 /* Default (value) for non- multi-arch platforms. */
123 #if (!GDB_MULTI_ARCH) && !defined (TARGET_INT_BIT)
124 #define TARGET_INT_BIT (4*TARGET_CHAR_BIT)
125 #endif
126
127 extern int gdbarch_int_bit (struct gdbarch *gdbarch);
128 extern void set_gdbarch_int_bit (struct gdbarch *gdbarch, int int_bit);
129 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_INT_BIT)
130 #error "Non multi-arch definition of TARGET_INT_BIT"
131 #endif
132 #if GDB_MULTI_ARCH
133 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_INT_BIT)
134 #define TARGET_INT_BIT (gdbarch_int_bit (current_gdbarch))
135 #endif
136 #endif
137
138 /* Number of bits in a long or unsigned long for the target machine. */
139
140 /* Default (value) for non- multi-arch platforms. */
141 #if (!GDB_MULTI_ARCH) && !defined (TARGET_LONG_BIT)
142 #define TARGET_LONG_BIT (4*TARGET_CHAR_BIT)
143 #endif
144
145 extern int gdbarch_long_bit (struct gdbarch *gdbarch);
146 extern void set_gdbarch_long_bit (struct gdbarch *gdbarch, int long_bit);
147 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_LONG_BIT)
148 #error "Non multi-arch definition of TARGET_LONG_BIT"
149 #endif
150 #if GDB_MULTI_ARCH
151 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_LONG_BIT)
152 #define TARGET_LONG_BIT (gdbarch_long_bit (current_gdbarch))
153 #endif
154 #endif
155
156 /* Number of bits in a long long or unsigned long long for the target
157 machine. */
158
159 /* Default (value) for non- multi-arch platforms. */
160 #if (!GDB_MULTI_ARCH) && !defined (TARGET_LONG_LONG_BIT)
161 #define TARGET_LONG_LONG_BIT (2*TARGET_LONG_BIT)
162 #endif
163
164 extern int gdbarch_long_long_bit (struct gdbarch *gdbarch);
165 extern void set_gdbarch_long_long_bit (struct gdbarch *gdbarch, int long_long_bit);
166 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_LONG_LONG_BIT)
167 #error "Non multi-arch definition of TARGET_LONG_LONG_BIT"
168 #endif
169 #if GDB_MULTI_ARCH
170 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_LONG_LONG_BIT)
171 #define TARGET_LONG_LONG_BIT (gdbarch_long_long_bit (current_gdbarch))
172 #endif
173 #endif
174
175 /* Number of bits in a float for the target machine. */
176
177 /* Default (value) for non- multi-arch platforms. */
178 #if (!GDB_MULTI_ARCH) && !defined (TARGET_FLOAT_BIT)
179 #define TARGET_FLOAT_BIT (4*TARGET_CHAR_BIT)
180 #endif
181
182 extern int gdbarch_float_bit (struct gdbarch *gdbarch);
183 extern void set_gdbarch_float_bit (struct gdbarch *gdbarch, int float_bit);
184 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_FLOAT_BIT)
185 #error "Non multi-arch definition of TARGET_FLOAT_BIT"
186 #endif
187 #if GDB_MULTI_ARCH
188 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_FLOAT_BIT)
189 #define TARGET_FLOAT_BIT (gdbarch_float_bit (current_gdbarch))
190 #endif
191 #endif
192
193 /* Number of bits in a double for the target machine. */
194
195 /* Default (value) for non- multi-arch platforms. */
196 #if (!GDB_MULTI_ARCH) && !defined (TARGET_DOUBLE_BIT)
197 #define TARGET_DOUBLE_BIT (8*TARGET_CHAR_BIT)
198 #endif
199
200 extern int gdbarch_double_bit (struct gdbarch *gdbarch);
201 extern void set_gdbarch_double_bit (struct gdbarch *gdbarch, int double_bit);
202 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_DOUBLE_BIT)
203 #error "Non multi-arch definition of TARGET_DOUBLE_BIT"
204 #endif
205 #if GDB_MULTI_ARCH
206 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_DOUBLE_BIT)
207 #define TARGET_DOUBLE_BIT (gdbarch_double_bit (current_gdbarch))
208 #endif
209 #endif
210
211 /* Number of bits in a long double for the target machine. */
212
213 /* Default (value) for non- multi-arch platforms. */
214 #if (!GDB_MULTI_ARCH) && !defined (TARGET_LONG_DOUBLE_BIT)
215 #define TARGET_LONG_DOUBLE_BIT (2*TARGET_DOUBLE_BIT)
216 #endif
217
218 extern int gdbarch_long_double_bit (struct gdbarch *gdbarch);
219 extern void set_gdbarch_long_double_bit (struct gdbarch *gdbarch, int long_double_bit);
220 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_LONG_DOUBLE_BIT)
221 #error "Non multi-arch definition of TARGET_LONG_DOUBLE_BIT"
222 #endif
223 #if GDB_MULTI_ARCH
224 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_LONG_DOUBLE_BIT)
225 #define TARGET_LONG_DOUBLE_BIT (gdbarch_long_double_bit (current_gdbarch))
226 #endif
227 #endif
228
229 /* For most targets, a pointer on the target and its representation as an
230 address in GDB have the same size and "look the same". For such a
231 target, you need only set TARGET_PTR_BIT / ptr_bit and TARGET_ADDR_BIT
232 / addr_bit will be set from it.
233
234 If TARGET_PTR_BIT and TARGET_ADDR_BIT are different, you'll probably
235 also need to set POINTER_TO_ADDRESS and ADDRESS_TO_POINTER as well.
236
237 ptr_bit is the size of a pointer on the target */
238
239 /* Default (value) for non- multi-arch platforms. */
240 #if (!GDB_MULTI_ARCH) && !defined (TARGET_PTR_BIT)
241 #define TARGET_PTR_BIT (TARGET_INT_BIT)
242 #endif
243
244 extern int gdbarch_ptr_bit (struct gdbarch *gdbarch);
245 extern void set_gdbarch_ptr_bit (struct gdbarch *gdbarch, int ptr_bit);
246 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_PTR_BIT)
247 #error "Non multi-arch definition of TARGET_PTR_BIT"
248 #endif
249 #if GDB_MULTI_ARCH
250 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_PTR_BIT)
251 #define TARGET_PTR_BIT (gdbarch_ptr_bit (current_gdbarch))
252 #endif
253 #endif
254
255 /* addr_bit is the size of a target address as represented in gdb */
256
257 /* Default (value) for non- multi-arch platforms. */
258 #if (!GDB_MULTI_ARCH) && !defined (TARGET_ADDR_BIT)
259 #define TARGET_ADDR_BIT (TARGET_PTR_BIT)
260 #endif
261
262 extern int gdbarch_addr_bit (struct gdbarch *gdbarch);
263 extern void set_gdbarch_addr_bit (struct gdbarch *gdbarch, int addr_bit);
264 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_ADDR_BIT)
265 #error "Non multi-arch definition of TARGET_ADDR_BIT"
266 #endif
267 #if GDB_MULTI_ARCH
268 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_ADDR_BIT)
269 #define TARGET_ADDR_BIT (gdbarch_addr_bit (current_gdbarch))
270 #endif
271 #endif
272
273 /* Number of bits in a BFD_VMA for the target object file format. */
274
275 /* Default (value) for non- multi-arch platforms. */
276 #if (!GDB_MULTI_ARCH) && !defined (TARGET_BFD_VMA_BIT)
277 #define TARGET_BFD_VMA_BIT (TARGET_ARCHITECTURE->bits_per_address)
278 #endif
279
280 extern int gdbarch_bfd_vma_bit (struct gdbarch *gdbarch);
281 extern void set_gdbarch_bfd_vma_bit (struct gdbarch *gdbarch, int bfd_vma_bit);
282 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_BFD_VMA_BIT)
283 #error "Non multi-arch definition of TARGET_BFD_VMA_BIT"
284 #endif
285 #if GDB_MULTI_ARCH
286 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_BFD_VMA_BIT)
287 #define TARGET_BFD_VMA_BIT (gdbarch_bfd_vma_bit (current_gdbarch))
288 #endif
289 #endif
290
291 /* One if `char' acts like `signed char', zero if `unsigned char'. */
292
293 /* Default (value) for non- multi-arch platforms. */
294 #if (!GDB_MULTI_ARCH) && !defined (TARGET_CHAR_SIGNED)
295 #define TARGET_CHAR_SIGNED (1)
296 #endif
297
298 extern int gdbarch_char_signed (struct gdbarch *gdbarch);
299 extern void set_gdbarch_char_signed (struct gdbarch *gdbarch, int char_signed);
300 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_CHAR_SIGNED)
301 #error "Non multi-arch definition of TARGET_CHAR_SIGNED"
302 #endif
303 #if GDB_MULTI_ARCH
304 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_CHAR_SIGNED)
305 #define TARGET_CHAR_SIGNED (gdbarch_char_signed (current_gdbarch))
306 #endif
307 #endif
308
309 /* Default (function) for non- multi-arch platforms. */
310 #if (!GDB_MULTI_ARCH) && !defined (TARGET_READ_PC)
311 #define TARGET_READ_PC(ptid) (generic_target_read_pc (ptid))
312 #endif
313
314 typedef CORE_ADDR (gdbarch_read_pc_ftype) (ptid_t ptid);
315 extern CORE_ADDR gdbarch_read_pc (struct gdbarch *gdbarch, ptid_t ptid);
316 extern void set_gdbarch_read_pc (struct gdbarch *gdbarch, gdbarch_read_pc_ftype *read_pc);
317 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_READ_PC)
318 #error "Non multi-arch definition of TARGET_READ_PC"
319 #endif
320 #if GDB_MULTI_ARCH
321 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_READ_PC)
322 #define TARGET_READ_PC(ptid) (gdbarch_read_pc (current_gdbarch, ptid))
323 #endif
324 #endif
325
326 /* Default (function) for non- multi-arch platforms. */
327 #if (!GDB_MULTI_ARCH) && !defined (TARGET_WRITE_PC)
328 #define TARGET_WRITE_PC(val, ptid) (generic_target_write_pc (val, ptid))
329 #endif
330
331 typedef void (gdbarch_write_pc_ftype) (CORE_ADDR val, ptid_t ptid);
332 extern void gdbarch_write_pc (struct gdbarch *gdbarch, CORE_ADDR val, ptid_t ptid);
333 extern void set_gdbarch_write_pc (struct gdbarch *gdbarch, gdbarch_write_pc_ftype *write_pc);
334 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_WRITE_PC)
335 #error "Non multi-arch definition of TARGET_WRITE_PC"
336 #endif
337 #if GDB_MULTI_ARCH
338 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_WRITE_PC)
339 #define TARGET_WRITE_PC(val, ptid) (gdbarch_write_pc (current_gdbarch, val, ptid))
340 #endif
341 #endif
342
343 /* Default (function) for non- multi-arch platforms. */
344 #if (!GDB_MULTI_ARCH) && !defined (TARGET_READ_FP)
345 #define TARGET_READ_FP() (generic_target_read_fp ())
346 #endif
347
348 typedef CORE_ADDR (gdbarch_read_fp_ftype) (void);
349 extern CORE_ADDR gdbarch_read_fp (struct gdbarch *gdbarch);
350 extern void set_gdbarch_read_fp (struct gdbarch *gdbarch, gdbarch_read_fp_ftype *read_fp);
351 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_READ_FP)
352 #error "Non multi-arch definition of TARGET_READ_FP"
353 #endif
354 #if GDB_MULTI_ARCH
355 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_READ_FP)
356 #define TARGET_READ_FP() (gdbarch_read_fp (current_gdbarch))
357 #endif
358 #endif
359
360 /* Default (function) for non- multi-arch platforms. */
361 #if (!GDB_MULTI_ARCH) && !defined (TARGET_WRITE_FP)
362 #define TARGET_WRITE_FP(val) (generic_target_write_fp (val))
363 #endif
364
365 typedef void (gdbarch_write_fp_ftype) (CORE_ADDR val);
366 extern void gdbarch_write_fp (struct gdbarch *gdbarch, CORE_ADDR val);
367 extern void set_gdbarch_write_fp (struct gdbarch *gdbarch, gdbarch_write_fp_ftype *write_fp);
368 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_WRITE_FP)
369 #error "Non multi-arch definition of TARGET_WRITE_FP"
370 #endif
371 #if GDB_MULTI_ARCH
372 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_WRITE_FP)
373 #define TARGET_WRITE_FP(val) (gdbarch_write_fp (current_gdbarch, val))
374 #endif
375 #endif
376
377 /* Default (function) for non- multi-arch platforms. */
378 #if (!GDB_MULTI_ARCH) && !defined (TARGET_READ_SP)
379 #define TARGET_READ_SP() (generic_target_read_sp ())
380 #endif
381
382 typedef CORE_ADDR (gdbarch_read_sp_ftype) (void);
383 extern CORE_ADDR gdbarch_read_sp (struct gdbarch *gdbarch);
384 extern void set_gdbarch_read_sp (struct gdbarch *gdbarch, gdbarch_read_sp_ftype *read_sp);
385 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_READ_SP)
386 #error "Non multi-arch definition of TARGET_READ_SP"
387 #endif
388 #if GDB_MULTI_ARCH
389 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_READ_SP)
390 #define TARGET_READ_SP() (gdbarch_read_sp (current_gdbarch))
391 #endif
392 #endif
393
394 /* Default (function) for non- multi-arch platforms. */
395 #if (!GDB_MULTI_ARCH) && !defined (TARGET_WRITE_SP)
396 #define TARGET_WRITE_SP(val) (generic_target_write_sp (val))
397 #endif
398
399 typedef void (gdbarch_write_sp_ftype) (CORE_ADDR val);
400 extern void gdbarch_write_sp (struct gdbarch *gdbarch, CORE_ADDR val);
401 extern void set_gdbarch_write_sp (struct gdbarch *gdbarch, gdbarch_write_sp_ftype *write_sp);
402 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_WRITE_SP)
403 #error "Non multi-arch definition of TARGET_WRITE_SP"
404 #endif
405 #if GDB_MULTI_ARCH
406 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_WRITE_SP)
407 #define TARGET_WRITE_SP(val) (gdbarch_write_sp (current_gdbarch, val))
408 #endif
409 #endif
410
411 /* Function for getting target's idea of a frame pointer. FIXME: GDB's
412 whole scheme for dealing with "frames" and "frame pointers" needs a
413 serious shakedown. */
414
415 /* Default (function) for non- multi-arch platforms. */
416 #if (!GDB_MULTI_ARCH) && !defined (TARGET_VIRTUAL_FRAME_POINTER)
417 #define TARGET_VIRTUAL_FRAME_POINTER(pc, frame_regnum, frame_offset) (legacy_virtual_frame_pointer (pc, frame_regnum, frame_offset))
418 #endif
419
420 typedef void (gdbarch_virtual_frame_pointer_ftype) (CORE_ADDR pc, int *frame_regnum, LONGEST *frame_offset);
421 extern void gdbarch_virtual_frame_pointer (struct gdbarch *gdbarch, CORE_ADDR pc, int *frame_regnum, LONGEST *frame_offset);
422 extern void set_gdbarch_virtual_frame_pointer (struct gdbarch *gdbarch, gdbarch_virtual_frame_pointer_ftype *virtual_frame_pointer);
423 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_VIRTUAL_FRAME_POINTER)
424 #error "Non multi-arch definition of TARGET_VIRTUAL_FRAME_POINTER"
425 #endif
426 #if GDB_MULTI_ARCH
427 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_VIRTUAL_FRAME_POINTER)
428 #define TARGET_VIRTUAL_FRAME_POINTER(pc, frame_regnum, frame_offset) (gdbarch_virtual_frame_pointer (current_gdbarch, pc, frame_regnum, frame_offset))
429 #endif
430 #endif
431
432 extern int gdbarch_register_read_p (struct gdbarch *gdbarch);
433
434 typedef void (gdbarch_register_read_ftype) (struct gdbarch *gdbarch, int regnum, char *buf);
435 extern void gdbarch_register_read (struct gdbarch *gdbarch, int regnum, char *buf);
436 extern void set_gdbarch_register_read (struct gdbarch *gdbarch, gdbarch_register_read_ftype *register_read);
437
438 extern int gdbarch_register_write_p (struct gdbarch *gdbarch);
439
440 typedef void (gdbarch_register_write_ftype) (struct gdbarch *gdbarch, int regnum, char *buf);
441 extern void gdbarch_register_write (struct gdbarch *gdbarch, int regnum, char *buf);
442 extern void set_gdbarch_register_write (struct gdbarch *gdbarch, gdbarch_register_write_ftype *register_write);
443
444 extern int gdbarch_num_regs (struct gdbarch *gdbarch);
445 extern void set_gdbarch_num_regs (struct gdbarch *gdbarch, int num_regs);
446 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (NUM_REGS)
447 #error "Non multi-arch definition of NUM_REGS"
448 #endif
449 #if GDB_MULTI_ARCH
450 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (NUM_REGS)
451 #define NUM_REGS (gdbarch_num_regs (current_gdbarch))
452 #endif
453 #endif
454
455 /* This macro gives the number of pseudo-registers that live in the
456 register namespace but do not get fetched or stored on the target.
457 These pseudo-registers may be aliases for other registers,
458 combinations of other registers, or they may be computed by GDB. */
459
460 /* Default (value) for non- multi-arch platforms. */
461 #if (!GDB_MULTI_ARCH) && !defined (NUM_PSEUDO_REGS)
462 #define NUM_PSEUDO_REGS (0)
463 #endif
464
465 extern int gdbarch_num_pseudo_regs (struct gdbarch *gdbarch);
466 extern void set_gdbarch_num_pseudo_regs (struct gdbarch *gdbarch, int num_pseudo_regs);
467 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (NUM_PSEUDO_REGS)
468 #error "Non multi-arch definition of NUM_PSEUDO_REGS"
469 #endif
470 #if GDB_MULTI_ARCH
471 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (NUM_PSEUDO_REGS)
472 #define NUM_PSEUDO_REGS (gdbarch_num_pseudo_regs (current_gdbarch))
473 #endif
474 #endif
475
476 extern int gdbarch_sp_regnum (struct gdbarch *gdbarch);
477 extern void set_gdbarch_sp_regnum (struct gdbarch *gdbarch, int sp_regnum);
478 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SP_REGNUM)
479 #error "Non multi-arch definition of SP_REGNUM"
480 #endif
481 #if GDB_MULTI_ARCH
482 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SP_REGNUM)
483 #define SP_REGNUM (gdbarch_sp_regnum (current_gdbarch))
484 #endif
485 #endif
486
487 extern int gdbarch_fp_regnum (struct gdbarch *gdbarch);
488 extern void set_gdbarch_fp_regnum (struct gdbarch *gdbarch, int fp_regnum);
489 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FP_REGNUM)
490 #error "Non multi-arch definition of FP_REGNUM"
491 #endif
492 #if GDB_MULTI_ARCH
493 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FP_REGNUM)
494 #define FP_REGNUM (gdbarch_fp_regnum (current_gdbarch))
495 #endif
496 #endif
497
498 extern int gdbarch_pc_regnum (struct gdbarch *gdbarch);
499 extern void set_gdbarch_pc_regnum (struct gdbarch *gdbarch, int pc_regnum);
500 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PC_REGNUM)
501 #error "Non multi-arch definition of PC_REGNUM"
502 #endif
503 #if GDB_MULTI_ARCH
504 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PC_REGNUM)
505 #define PC_REGNUM (gdbarch_pc_regnum (current_gdbarch))
506 #endif
507 #endif
508
509 /* Default (value) for non- multi-arch platforms. */
510 #if (!GDB_MULTI_ARCH) && !defined (FP0_REGNUM)
511 #define FP0_REGNUM (-1)
512 #endif
513
514 extern int gdbarch_fp0_regnum (struct gdbarch *gdbarch);
515 extern void set_gdbarch_fp0_regnum (struct gdbarch *gdbarch, int fp0_regnum);
516 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FP0_REGNUM)
517 #error "Non multi-arch definition of FP0_REGNUM"
518 #endif
519 #if GDB_MULTI_ARCH
520 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FP0_REGNUM)
521 #define FP0_REGNUM (gdbarch_fp0_regnum (current_gdbarch))
522 #endif
523 #endif
524
525 /* Default (value) for non- multi-arch platforms. */
526 #if (!GDB_MULTI_ARCH) && !defined (NPC_REGNUM)
527 #define NPC_REGNUM (-1)
528 #endif
529
530 extern int gdbarch_npc_regnum (struct gdbarch *gdbarch);
531 extern void set_gdbarch_npc_regnum (struct gdbarch *gdbarch, int npc_regnum);
532 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (NPC_REGNUM)
533 #error "Non multi-arch definition of NPC_REGNUM"
534 #endif
535 #if GDB_MULTI_ARCH
536 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (NPC_REGNUM)
537 #define NPC_REGNUM (gdbarch_npc_regnum (current_gdbarch))
538 #endif
539 #endif
540
541 /* Default (value) for non- multi-arch platforms. */
542 #if (!GDB_MULTI_ARCH) && !defined (NNPC_REGNUM)
543 #define NNPC_REGNUM (-1)
544 #endif
545
546 extern int gdbarch_nnpc_regnum (struct gdbarch *gdbarch);
547 extern void set_gdbarch_nnpc_regnum (struct gdbarch *gdbarch, int nnpc_regnum);
548 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (NNPC_REGNUM)
549 #error "Non multi-arch definition of NNPC_REGNUM"
550 #endif
551 #if GDB_MULTI_ARCH
552 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (NNPC_REGNUM)
553 #define NNPC_REGNUM (gdbarch_nnpc_regnum (current_gdbarch))
554 #endif
555 #endif
556
557 /* Convert stab register number (from `r' declaration) to a gdb REGNUM. */
558
559 /* Default (function) for non- multi-arch platforms. */
560 #if (!GDB_MULTI_ARCH) && !defined (STAB_REG_TO_REGNUM)
561 #define STAB_REG_TO_REGNUM(stab_regnr) (no_op_reg_to_regnum (stab_regnr))
562 #endif
563
564 typedef int (gdbarch_stab_reg_to_regnum_ftype) (int stab_regnr);
565 extern int gdbarch_stab_reg_to_regnum (struct gdbarch *gdbarch, int stab_regnr);
566 extern void set_gdbarch_stab_reg_to_regnum (struct gdbarch *gdbarch, gdbarch_stab_reg_to_regnum_ftype *stab_reg_to_regnum);
567 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (STAB_REG_TO_REGNUM)
568 #error "Non multi-arch definition of STAB_REG_TO_REGNUM"
569 #endif
570 #if GDB_MULTI_ARCH
571 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (STAB_REG_TO_REGNUM)
572 #define STAB_REG_TO_REGNUM(stab_regnr) (gdbarch_stab_reg_to_regnum (current_gdbarch, stab_regnr))
573 #endif
574 #endif
575
576 /* Provide a default mapping from a ecoff register number to a gdb REGNUM. */
577
578 /* Default (function) for non- multi-arch platforms. */
579 #if (!GDB_MULTI_ARCH) && !defined (ECOFF_REG_TO_REGNUM)
580 #define ECOFF_REG_TO_REGNUM(ecoff_regnr) (no_op_reg_to_regnum (ecoff_regnr))
581 #endif
582
583 typedef int (gdbarch_ecoff_reg_to_regnum_ftype) (int ecoff_regnr);
584 extern int gdbarch_ecoff_reg_to_regnum (struct gdbarch *gdbarch, int ecoff_regnr);
585 extern void set_gdbarch_ecoff_reg_to_regnum (struct gdbarch *gdbarch, gdbarch_ecoff_reg_to_regnum_ftype *ecoff_reg_to_regnum);
586 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (ECOFF_REG_TO_REGNUM)
587 #error "Non multi-arch definition of ECOFF_REG_TO_REGNUM"
588 #endif
589 #if GDB_MULTI_ARCH
590 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (ECOFF_REG_TO_REGNUM)
591 #define ECOFF_REG_TO_REGNUM(ecoff_regnr) (gdbarch_ecoff_reg_to_regnum (current_gdbarch, ecoff_regnr))
592 #endif
593 #endif
594
595 /* Provide a default mapping from a DWARF register number to a gdb REGNUM. */
596
597 /* Default (function) for non- multi-arch platforms. */
598 #if (!GDB_MULTI_ARCH) && !defined (DWARF_REG_TO_REGNUM)
599 #define DWARF_REG_TO_REGNUM(dwarf_regnr) (no_op_reg_to_regnum (dwarf_regnr))
600 #endif
601
602 typedef int (gdbarch_dwarf_reg_to_regnum_ftype) (int dwarf_regnr);
603 extern int gdbarch_dwarf_reg_to_regnum (struct gdbarch *gdbarch, int dwarf_regnr);
604 extern void set_gdbarch_dwarf_reg_to_regnum (struct gdbarch *gdbarch, gdbarch_dwarf_reg_to_regnum_ftype *dwarf_reg_to_regnum);
605 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (DWARF_REG_TO_REGNUM)
606 #error "Non multi-arch definition of DWARF_REG_TO_REGNUM"
607 #endif
608 #if GDB_MULTI_ARCH
609 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (DWARF_REG_TO_REGNUM)
610 #define DWARF_REG_TO_REGNUM(dwarf_regnr) (gdbarch_dwarf_reg_to_regnum (current_gdbarch, dwarf_regnr))
611 #endif
612 #endif
613
614 /* Convert from an sdb register number to an internal gdb register number.
615 This should be defined in tm.h, if REGISTER_NAMES is not set up
616 to map one to one onto the sdb register numbers. */
617
618 /* Default (function) for non- multi-arch platforms. */
619 #if (!GDB_MULTI_ARCH) && !defined (SDB_REG_TO_REGNUM)
620 #define SDB_REG_TO_REGNUM(sdb_regnr) (no_op_reg_to_regnum (sdb_regnr))
621 #endif
622
623 typedef int (gdbarch_sdb_reg_to_regnum_ftype) (int sdb_regnr);
624 extern int gdbarch_sdb_reg_to_regnum (struct gdbarch *gdbarch, int sdb_regnr);
625 extern void set_gdbarch_sdb_reg_to_regnum (struct gdbarch *gdbarch, gdbarch_sdb_reg_to_regnum_ftype *sdb_reg_to_regnum);
626 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SDB_REG_TO_REGNUM)
627 #error "Non multi-arch definition of SDB_REG_TO_REGNUM"
628 #endif
629 #if GDB_MULTI_ARCH
630 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SDB_REG_TO_REGNUM)
631 #define SDB_REG_TO_REGNUM(sdb_regnr) (gdbarch_sdb_reg_to_regnum (current_gdbarch, sdb_regnr))
632 #endif
633 #endif
634
635 /* Default (function) for non- multi-arch platforms. */
636 #if (!GDB_MULTI_ARCH) && !defined (DWARF2_REG_TO_REGNUM)
637 #define DWARF2_REG_TO_REGNUM(dwarf2_regnr) (no_op_reg_to_regnum (dwarf2_regnr))
638 #endif
639
640 typedef int (gdbarch_dwarf2_reg_to_regnum_ftype) (int dwarf2_regnr);
641 extern int gdbarch_dwarf2_reg_to_regnum (struct gdbarch *gdbarch, int dwarf2_regnr);
642 extern void set_gdbarch_dwarf2_reg_to_regnum (struct gdbarch *gdbarch, gdbarch_dwarf2_reg_to_regnum_ftype *dwarf2_reg_to_regnum);
643 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (DWARF2_REG_TO_REGNUM)
644 #error "Non multi-arch definition of DWARF2_REG_TO_REGNUM"
645 #endif
646 #if GDB_MULTI_ARCH
647 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (DWARF2_REG_TO_REGNUM)
648 #define DWARF2_REG_TO_REGNUM(dwarf2_regnr) (gdbarch_dwarf2_reg_to_regnum (current_gdbarch, dwarf2_regnr))
649 #endif
650 #endif
651
652 /* Default (function) for non- multi-arch platforms. */
653 #if (!GDB_MULTI_ARCH) && !defined (REGISTER_NAME)
654 #define REGISTER_NAME(regnr) (legacy_register_name (regnr))
655 #endif
656
657 typedef char * (gdbarch_register_name_ftype) (int regnr);
658 extern char * gdbarch_register_name (struct gdbarch *gdbarch, int regnr);
659 extern void set_gdbarch_register_name (struct gdbarch *gdbarch, gdbarch_register_name_ftype *register_name);
660 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_NAME)
661 #error "Non multi-arch definition of REGISTER_NAME"
662 #endif
663 #if GDB_MULTI_ARCH
664 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_NAME)
665 #define REGISTER_NAME(regnr) (gdbarch_register_name (current_gdbarch, regnr))
666 #endif
667 #endif
668
669 extern int gdbarch_register_size (struct gdbarch *gdbarch);
670 extern void set_gdbarch_register_size (struct gdbarch *gdbarch, int register_size);
671 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_SIZE)
672 #error "Non multi-arch definition of REGISTER_SIZE"
673 #endif
674 #if GDB_MULTI_ARCH
675 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_SIZE)
676 #define REGISTER_SIZE (gdbarch_register_size (current_gdbarch))
677 #endif
678 #endif
679
680 extern int gdbarch_register_bytes (struct gdbarch *gdbarch);
681 extern void set_gdbarch_register_bytes (struct gdbarch *gdbarch, int register_bytes);
682 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_BYTES)
683 #error "Non multi-arch definition of REGISTER_BYTES"
684 #endif
685 #if GDB_MULTI_ARCH
686 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_BYTES)
687 #define REGISTER_BYTES (gdbarch_register_bytes (current_gdbarch))
688 #endif
689 #endif
690
691 typedef int (gdbarch_register_byte_ftype) (int reg_nr);
692 extern int gdbarch_register_byte (struct gdbarch *gdbarch, int reg_nr);
693 extern void set_gdbarch_register_byte (struct gdbarch *gdbarch, gdbarch_register_byte_ftype *register_byte);
694 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_BYTE)
695 #error "Non multi-arch definition of REGISTER_BYTE"
696 #endif
697 #if GDB_MULTI_ARCH
698 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_BYTE)
699 #define REGISTER_BYTE(reg_nr) (gdbarch_register_byte (current_gdbarch, reg_nr))
700 #endif
701 #endif
702
703 typedef int (gdbarch_register_raw_size_ftype) (int reg_nr);
704 extern int gdbarch_register_raw_size (struct gdbarch *gdbarch, int reg_nr);
705 extern void set_gdbarch_register_raw_size (struct gdbarch *gdbarch, gdbarch_register_raw_size_ftype *register_raw_size);
706 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_RAW_SIZE)
707 #error "Non multi-arch definition of REGISTER_RAW_SIZE"
708 #endif
709 #if GDB_MULTI_ARCH
710 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_RAW_SIZE)
711 #define REGISTER_RAW_SIZE(reg_nr) (gdbarch_register_raw_size (current_gdbarch, reg_nr))
712 #endif
713 #endif
714
715 extern int gdbarch_max_register_raw_size (struct gdbarch *gdbarch);
716 extern void set_gdbarch_max_register_raw_size (struct gdbarch *gdbarch, int max_register_raw_size);
717 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (MAX_REGISTER_RAW_SIZE)
718 #error "Non multi-arch definition of MAX_REGISTER_RAW_SIZE"
719 #endif
720 #if GDB_MULTI_ARCH
721 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (MAX_REGISTER_RAW_SIZE)
722 #define MAX_REGISTER_RAW_SIZE (gdbarch_max_register_raw_size (current_gdbarch))
723 #endif
724 #endif
725
726 typedef int (gdbarch_register_virtual_size_ftype) (int reg_nr);
727 extern int gdbarch_register_virtual_size (struct gdbarch *gdbarch, int reg_nr);
728 extern void set_gdbarch_register_virtual_size (struct gdbarch *gdbarch, gdbarch_register_virtual_size_ftype *register_virtual_size);
729 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_VIRTUAL_SIZE)
730 #error "Non multi-arch definition of REGISTER_VIRTUAL_SIZE"
731 #endif
732 #if GDB_MULTI_ARCH
733 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_VIRTUAL_SIZE)
734 #define REGISTER_VIRTUAL_SIZE(reg_nr) (gdbarch_register_virtual_size (current_gdbarch, reg_nr))
735 #endif
736 #endif
737
738 extern int gdbarch_max_register_virtual_size (struct gdbarch *gdbarch);
739 extern void set_gdbarch_max_register_virtual_size (struct gdbarch *gdbarch, int max_register_virtual_size);
740 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (MAX_REGISTER_VIRTUAL_SIZE)
741 #error "Non multi-arch definition of MAX_REGISTER_VIRTUAL_SIZE"
742 #endif
743 #if GDB_MULTI_ARCH
744 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (MAX_REGISTER_VIRTUAL_SIZE)
745 #define MAX_REGISTER_VIRTUAL_SIZE (gdbarch_max_register_virtual_size (current_gdbarch))
746 #endif
747 #endif
748
749 typedef struct type * (gdbarch_register_virtual_type_ftype) (int reg_nr);
750 extern struct type * gdbarch_register_virtual_type (struct gdbarch *gdbarch, int reg_nr);
751 extern void set_gdbarch_register_virtual_type (struct gdbarch *gdbarch, gdbarch_register_virtual_type_ftype *register_virtual_type);
752 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_VIRTUAL_TYPE)
753 #error "Non multi-arch definition of REGISTER_VIRTUAL_TYPE"
754 #endif
755 #if GDB_MULTI_ARCH
756 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_VIRTUAL_TYPE)
757 #define REGISTER_VIRTUAL_TYPE(reg_nr) (gdbarch_register_virtual_type (current_gdbarch, reg_nr))
758 #endif
759 #endif
760
761 /* Default (function) for non- multi-arch platforms. */
762 #if (!GDB_MULTI_ARCH) && !defined (DO_REGISTERS_INFO)
763 #define DO_REGISTERS_INFO(reg_nr, fpregs) (do_registers_info (reg_nr, fpregs))
764 #endif
765
766 typedef void (gdbarch_do_registers_info_ftype) (int reg_nr, int fpregs);
767 extern void gdbarch_do_registers_info (struct gdbarch *gdbarch, int reg_nr, int fpregs);
768 extern void set_gdbarch_do_registers_info (struct gdbarch *gdbarch, gdbarch_do_registers_info_ftype *do_registers_info);
769 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (DO_REGISTERS_INFO)
770 #error "Non multi-arch definition of DO_REGISTERS_INFO"
771 #endif
772 #if GDB_MULTI_ARCH
773 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (DO_REGISTERS_INFO)
774 #define DO_REGISTERS_INFO(reg_nr, fpregs) (gdbarch_do_registers_info (current_gdbarch, reg_nr, fpregs))
775 #endif
776 #endif
777
778 /* Default (function) for non- multi-arch platforms. */
779 #if (!GDB_MULTI_ARCH) && !defined (PRINT_FLOAT_INFO)
780 #define PRINT_FLOAT_INFO() (default_print_float_info ())
781 #endif
782
783 typedef void (gdbarch_print_float_info_ftype) (void);
784 extern void gdbarch_print_float_info (struct gdbarch *gdbarch);
785 extern void set_gdbarch_print_float_info (struct gdbarch *gdbarch, gdbarch_print_float_info_ftype *print_float_info);
786 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PRINT_FLOAT_INFO)
787 #error "Non multi-arch definition of PRINT_FLOAT_INFO"
788 #endif
789 #if GDB_MULTI_ARCH
790 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PRINT_FLOAT_INFO)
791 #define PRINT_FLOAT_INFO() (gdbarch_print_float_info (current_gdbarch))
792 #endif
793 #endif
794
795 /* MAP a GDB RAW register number onto a simulator register number. See
796 also include/...-sim.h. */
797
798 /* Default (function) for non- multi-arch platforms. */
799 #if (!GDB_MULTI_ARCH) && !defined (REGISTER_SIM_REGNO)
800 #define REGISTER_SIM_REGNO(reg_nr) (default_register_sim_regno (reg_nr))
801 #endif
802
803 typedef int (gdbarch_register_sim_regno_ftype) (int reg_nr);
804 extern int gdbarch_register_sim_regno (struct gdbarch *gdbarch, int reg_nr);
805 extern void set_gdbarch_register_sim_regno (struct gdbarch *gdbarch, gdbarch_register_sim_regno_ftype *register_sim_regno);
806 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_SIM_REGNO)
807 #error "Non multi-arch definition of REGISTER_SIM_REGNO"
808 #endif
809 #if GDB_MULTI_ARCH
810 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_SIM_REGNO)
811 #define REGISTER_SIM_REGNO(reg_nr) (gdbarch_register_sim_regno (current_gdbarch, reg_nr))
812 #endif
813 #endif
814
815 #if defined (REGISTER_BYTES_OK)
816 /* Legacy for systems yet to multi-arch REGISTER_BYTES_OK */
817 #if !defined (REGISTER_BYTES_OK_P)
818 #define REGISTER_BYTES_OK_P() (1)
819 #endif
820 #endif
821
822 /* Default predicate for non- multi-arch targets. */
823 #if (!GDB_MULTI_ARCH) && !defined (REGISTER_BYTES_OK_P)
824 #define REGISTER_BYTES_OK_P() (0)
825 #endif
826
827 extern int gdbarch_register_bytes_ok_p (struct gdbarch *gdbarch);
828 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_BYTES_OK_P)
829 #error "Non multi-arch definition of REGISTER_BYTES_OK"
830 #endif
831 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_BYTES_OK_P)
832 #define REGISTER_BYTES_OK_P() (gdbarch_register_bytes_ok_p (current_gdbarch))
833 #endif
834
835 /* Default (function) for non- multi-arch platforms. */
836 #if (!GDB_MULTI_ARCH) && !defined (REGISTER_BYTES_OK)
837 #define REGISTER_BYTES_OK(nr_bytes) (internal_error (__FILE__, __LINE__, "REGISTER_BYTES_OK"), 0)
838 #endif
839
840 typedef int (gdbarch_register_bytes_ok_ftype) (long nr_bytes);
841 extern int gdbarch_register_bytes_ok (struct gdbarch *gdbarch, long nr_bytes);
842 extern void set_gdbarch_register_bytes_ok (struct gdbarch *gdbarch, gdbarch_register_bytes_ok_ftype *register_bytes_ok);
843 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_BYTES_OK)
844 #error "Non multi-arch definition of REGISTER_BYTES_OK"
845 #endif
846 #if GDB_MULTI_ARCH
847 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_BYTES_OK)
848 #define REGISTER_BYTES_OK(nr_bytes) (gdbarch_register_bytes_ok (current_gdbarch, nr_bytes))
849 #endif
850 #endif
851
852 /* Default (function) for non- multi-arch platforms. */
853 #if (!GDB_MULTI_ARCH) && !defined (CANNOT_FETCH_REGISTER)
854 #define CANNOT_FETCH_REGISTER(regnum) (cannot_register_not (regnum))
855 #endif
856
857 typedef int (gdbarch_cannot_fetch_register_ftype) (int regnum);
858 extern int gdbarch_cannot_fetch_register (struct gdbarch *gdbarch, int regnum);
859 extern void set_gdbarch_cannot_fetch_register (struct gdbarch *gdbarch, gdbarch_cannot_fetch_register_ftype *cannot_fetch_register);
860 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CANNOT_FETCH_REGISTER)
861 #error "Non multi-arch definition of CANNOT_FETCH_REGISTER"
862 #endif
863 #if GDB_MULTI_ARCH
864 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CANNOT_FETCH_REGISTER)
865 #define CANNOT_FETCH_REGISTER(regnum) (gdbarch_cannot_fetch_register (current_gdbarch, regnum))
866 #endif
867 #endif
868
869 /* Default (function) for non- multi-arch platforms. */
870 #if (!GDB_MULTI_ARCH) && !defined (CANNOT_STORE_REGISTER)
871 #define CANNOT_STORE_REGISTER(regnum) (cannot_register_not (regnum))
872 #endif
873
874 typedef int (gdbarch_cannot_store_register_ftype) (int regnum);
875 extern int gdbarch_cannot_store_register (struct gdbarch *gdbarch, int regnum);
876 extern void set_gdbarch_cannot_store_register (struct gdbarch *gdbarch, gdbarch_cannot_store_register_ftype *cannot_store_register);
877 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CANNOT_STORE_REGISTER)
878 #error "Non multi-arch definition of CANNOT_STORE_REGISTER"
879 #endif
880 #if GDB_MULTI_ARCH
881 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CANNOT_STORE_REGISTER)
882 #define CANNOT_STORE_REGISTER(regnum) (gdbarch_cannot_store_register (current_gdbarch, regnum))
883 #endif
884 #endif
885
886 extern int gdbarch_use_generic_dummy_frames (struct gdbarch *gdbarch);
887 extern void set_gdbarch_use_generic_dummy_frames (struct gdbarch *gdbarch, int use_generic_dummy_frames);
888 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (USE_GENERIC_DUMMY_FRAMES)
889 #error "Non multi-arch definition of USE_GENERIC_DUMMY_FRAMES"
890 #endif
891 #if GDB_MULTI_ARCH
892 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (USE_GENERIC_DUMMY_FRAMES)
893 #define USE_GENERIC_DUMMY_FRAMES (gdbarch_use_generic_dummy_frames (current_gdbarch))
894 #endif
895 #endif
896
897 extern int gdbarch_call_dummy_location (struct gdbarch *gdbarch);
898 extern void set_gdbarch_call_dummy_location (struct gdbarch *gdbarch, int call_dummy_location);
899 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_LOCATION)
900 #error "Non multi-arch definition of CALL_DUMMY_LOCATION"
901 #endif
902 #if GDB_MULTI_ARCH
903 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_LOCATION)
904 #define CALL_DUMMY_LOCATION (gdbarch_call_dummy_location (current_gdbarch))
905 #endif
906 #endif
907
908 typedef CORE_ADDR (gdbarch_call_dummy_address_ftype) (void);
909 extern CORE_ADDR gdbarch_call_dummy_address (struct gdbarch *gdbarch);
910 extern void set_gdbarch_call_dummy_address (struct gdbarch *gdbarch, gdbarch_call_dummy_address_ftype *call_dummy_address);
911 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_ADDRESS)
912 #error "Non multi-arch definition of CALL_DUMMY_ADDRESS"
913 #endif
914 #if GDB_MULTI_ARCH
915 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_ADDRESS)
916 #define CALL_DUMMY_ADDRESS() (gdbarch_call_dummy_address (current_gdbarch))
917 #endif
918 #endif
919
920 extern CORE_ADDR gdbarch_call_dummy_start_offset (struct gdbarch *gdbarch);
921 extern void set_gdbarch_call_dummy_start_offset (struct gdbarch *gdbarch, CORE_ADDR call_dummy_start_offset);
922 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_START_OFFSET)
923 #error "Non multi-arch definition of CALL_DUMMY_START_OFFSET"
924 #endif
925 #if GDB_MULTI_ARCH
926 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_START_OFFSET)
927 #define CALL_DUMMY_START_OFFSET (gdbarch_call_dummy_start_offset (current_gdbarch))
928 #endif
929 #endif
930
931 extern CORE_ADDR gdbarch_call_dummy_breakpoint_offset (struct gdbarch *gdbarch);
932 extern void set_gdbarch_call_dummy_breakpoint_offset (struct gdbarch *gdbarch, CORE_ADDR call_dummy_breakpoint_offset);
933 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_BREAKPOINT_OFFSET)
934 #error "Non multi-arch definition of CALL_DUMMY_BREAKPOINT_OFFSET"
935 #endif
936 #if GDB_MULTI_ARCH
937 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_BREAKPOINT_OFFSET)
938 #define CALL_DUMMY_BREAKPOINT_OFFSET (gdbarch_call_dummy_breakpoint_offset (current_gdbarch))
939 #endif
940 #endif
941
942 extern int gdbarch_call_dummy_breakpoint_offset_p (struct gdbarch *gdbarch);
943 extern void set_gdbarch_call_dummy_breakpoint_offset_p (struct gdbarch *gdbarch, int call_dummy_breakpoint_offset_p);
944 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_BREAKPOINT_OFFSET_P)
945 #error "Non multi-arch definition of CALL_DUMMY_BREAKPOINT_OFFSET_P"
946 #endif
947 #if GDB_MULTI_ARCH
948 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_BREAKPOINT_OFFSET_P)
949 #define CALL_DUMMY_BREAKPOINT_OFFSET_P (gdbarch_call_dummy_breakpoint_offset_p (current_gdbarch))
950 #endif
951 #endif
952
953 extern int gdbarch_call_dummy_length (struct gdbarch *gdbarch);
954 extern void set_gdbarch_call_dummy_length (struct gdbarch *gdbarch, int call_dummy_length);
955 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_LENGTH)
956 #error "Non multi-arch definition of CALL_DUMMY_LENGTH"
957 #endif
958 #if GDB_MULTI_ARCH
959 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_LENGTH)
960 #define CALL_DUMMY_LENGTH (gdbarch_call_dummy_length (current_gdbarch))
961 #endif
962 #endif
963
964 typedef int (gdbarch_pc_in_call_dummy_ftype) (CORE_ADDR pc, CORE_ADDR sp, CORE_ADDR frame_address);
965 extern int gdbarch_pc_in_call_dummy (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR sp, CORE_ADDR frame_address);
966 extern void set_gdbarch_pc_in_call_dummy (struct gdbarch *gdbarch, gdbarch_pc_in_call_dummy_ftype *pc_in_call_dummy);
967 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PC_IN_CALL_DUMMY)
968 #error "Non multi-arch definition of PC_IN_CALL_DUMMY"
969 #endif
970 #if GDB_MULTI_ARCH
971 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PC_IN_CALL_DUMMY)
972 #define PC_IN_CALL_DUMMY(pc, sp, frame_address) (gdbarch_pc_in_call_dummy (current_gdbarch, pc, sp, frame_address))
973 #endif
974 #endif
975
976 extern int gdbarch_call_dummy_p (struct gdbarch *gdbarch);
977 extern void set_gdbarch_call_dummy_p (struct gdbarch *gdbarch, int call_dummy_p);
978 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_P)
979 #error "Non multi-arch definition of CALL_DUMMY_P"
980 #endif
981 #if GDB_MULTI_ARCH
982 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_P)
983 #define CALL_DUMMY_P (gdbarch_call_dummy_p (current_gdbarch))
984 #endif
985 #endif
986
987 /* Default (value) for non- multi-arch platforms. */
988 #if (!GDB_MULTI_ARCH) && !defined (CALL_DUMMY_WORDS)
989 #define CALL_DUMMY_WORDS (legacy_call_dummy_words)
990 #endif
991
992 extern LONGEST * gdbarch_call_dummy_words (struct gdbarch *gdbarch);
993 extern void set_gdbarch_call_dummy_words (struct gdbarch *gdbarch, LONGEST * call_dummy_words);
994 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_WORDS)
995 #error "Non multi-arch definition of CALL_DUMMY_WORDS"
996 #endif
997 #if GDB_MULTI_ARCH
998 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_WORDS)
999 #define CALL_DUMMY_WORDS (gdbarch_call_dummy_words (current_gdbarch))
1000 #endif
1001 #endif
1002
1003 /* Default (value) for non- multi-arch platforms. */
1004 #if (!GDB_MULTI_ARCH) && !defined (SIZEOF_CALL_DUMMY_WORDS)
1005 #define SIZEOF_CALL_DUMMY_WORDS (legacy_sizeof_call_dummy_words)
1006 #endif
1007
1008 extern int gdbarch_sizeof_call_dummy_words (struct gdbarch *gdbarch);
1009 extern void set_gdbarch_sizeof_call_dummy_words (struct gdbarch *gdbarch, int sizeof_call_dummy_words);
1010 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SIZEOF_CALL_DUMMY_WORDS)
1011 #error "Non multi-arch definition of SIZEOF_CALL_DUMMY_WORDS"
1012 #endif
1013 #if GDB_MULTI_ARCH
1014 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SIZEOF_CALL_DUMMY_WORDS)
1015 #define SIZEOF_CALL_DUMMY_WORDS (gdbarch_sizeof_call_dummy_words (current_gdbarch))
1016 #endif
1017 #endif
1018
1019 extern int gdbarch_call_dummy_stack_adjust_p (struct gdbarch *gdbarch);
1020 extern void set_gdbarch_call_dummy_stack_adjust_p (struct gdbarch *gdbarch, int call_dummy_stack_adjust_p);
1021 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_STACK_ADJUST_P)
1022 #error "Non multi-arch definition of CALL_DUMMY_STACK_ADJUST_P"
1023 #endif
1024 #if GDB_MULTI_ARCH
1025 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_STACK_ADJUST_P)
1026 #define CALL_DUMMY_STACK_ADJUST_P (gdbarch_call_dummy_stack_adjust_p (current_gdbarch))
1027 #endif
1028 #endif
1029
1030 extern int gdbarch_call_dummy_stack_adjust (struct gdbarch *gdbarch);
1031 extern void set_gdbarch_call_dummy_stack_adjust (struct gdbarch *gdbarch, int call_dummy_stack_adjust);
1032 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CALL_DUMMY_STACK_ADJUST)
1033 #error "Non multi-arch definition of CALL_DUMMY_STACK_ADJUST"
1034 #endif
1035 #if GDB_MULTI_ARCH
1036 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CALL_DUMMY_STACK_ADJUST)
1037 #define CALL_DUMMY_STACK_ADJUST (gdbarch_call_dummy_stack_adjust (current_gdbarch))
1038 #endif
1039 #endif
1040
1041 typedef void (gdbarch_fix_call_dummy_ftype) (char *dummy, CORE_ADDR pc, CORE_ADDR fun, int nargs, struct value **args, struct type *type, int gcc_p);
1042 extern void gdbarch_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);
1043 extern void set_gdbarch_fix_call_dummy (struct gdbarch *gdbarch, gdbarch_fix_call_dummy_ftype *fix_call_dummy);
1044 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FIX_CALL_DUMMY)
1045 #error "Non multi-arch definition of FIX_CALL_DUMMY"
1046 #endif
1047 #if GDB_MULTI_ARCH
1048 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FIX_CALL_DUMMY)
1049 #define FIX_CALL_DUMMY(dummy, pc, fun, nargs, args, type, gcc_p) (gdbarch_fix_call_dummy (current_gdbarch, dummy, pc, fun, nargs, args, type, gcc_p))
1050 #endif
1051 #endif
1052
1053 /* Default (function) for non- multi-arch platforms. */
1054 #if (!GDB_MULTI_ARCH) && !defined (INIT_FRAME_PC_FIRST)
1055 #define INIT_FRAME_PC_FIRST(fromleaf, prev) (init_frame_pc_noop (fromleaf, prev))
1056 #endif
1057
1058 typedef void (gdbarch_init_frame_pc_first_ftype) (int fromleaf, struct frame_info *prev);
1059 extern void gdbarch_init_frame_pc_first (struct gdbarch *gdbarch, int fromleaf, struct frame_info *prev);
1060 extern void set_gdbarch_init_frame_pc_first (struct gdbarch *gdbarch, gdbarch_init_frame_pc_first_ftype *init_frame_pc_first);
1061 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (INIT_FRAME_PC_FIRST)
1062 #error "Non multi-arch definition of INIT_FRAME_PC_FIRST"
1063 #endif
1064 #if GDB_MULTI_ARCH
1065 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (INIT_FRAME_PC_FIRST)
1066 #define INIT_FRAME_PC_FIRST(fromleaf, prev) (gdbarch_init_frame_pc_first (current_gdbarch, fromleaf, prev))
1067 #endif
1068 #endif
1069
1070 /* Default (function) for non- multi-arch platforms. */
1071 #if (!GDB_MULTI_ARCH) && !defined (INIT_FRAME_PC)
1072 #define INIT_FRAME_PC(fromleaf, prev) (init_frame_pc_default (fromleaf, prev))
1073 #endif
1074
1075 typedef void (gdbarch_init_frame_pc_ftype) (int fromleaf, struct frame_info *prev);
1076 extern void gdbarch_init_frame_pc (struct gdbarch *gdbarch, int fromleaf, struct frame_info *prev);
1077 extern void set_gdbarch_init_frame_pc (struct gdbarch *gdbarch, gdbarch_init_frame_pc_ftype *init_frame_pc);
1078 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (INIT_FRAME_PC)
1079 #error "Non multi-arch definition of INIT_FRAME_PC"
1080 #endif
1081 #if GDB_MULTI_ARCH
1082 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (INIT_FRAME_PC)
1083 #define INIT_FRAME_PC(fromleaf, prev) (gdbarch_init_frame_pc (current_gdbarch, fromleaf, prev))
1084 #endif
1085 #endif
1086
1087 extern int gdbarch_believe_pcc_promotion (struct gdbarch *gdbarch);
1088 extern void set_gdbarch_believe_pcc_promotion (struct gdbarch *gdbarch, int believe_pcc_promotion);
1089 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (BELIEVE_PCC_PROMOTION)
1090 #error "Non multi-arch definition of BELIEVE_PCC_PROMOTION"
1091 #endif
1092 #if GDB_MULTI_ARCH
1093 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (BELIEVE_PCC_PROMOTION)
1094 #define BELIEVE_PCC_PROMOTION (gdbarch_believe_pcc_promotion (current_gdbarch))
1095 #endif
1096 #endif
1097
1098 extern int gdbarch_believe_pcc_promotion_type (struct gdbarch *gdbarch);
1099 extern void set_gdbarch_believe_pcc_promotion_type (struct gdbarch *gdbarch, int believe_pcc_promotion_type);
1100 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (BELIEVE_PCC_PROMOTION_TYPE)
1101 #error "Non multi-arch definition of BELIEVE_PCC_PROMOTION_TYPE"
1102 #endif
1103 #if GDB_MULTI_ARCH
1104 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (BELIEVE_PCC_PROMOTION_TYPE)
1105 #define BELIEVE_PCC_PROMOTION_TYPE (gdbarch_believe_pcc_promotion_type (current_gdbarch))
1106 #endif
1107 #endif
1108
1109 /* Default (function) for non- multi-arch platforms. */
1110 #if (!GDB_MULTI_ARCH) && !defined (COERCE_FLOAT_TO_DOUBLE)
1111 #define COERCE_FLOAT_TO_DOUBLE(formal, actual) (default_coerce_float_to_double (formal, actual))
1112 #endif
1113
1114 typedef int (gdbarch_coerce_float_to_double_ftype) (struct type *formal, struct type *actual);
1115 extern int gdbarch_coerce_float_to_double (struct gdbarch *gdbarch, struct type *formal, struct type *actual);
1116 extern void set_gdbarch_coerce_float_to_double (struct gdbarch *gdbarch, gdbarch_coerce_float_to_double_ftype *coerce_float_to_double);
1117 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (COERCE_FLOAT_TO_DOUBLE)
1118 #error "Non multi-arch definition of COERCE_FLOAT_TO_DOUBLE"
1119 #endif
1120 #if GDB_MULTI_ARCH
1121 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (COERCE_FLOAT_TO_DOUBLE)
1122 #define COERCE_FLOAT_TO_DOUBLE(formal, actual) (gdbarch_coerce_float_to_double (current_gdbarch, formal, actual))
1123 #endif
1124 #endif
1125
1126 typedef void (gdbarch_get_saved_register_ftype) (char *raw_buffer, int *optimized, CORE_ADDR *addrp, struct frame_info *frame, int regnum, enum lval_type *lval);
1127 extern void gdbarch_get_saved_register (struct gdbarch *gdbarch, char *raw_buffer, int *optimized, CORE_ADDR *addrp, struct frame_info *frame, int regnum, enum lval_type *lval);
1128 extern void set_gdbarch_get_saved_register (struct gdbarch *gdbarch, gdbarch_get_saved_register_ftype *get_saved_register);
1129 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (GET_SAVED_REGISTER)
1130 #error "Non multi-arch definition of GET_SAVED_REGISTER"
1131 #endif
1132 #if GDB_MULTI_ARCH
1133 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (GET_SAVED_REGISTER)
1134 #define GET_SAVED_REGISTER(raw_buffer, optimized, addrp, frame, regnum, lval) (gdbarch_get_saved_register (current_gdbarch, raw_buffer, optimized, addrp, frame, regnum, lval))
1135 #endif
1136 #endif
1137
1138 /* Default (function) for non- multi-arch platforms. */
1139 #if (!GDB_MULTI_ARCH) && !defined (REGISTER_CONVERTIBLE)
1140 #define REGISTER_CONVERTIBLE(nr) (generic_register_convertible_not (nr))
1141 #endif
1142
1143 typedef int (gdbarch_register_convertible_ftype) (int nr);
1144 extern int gdbarch_register_convertible (struct gdbarch *gdbarch, int nr);
1145 extern void set_gdbarch_register_convertible (struct gdbarch *gdbarch, gdbarch_register_convertible_ftype *register_convertible);
1146 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_CONVERTIBLE)
1147 #error "Non multi-arch definition of REGISTER_CONVERTIBLE"
1148 #endif
1149 #if GDB_MULTI_ARCH
1150 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_CONVERTIBLE)
1151 #define REGISTER_CONVERTIBLE(nr) (gdbarch_register_convertible (current_gdbarch, nr))
1152 #endif
1153 #endif
1154
1155 /* Default (function) for non- multi-arch platforms. */
1156 #if (!GDB_MULTI_ARCH) && !defined (REGISTER_CONVERT_TO_VIRTUAL)
1157 #define REGISTER_CONVERT_TO_VIRTUAL(regnum, type, from, to) (internal_error (__FILE__, __LINE__, "REGISTER_CONVERT_TO_VIRTUAL"), 0)
1158 #endif
1159
1160 typedef void (gdbarch_register_convert_to_virtual_ftype) (int regnum, struct type *type, char *from, char *to);
1161 extern void gdbarch_register_convert_to_virtual (struct gdbarch *gdbarch, int regnum, struct type *type, char *from, char *to);
1162 extern void set_gdbarch_register_convert_to_virtual (struct gdbarch *gdbarch, gdbarch_register_convert_to_virtual_ftype *register_convert_to_virtual);
1163 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_CONVERT_TO_VIRTUAL)
1164 #error "Non multi-arch definition of REGISTER_CONVERT_TO_VIRTUAL"
1165 #endif
1166 #if GDB_MULTI_ARCH
1167 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_CONVERT_TO_VIRTUAL)
1168 #define REGISTER_CONVERT_TO_VIRTUAL(regnum, type, from, to) (gdbarch_register_convert_to_virtual (current_gdbarch, regnum, type, from, to))
1169 #endif
1170 #endif
1171
1172 /* Default (function) for non- multi-arch platforms. */
1173 #if (!GDB_MULTI_ARCH) && !defined (REGISTER_CONVERT_TO_RAW)
1174 #define REGISTER_CONVERT_TO_RAW(type, regnum, from, to) (internal_error (__FILE__, __LINE__, "REGISTER_CONVERT_TO_RAW"), 0)
1175 #endif
1176
1177 typedef void (gdbarch_register_convert_to_raw_ftype) (struct type *type, int regnum, char *from, char *to);
1178 extern void gdbarch_register_convert_to_raw (struct gdbarch *gdbarch, struct type *type, int regnum, char *from, char *to);
1179 extern void set_gdbarch_register_convert_to_raw (struct gdbarch *gdbarch, gdbarch_register_convert_to_raw_ftype *register_convert_to_raw);
1180 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REGISTER_CONVERT_TO_RAW)
1181 #error "Non multi-arch definition of REGISTER_CONVERT_TO_RAW"
1182 #endif
1183 #if GDB_MULTI_ARCH
1184 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REGISTER_CONVERT_TO_RAW)
1185 #define REGISTER_CONVERT_TO_RAW(type, regnum, from, to) (gdbarch_register_convert_to_raw (current_gdbarch, type, regnum, from, to))
1186 #endif
1187 #endif
1188
1189 /* This function is called when the value of a pseudo-register needs to
1190 be updated. Typically it will be defined on a per-architecture
1191 basis. */
1192
1193 #if defined (FETCH_PSEUDO_REGISTER)
1194 /* Legacy for systems yet to multi-arch FETCH_PSEUDO_REGISTER */
1195 #if !defined (FETCH_PSEUDO_REGISTER_P)
1196 #define FETCH_PSEUDO_REGISTER_P() (1)
1197 #endif
1198 #endif
1199
1200 /* Default predicate for non- multi-arch targets. */
1201 #if (!GDB_MULTI_ARCH) && !defined (FETCH_PSEUDO_REGISTER_P)
1202 #define FETCH_PSEUDO_REGISTER_P() (0)
1203 #endif
1204
1205 extern int gdbarch_fetch_pseudo_register_p (struct gdbarch *gdbarch);
1206 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FETCH_PSEUDO_REGISTER_P)
1207 #error "Non multi-arch definition of FETCH_PSEUDO_REGISTER"
1208 #endif
1209 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FETCH_PSEUDO_REGISTER_P)
1210 #define FETCH_PSEUDO_REGISTER_P() (gdbarch_fetch_pseudo_register_p (current_gdbarch))
1211 #endif
1212
1213 /* Default (function) for non- multi-arch platforms. */
1214 #if (!GDB_MULTI_ARCH) && !defined (FETCH_PSEUDO_REGISTER)
1215 #define FETCH_PSEUDO_REGISTER(regnum) (internal_error (__FILE__, __LINE__, "FETCH_PSEUDO_REGISTER"), 0)
1216 #endif
1217
1218 typedef void (gdbarch_fetch_pseudo_register_ftype) (int regnum);
1219 extern void gdbarch_fetch_pseudo_register (struct gdbarch *gdbarch, int regnum);
1220 extern void set_gdbarch_fetch_pseudo_register (struct gdbarch *gdbarch, gdbarch_fetch_pseudo_register_ftype *fetch_pseudo_register);
1221 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FETCH_PSEUDO_REGISTER)
1222 #error "Non multi-arch definition of FETCH_PSEUDO_REGISTER"
1223 #endif
1224 #if GDB_MULTI_ARCH
1225 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FETCH_PSEUDO_REGISTER)
1226 #define FETCH_PSEUDO_REGISTER(regnum) (gdbarch_fetch_pseudo_register (current_gdbarch, regnum))
1227 #endif
1228 #endif
1229
1230 /* This function is called when the value of a pseudo-register needs to
1231 be set or stored. Typically it will be defined on a
1232 per-architecture basis. */
1233
1234 #if defined (STORE_PSEUDO_REGISTER)
1235 /* Legacy for systems yet to multi-arch STORE_PSEUDO_REGISTER */
1236 #if !defined (STORE_PSEUDO_REGISTER_P)
1237 #define STORE_PSEUDO_REGISTER_P() (1)
1238 #endif
1239 #endif
1240
1241 /* Default predicate for non- multi-arch targets. */
1242 #if (!GDB_MULTI_ARCH) && !defined (STORE_PSEUDO_REGISTER_P)
1243 #define STORE_PSEUDO_REGISTER_P() (0)
1244 #endif
1245
1246 extern int gdbarch_store_pseudo_register_p (struct gdbarch *gdbarch);
1247 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (STORE_PSEUDO_REGISTER_P)
1248 #error "Non multi-arch definition of STORE_PSEUDO_REGISTER"
1249 #endif
1250 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (STORE_PSEUDO_REGISTER_P)
1251 #define STORE_PSEUDO_REGISTER_P() (gdbarch_store_pseudo_register_p (current_gdbarch))
1252 #endif
1253
1254 /* Default (function) for non- multi-arch platforms. */
1255 #if (!GDB_MULTI_ARCH) && !defined (STORE_PSEUDO_REGISTER)
1256 #define STORE_PSEUDO_REGISTER(regnum) (internal_error (__FILE__, __LINE__, "STORE_PSEUDO_REGISTER"), 0)
1257 #endif
1258
1259 typedef void (gdbarch_store_pseudo_register_ftype) (int regnum);
1260 extern void gdbarch_store_pseudo_register (struct gdbarch *gdbarch, int regnum);
1261 extern void set_gdbarch_store_pseudo_register (struct gdbarch *gdbarch, gdbarch_store_pseudo_register_ftype *store_pseudo_register);
1262 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (STORE_PSEUDO_REGISTER)
1263 #error "Non multi-arch definition of STORE_PSEUDO_REGISTER"
1264 #endif
1265 #if GDB_MULTI_ARCH
1266 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (STORE_PSEUDO_REGISTER)
1267 #define STORE_PSEUDO_REGISTER(regnum) (gdbarch_store_pseudo_register (current_gdbarch, regnum))
1268 #endif
1269 #endif
1270
1271 /* Default (function) for non- multi-arch platforms. */
1272 #if (!GDB_MULTI_ARCH) && !defined (POINTER_TO_ADDRESS)
1273 #define POINTER_TO_ADDRESS(type, buf) (unsigned_pointer_to_address (type, buf))
1274 #endif
1275
1276 typedef CORE_ADDR (gdbarch_pointer_to_address_ftype) (struct type *type, void *buf);
1277 extern CORE_ADDR gdbarch_pointer_to_address (struct gdbarch *gdbarch, struct type *type, void *buf);
1278 extern void set_gdbarch_pointer_to_address (struct gdbarch *gdbarch, gdbarch_pointer_to_address_ftype *pointer_to_address);
1279 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (POINTER_TO_ADDRESS)
1280 #error "Non multi-arch definition of POINTER_TO_ADDRESS"
1281 #endif
1282 #if GDB_MULTI_ARCH
1283 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (POINTER_TO_ADDRESS)
1284 #define POINTER_TO_ADDRESS(type, buf) (gdbarch_pointer_to_address (current_gdbarch, type, buf))
1285 #endif
1286 #endif
1287
1288 /* Default (function) for non- multi-arch platforms. */
1289 #if (!GDB_MULTI_ARCH) && !defined (ADDRESS_TO_POINTER)
1290 #define ADDRESS_TO_POINTER(type, buf, addr) (unsigned_address_to_pointer (type, buf, addr))
1291 #endif
1292
1293 typedef void (gdbarch_address_to_pointer_ftype) (struct type *type, void *buf, CORE_ADDR addr);
1294 extern void gdbarch_address_to_pointer (struct gdbarch *gdbarch, struct type *type, void *buf, CORE_ADDR addr);
1295 extern void set_gdbarch_address_to_pointer (struct gdbarch *gdbarch, gdbarch_address_to_pointer_ftype *address_to_pointer);
1296 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (ADDRESS_TO_POINTER)
1297 #error "Non multi-arch definition of ADDRESS_TO_POINTER"
1298 #endif
1299 #if GDB_MULTI_ARCH
1300 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (ADDRESS_TO_POINTER)
1301 #define ADDRESS_TO_POINTER(type, buf, addr) (gdbarch_address_to_pointer (current_gdbarch, type, buf, addr))
1302 #endif
1303 #endif
1304
1305 #if defined (INTEGER_TO_ADDRESS)
1306 /* Legacy for systems yet to multi-arch INTEGER_TO_ADDRESS */
1307 #if !defined (INTEGER_TO_ADDRESS_P)
1308 #define INTEGER_TO_ADDRESS_P() (1)
1309 #endif
1310 #endif
1311
1312 /* Default predicate for non- multi-arch targets. */
1313 #if (!GDB_MULTI_ARCH) && !defined (INTEGER_TO_ADDRESS_P)
1314 #define INTEGER_TO_ADDRESS_P() (0)
1315 #endif
1316
1317 extern int gdbarch_integer_to_address_p (struct gdbarch *gdbarch);
1318 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (INTEGER_TO_ADDRESS_P)
1319 #error "Non multi-arch definition of INTEGER_TO_ADDRESS"
1320 #endif
1321 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (INTEGER_TO_ADDRESS_P)
1322 #define INTEGER_TO_ADDRESS_P() (gdbarch_integer_to_address_p (current_gdbarch))
1323 #endif
1324
1325 /* Default (function) for non- multi-arch platforms. */
1326 #if (!GDB_MULTI_ARCH) && !defined (INTEGER_TO_ADDRESS)
1327 #define INTEGER_TO_ADDRESS(type, buf) (internal_error (__FILE__, __LINE__, "INTEGER_TO_ADDRESS"), 0)
1328 #endif
1329
1330 typedef CORE_ADDR (gdbarch_integer_to_address_ftype) (struct type *type, void *buf);
1331 extern CORE_ADDR gdbarch_integer_to_address (struct gdbarch *gdbarch, struct type *type, void *buf);
1332 extern void set_gdbarch_integer_to_address (struct gdbarch *gdbarch, gdbarch_integer_to_address_ftype *integer_to_address);
1333 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (INTEGER_TO_ADDRESS)
1334 #error "Non multi-arch definition of INTEGER_TO_ADDRESS"
1335 #endif
1336 #if GDB_MULTI_ARCH
1337 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (INTEGER_TO_ADDRESS)
1338 #define INTEGER_TO_ADDRESS(type, buf) (gdbarch_integer_to_address (current_gdbarch, type, buf))
1339 #endif
1340 #endif
1341
1342 /* Default (function) for non- multi-arch platforms. */
1343 #if (!GDB_MULTI_ARCH) && !defined (RETURN_VALUE_ON_STACK)
1344 #define RETURN_VALUE_ON_STACK(type) (generic_return_value_on_stack_not (type))
1345 #endif
1346
1347 typedef int (gdbarch_return_value_on_stack_ftype) (struct type *type);
1348 extern int gdbarch_return_value_on_stack (struct gdbarch *gdbarch, struct type *type);
1349 extern void set_gdbarch_return_value_on_stack (struct gdbarch *gdbarch, gdbarch_return_value_on_stack_ftype *return_value_on_stack);
1350 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (RETURN_VALUE_ON_STACK)
1351 #error "Non multi-arch definition of RETURN_VALUE_ON_STACK"
1352 #endif
1353 #if GDB_MULTI_ARCH
1354 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (RETURN_VALUE_ON_STACK)
1355 #define RETURN_VALUE_ON_STACK(type) (gdbarch_return_value_on_stack (current_gdbarch, type))
1356 #endif
1357 #endif
1358
1359 typedef void (gdbarch_extract_return_value_ftype) (struct type *type, char *regbuf, char *valbuf);
1360 extern void gdbarch_extract_return_value (struct gdbarch *gdbarch, struct type *type, char *regbuf, char *valbuf);
1361 extern void set_gdbarch_extract_return_value (struct gdbarch *gdbarch, gdbarch_extract_return_value_ftype *extract_return_value);
1362 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (EXTRACT_RETURN_VALUE)
1363 #error "Non multi-arch definition of EXTRACT_RETURN_VALUE"
1364 #endif
1365 #if GDB_MULTI_ARCH
1366 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (EXTRACT_RETURN_VALUE)
1367 #define EXTRACT_RETURN_VALUE(type, regbuf, valbuf) (gdbarch_extract_return_value (current_gdbarch, type, regbuf, valbuf))
1368 #endif
1369 #endif
1370
1371 /* Default (function) for non- multi-arch platforms. */
1372 #if (!GDB_MULTI_ARCH) && !defined (PUSH_ARGUMENTS)
1373 #define PUSH_ARGUMENTS(nargs, args, sp, struct_return, struct_addr) (default_push_arguments (nargs, args, sp, struct_return, struct_addr))
1374 #endif
1375
1376 typedef CORE_ADDR (gdbarch_push_arguments_ftype) (int nargs, struct value **args, CORE_ADDR sp, int struct_return, CORE_ADDR struct_addr);
1377 extern CORE_ADDR gdbarch_push_arguments (struct gdbarch *gdbarch, int nargs, struct value **args, CORE_ADDR sp, int struct_return, CORE_ADDR struct_addr);
1378 extern void set_gdbarch_push_arguments (struct gdbarch *gdbarch, gdbarch_push_arguments_ftype *push_arguments);
1379 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PUSH_ARGUMENTS)
1380 #error "Non multi-arch definition of PUSH_ARGUMENTS"
1381 #endif
1382 #if GDB_MULTI_ARCH
1383 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PUSH_ARGUMENTS)
1384 #define PUSH_ARGUMENTS(nargs, args, sp, struct_return, struct_addr) (gdbarch_push_arguments (current_gdbarch, nargs, args, sp, struct_return, struct_addr))
1385 #endif
1386 #endif
1387
1388 typedef void (gdbarch_push_dummy_frame_ftype) (void);
1389 extern void gdbarch_push_dummy_frame (struct gdbarch *gdbarch);
1390 extern void set_gdbarch_push_dummy_frame (struct gdbarch *gdbarch, gdbarch_push_dummy_frame_ftype *push_dummy_frame);
1391 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PUSH_DUMMY_FRAME)
1392 #error "Non multi-arch definition of PUSH_DUMMY_FRAME"
1393 #endif
1394 #if GDB_MULTI_ARCH
1395 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PUSH_DUMMY_FRAME)
1396 #define PUSH_DUMMY_FRAME (gdbarch_push_dummy_frame (current_gdbarch))
1397 #endif
1398 #endif
1399
1400 #if defined (PUSH_RETURN_ADDRESS)
1401 /* Legacy for systems yet to multi-arch PUSH_RETURN_ADDRESS */
1402 #if !defined (PUSH_RETURN_ADDRESS_P)
1403 #define PUSH_RETURN_ADDRESS_P() (1)
1404 #endif
1405 #endif
1406
1407 /* Default predicate for non- multi-arch targets. */
1408 #if (!GDB_MULTI_ARCH) && !defined (PUSH_RETURN_ADDRESS_P)
1409 #define PUSH_RETURN_ADDRESS_P() (0)
1410 #endif
1411
1412 extern int gdbarch_push_return_address_p (struct gdbarch *gdbarch);
1413 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PUSH_RETURN_ADDRESS_P)
1414 #error "Non multi-arch definition of PUSH_RETURN_ADDRESS"
1415 #endif
1416 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PUSH_RETURN_ADDRESS_P)
1417 #define PUSH_RETURN_ADDRESS_P() (gdbarch_push_return_address_p (current_gdbarch))
1418 #endif
1419
1420 /* Default (function) for non- multi-arch platforms. */
1421 #if (!GDB_MULTI_ARCH) && !defined (PUSH_RETURN_ADDRESS)
1422 #define PUSH_RETURN_ADDRESS(pc, sp) (internal_error (__FILE__, __LINE__, "PUSH_RETURN_ADDRESS"), 0)
1423 #endif
1424
1425 typedef CORE_ADDR (gdbarch_push_return_address_ftype) (CORE_ADDR pc, CORE_ADDR sp);
1426 extern CORE_ADDR gdbarch_push_return_address (struct gdbarch *gdbarch, CORE_ADDR pc, CORE_ADDR sp);
1427 extern void set_gdbarch_push_return_address (struct gdbarch *gdbarch, gdbarch_push_return_address_ftype *push_return_address);
1428 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PUSH_RETURN_ADDRESS)
1429 #error "Non multi-arch definition of PUSH_RETURN_ADDRESS"
1430 #endif
1431 #if GDB_MULTI_ARCH
1432 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PUSH_RETURN_ADDRESS)
1433 #define PUSH_RETURN_ADDRESS(pc, sp) (gdbarch_push_return_address (current_gdbarch, pc, sp))
1434 #endif
1435 #endif
1436
1437 typedef void (gdbarch_pop_frame_ftype) (void);
1438 extern void gdbarch_pop_frame (struct gdbarch *gdbarch);
1439 extern void set_gdbarch_pop_frame (struct gdbarch *gdbarch, gdbarch_pop_frame_ftype *pop_frame);
1440 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (POP_FRAME)
1441 #error "Non multi-arch definition of POP_FRAME"
1442 #endif
1443 #if GDB_MULTI_ARCH
1444 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (POP_FRAME)
1445 #define POP_FRAME (gdbarch_pop_frame (current_gdbarch))
1446 #endif
1447 #endif
1448
1449 typedef void (gdbarch_store_struct_return_ftype) (CORE_ADDR addr, CORE_ADDR sp);
1450 extern void gdbarch_store_struct_return (struct gdbarch *gdbarch, CORE_ADDR addr, CORE_ADDR sp);
1451 extern void set_gdbarch_store_struct_return (struct gdbarch *gdbarch, gdbarch_store_struct_return_ftype *store_struct_return);
1452 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (STORE_STRUCT_RETURN)
1453 #error "Non multi-arch definition of STORE_STRUCT_RETURN"
1454 #endif
1455 #if GDB_MULTI_ARCH
1456 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (STORE_STRUCT_RETURN)
1457 #define STORE_STRUCT_RETURN(addr, sp) (gdbarch_store_struct_return (current_gdbarch, addr, sp))
1458 #endif
1459 #endif
1460
1461 typedef void (gdbarch_store_return_value_ftype) (struct type *type, char *valbuf);
1462 extern void gdbarch_store_return_value (struct gdbarch *gdbarch, struct type *type, char *valbuf);
1463 extern void set_gdbarch_store_return_value (struct gdbarch *gdbarch, gdbarch_store_return_value_ftype *store_return_value);
1464 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (STORE_RETURN_VALUE)
1465 #error "Non multi-arch definition of STORE_RETURN_VALUE"
1466 #endif
1467 #if GDB_MULTI_ARCH
1468 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (STORE_RETURN_VALUE)
1469 #define STORE_RETURN_VALUE(type, valbuf) (gdbarch_store_return_value (current_gdbarch, type, valbuf))
1470 #endif
1471 #endif
1472
1473 #if defined (EXTRACT_STRUCT_VALUE_ADDRESS)
1474 /* Legacy for systems yet to multi-arch EXTRACT_STRUCT_VALUE_ADDRESS */
1475 #if !defined (EXTRACT_STRUCT_VALUE_ADDRESS_P)
1476 #define EXTRACT_STRUCT_VALUE_ADDRESS_P() (1)
1477 #endif
1478 #endif
1479
1480 /* Default predicate for non- multi-arch targets. */
1481 #if (!GDB_MULTI_ARCH) && !defined (EXTRACT_STRUCT_VALUE_ADDRESS_P)
1482 #define EXTRACT_STRUCT_VALUE_ADDRESS_P() (0)
1483 #endif
1484
1485 extern int gdbarch_extract_struct_value_address_p (struct gdbarch *gdbarch);
1486 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (EXTRACT_STRUCT_VALUE_ADDRESS_P)
1487 #error "Non multi-arch definition of EXTRACT_STRUCT_VALUE_ADDRESS"
1488 #endif
1489 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (EXTRACT_STRUCT_VALUE_ADDRESS_P)
1490 #define EXTRACT_STRUCT_VALUE_ADDRESS_P() (gdbarch_extract_struct_value_address_p (current_gdbarch))
1491 #endif
1492
1493 /* Default (function) for non- multi-arch platforms. */
1494 #if (!GDB_MULTI_ARCH) && !defined (EXTRACT_STRUCT_VALUE_ADDRESS)
1495 #define EXTRACT_STRUCT_VALUE_ADDRESS(regbuf) (internal_error (__FILE__, __LINE__, "EXTRACT_STRUCT_VALUE_ADDRESS"), 0)
1496 #endif
1497
1498 typedef CORE_ADDR (gdbarch_extract_struct_value_address_ftype) (char *regbuf);
1499 extern CORE_ADDR gdbarch_extract_struct_value_address (struct gdbarch *gdbarch, char *regbuf);
1500 extern void set_gdbarch_extract_struct_value_address (struct gdbarch *gdbarch, gdbarch_extract_struct_value_address_ftype *extract_struct_value_address);
1501 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (EXTRACT_STRUCT_VALUE_ADDRESS)
1502 #error "Non multi-arch definition of EXTRACT_STRUCT_VALUE_ADDRESS"
1503 #endif
1504 #if GDB_MULTI_ARCH
1505 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (EXTRACT_STRUCT_VALUE_ADDRESS)
1506 #define EXTRACT_STRUCT_VALUE_ADDRESS(regbuf) (gdbarch_extract_struct_value_address (current_gdbarch, regbuf))
1507 #endif
1508 #endif
1509
1510 /* Default (function) for non- multi-arch platforms. */
1511 #if (!GDB_MULTI_ARCH) && !defined (USE_STRUCT_CONVENTION)
1512 #define USE_STRUCT_CONVENTION(gcc_p, value_type) (generic_use_struct_convention (gcc_p, value_type))
1513 #endif
1514
1515 typedef int (gdbarch_use_struct_convention_ftype) (int gcc_p, struct type *value_type);
1516 extern int gdbarch_use_struct_convention (struct gdbarch *gdbarch, int gcc_p, struct type *value_type);
1517 extern void set_gdbarch_use_struct_convention (struct gdbarch *gdbarch, gdbarch_use_struct_convention_ftype *use_struct_convention);
1518 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (USE_STRUCT_CONVENTION)
1519 #error "Non multi-arch definition of USE_STRUCT_CONVENTION"
1520 #endif
1521 #if GDB_MULTI_ARCH
1522 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (USE_STRUCT_CONVENTION)
1523 #define USE_STRUCT_CONVENTION(gcc_p, value_type) (gdbarch_use_struct_convention (current_gdbarch, gcc_p, value_type))
1524 #endif
1525 #endif
1526
1527 typedef void (gdbarch_frame_init_saved_regs_ftype) (struct frame_info *frame);
1528 extern void gdbarch_frame_init_saved_regs (struct gdbarch *gdbarch, struct frame_info *frame);
1529 extern void set_gdbarch_frame_init_saved_regs (struct gdbarch *gdbarch, gdbarch_frame_init_saved_regs_ftype *frame_init_saved_regs);
1530 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FRAME_INIT_SAVED_REGS)
1531 #error "Non multi-arch definition of FRAME_INIT_SAVED_REGS"
1532 #endif
1533 #if GDB_MULTI_ARCH
1534 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FRAME_INIT_SAVED_REGS)
1535 #define FRAME_INIT_SAVED_REGS(frame) (gdbarch_frame_init_saved_regs (current_gdbarch, frame))
1536 #endif
1537 #endif
1538
1539 #if defined (INIT_EXTRA_FRAME_INFO)
1540 /* Legacy for systems yet to multi-arch INIT_EXTRA_FRAME_INFO */
1541 #if !defined (INIT_EXTRA_FRAME_INFO_P)
1542 #define INIT_EXTRA_FRAME_INFO_P() (1)
1543 #endif
1544 #endif
1545
1546 /* Default predicate for non- multi-arch targets. */
1547 #if (!GDB_MULTI_ARCH) && !defined (INIT_EXTRA_FRAME_INFO_P)
1548 #define INIT_EXTRA_FRAME_INFO_P() (0)
1549 #endif
1550
1551 extern int gdbarch_init_extra_frame_info_p (struct gdbarch *gdbarch);
1552 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (INIT_EXTRA_FRAME_INFO_P)
1553 #error "Non multi-arch definition of INIT_EXTRA_FRAME_INFO"
1554 #endif
1555 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (INIT_EXTRA_FRAME_INFO_P)
1556 #define INIT_EXTRA_FRAME_INFO_P() (gdbarch_init_extra_frame_info_p (current_gdbarch))
1557 #endif
1558
1559 /* Default (function) for non- multi-arch platforms. */
1560 #if (!GDB_MULTI_ARCH) && !defined (INIT_EXTRA_FRAME_INFO)
1561 #define INIT_EXTRA_FRAME_INFO(fromleaf, frame) (internal_error (__FILE__, __LINE__, "INIT_EXTRA_FRAME_INFO"), 0)
1562 #endif
1563
1564 typedef void (gdbarch_init_extra_frame_info_ftype) (int fromleaf, struct frame_info *frame);
1565 extern void gdbarch_init_extra_frame_info (struct gdbarch *gdbarch, int fromleaf, struct frame_info *frame);
1566 extern void set_gdbarch_init_extra_frame_info (struct gdbarch *gdbarch, gdbarch_init_extra_frame_info_ftype *init_extra_frame_info);
1567 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (INIT_EXTRA_FRAME_INFO)
1568 #error "Non multi-arch definition of INIT_EXTRA_FRAME_INFO"
1569 #endif
1570 #if GDB_MULTI_ARCH
1571 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (INIT_EXTRA_FRAME_INFO)
1572 #define INIT_EXTRA_FRAME_INFO(fromleaf, frame) (gdbarch_init_extra_frame_info (current_gdbarch, fromleaf, frame))
1573 #endif
1574 #endif
1575
1576 typedef CORE_ADDR (gdbarch_skip_prologue_ftype) (CORE_ADDR ip);
1577 extern CORE_ADDR gdbarch_skip_prologue (struct gdbarch *gdbarch, CORE_ADDR ip);
1578 extern void set_gdbarch_skip_prologue (struct gdbarch *gdbarch, gdbarch_skip_prologue_ftype *skip_prologue);
1579 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SKIP_PROLOGUE)
1580 #error "Non multi-arch definition of SKIP_PROLOGUE"
1581 #endif
1582 #if GDB_MULTI_ARCH
1583 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SKIP_PROLOGUE)
1584 #define SKIP_PROLOGUE(ip) (gdbarch_skip_prologue (current_gdbarch, ip))
1585 #endif
1586 #endif
1587
1588 /* Default (function) for non- multi-arch platforms. */
1589 #if (!GDB_MULTI_ARCH) && !defined (PROLOGUE_FRAMELESS_P)
1590 #define PROLOGUE_FRAMELESS_P(ip) (generic_prologue_frameless_p (ip))
1591 #endif
1592
1593 typedef int (gdbarch_prologue_frameless_p_ftype) (CORE_ADDR ip);
1594 extern int gdbarch_prologue_frameless_p (struct gdbarch *gdbarch, CORE_ADDR ip);
1595 extern void set_gdbarch_prologue_frameless_p (struct gdbarch *gdbarch, gdbarch_prologue_frameless_p_ftype *prologue_frameless_p);
1596 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PROLOGUE_FRAMELESS_P)
1597 #error "Non multi-arch definition of PROLOGUE_FRAMELESS_P"
1598 #endif
1599 #if GDB_MULTI_ARCH
1600 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PROLOGUE_FRAMELESS_P)
1601 #define PROLOGUE_FRAMELESS_P(ip) (gdbarch_prologue_frameless_p (current_gdbarch, ip))
1602 #endif
1603 #endif
1604
1605 typedef int (gdbarch_inner_than_ftype) (CORE_ADDR lhs, CORE_ADDR rhs);
1606 extern int gdbarch_inner_than (struct gdbarch *gdbarch, CORE_ADDR lhs, CORE_ADDR rhs);
1607 extern void set_gdbarch_inner_than (struct gdbarch *gdbarch, gdbarch_inner_than_ftype *inner_than);
1608 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (INNER_THAN)
1609 #error "Non multi-arch definition of INNER_THAN"
1610 #endif
1611 #if GDB_MULTI_ARCH
1612 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (INNER_THAN)
1613 #define INNER_THAN(lhs, rhs) (gdbarch_inner_than (current_gdbarch, lhs, rhs))
1614 #endif
1615 #endif
1616
1617 /* Default (function) for non- multi-arch platforms. */
1618 #if (!GDB_MULTI_ARCH) && !defined (BREAKPOINT_FROM_PC)
1619 #define BREAKPOINT_FROM_PC(pcptr, lenptr) (legacy_breakpoint_from_pc (pcptr, lenptr))
1620 #endif
1621
1622 typedef unsigned char * (gdbarch_breakpoint_from_pc_ftype) (CORE_ADDR *pcptr, int *lenptr);
1623 extern unsigned char * gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch, CORE_ADDR *pcptr, int *lenptr);
1624 extern void set_gdbarch_breakpoint_from_pc (struct gdbarch *gdbarch, gdbarch_breakpoint_from_pc_ftype *breakpoint_from_pc);
1625 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (BREAKPOINT_FROM_PC)
1626 #error "Non multi-arch definition of BREAKPOINT_FROM_PC"
1627 #endif
1628 #if GDB_MULTI_ARCH
1629 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (BREAKPOINT_FROM_PC)
1630 #define BREAKPOINT_FROM_PC(pcptr, lenptr) (gdbarch_breakpoint_from_pc (current_gdbarch, pcptr, lenptr))
1631 #endif
1632 #endif
1633
1634 /* Default (function) for non- multi-arch platforms. */
1635 #if (!GDB_MULTI_ARCH) && !defined (MEMORY_INSERT_BREAKPOINT)
1636 #define MEMORY_INSERT_BREAKPOINT(addr, contents_cache) (default_memory_insert_breakpoint (addr, contents_cache))
1637 #endif
1638
1639 typedef int (gdbarch_memory_insert_breakpoint_ftype) (CORE_ADDR addr, char *contents_cache);
1640 extern int gdbarch_memory_insert_breakpoint (struct gdbarch *gdbarch, CORE_ADDR addr, char *contents_cache);
1641 extern void set_gdbarch_memory_insert_breakpoint (struct gdbarch *gdbarch, gdbarch_memory_insert_breakpoint_ftype *memory_insert_breakpoint);
1642 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (MEMORY_INSERT_BREAKPOINT)
1643 #error "Non multi-arch definition of MEMORY_INSERT_BREAKPOINT"
1644 #endif
1645 #if GDB_MULTI_ARCH
1646 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (MEMORY_INSERT_BREAKPOINT)
1647 #define MEMORY_INSERT_BREAKPOINT(addr, contents_cache) (gdbarch_memory_insert_breakpoint (current_gdbarch, addr, contents_cache))
1648 #endif
1649 #endif
1650
1651 /* Default (function) for non- multi-arch platforms. */
1652 #if (!GDB_MULTI_ARCH) && !defined (MEMORY_REMOVE_BREAKPOINT)
1653 #define MEMORY_REMOVE_BREAKPOINT(addr, contents_cache) (default_memory_remove_breakpoint (addr, contents_cache))
1654 #endif
1655
1656 typedef int (gdbarch_memory_remove_breakpoint_ftype) (CORE_ADDR addr, char *contents_cache);
1657 extern int gdbarch_memory_remove_breakpoint (struct gdbarch *gdbarch, CORE_ADDR addr, char *contents_cache);
1658 extern void set_gdbarch_memory_remove_breakpoint (struct gdbarch *gdbarch, gdbarch_memory_remove_breakpoint_ftype *memory_remove_breakpoint);
1659 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (MEMORY_REMOVE_BREAKPOINT)
1660 #error "Non multi-arch definition of MEMORY_REMOVE_BREAKPOINT"
1661 #endif
1662 #if GDB_MULTI_ARCH
1663 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (MEMORY_REMOVE_BREAKPOINT)
1664 #define MEMORY_REMOVE_BREAKPOINT(addr, contents_cache) (gdbarch_memory_remove_breakpoint (current_gdbarch, addr, contents_cache))
1665 #endif
1666 #endif
1667
1668 extern CORE_ADDR gdbarch_decr_pc_after_break (struct gdbarch *gdbarch);
1669 extern void set_gdbarch_decr_pc_after_break (struct gdbarch *gdbarch, CORE_ADDR decr_pc_after_break);
1670 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (DECR_PC_AFTER_BREAK)
1671 #error "Non multi-arch definition of DECR_PC_AFTER_BREAK"
1672 #endif
1673 #if GDB_MULTI_ARCH
1674 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (DECR_PC_AFTER_BREAK)
1675 #define DECR_PC_AFTER_BREAK (gdbarch_decr_pc_after_break (current_gdbarch))
1676 #endif
1677 #endif
1678
1679 /* Default (function) for non- multi-arch platforms. */
1680 #if (!GDB_MULTI_ARCH) && !defined (PREPARE_TO_PROCEED)
1681 #define PREPARE_TO_PROCEED(select_it) (default_prepare_to_proceed (select_it))
1682 #endif
1683
1684 typedef int (gdbarch_prepare_to_proceed_ftype) (int select_it);
1685 extern int gdbarch_prepare_to_proceed (struct gdbarch *gdbarch, int select_it);
1686 extern void set_gdbarch_prepare_to_proceed (struct gdbarch *gdbarch, gdbarch_prepare_to_proceed_ftype *prepare_to_proceed);
1687 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PREPARE_TO_PROCEED)
1688 #error "Non multi-arch definition of PREPARE_TO_PROCEED"
1689 #endif
1690 #if GDB_MULTI_ARCH
1691 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PREPARE_TO_PROCEED)
1692 #define PREPARE_TO_PROCEED(select_it) (gdbarch_prepare_to_proceed (current_gdbarch, select_it))
1693 #endif
1694 #endif
1695
1696 extern CORE_ADDR gdbarch_function_start_offset (struct gdbarch *gdbarch);
1697 extern void set_gdbarch_function_start_offset (struct gdbarch *gdbarch, CORE_ADDR function_start_offset);
1698 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FUNCTION_START_OFFSET)
1699 #error "Non multi-arch definition of FUNCTION_START_OFFSET"
1700 #endif
1701 #if GDB_MULTI_ARCH
1702 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FUNCTION_START_OFFSET)
1703 #define FUNCTION_START_OFFSET (gdbarch_function_start_offset (current_gdbarch))
1704 #endif
1705 #endif
1706
1707 /* Default (function) for non- multi-arch platforms. */
1708 #if (!GDB_MULTI_ARCH) && !defined (REMOTE_TRANSLATE_XFER_ADDRESS)
1709 #define REMOTE_TRANSLATE_XFER_ADDRESS(gdb_addr, gdb_len, rem_addr, rem_len) (generic_remote_translate_xfer_address (gdb_addr, gdb_len, rem_addr, rem_len))
1710 #endif
1711
1712 typedef void (gdbarch_remote_translate_xfer_address_ftype) (CORE_ADDR gdb_addr, int gdb_len, CORE_ADDR *rem_addr, int *rem_len);
1713 extern void gdbarch_remote_translate_xfer_address (struct gdbarch *gdbarch, CORE_ADDR gdb_addr, int gdb_len, CORE_ADDR *rem_addr, int *rem_len);
1714 extern void set_gdbarch_remote_translate_xfer_address (struct gdbarch *gdbarch, gdbarch_remote_translate_xfer_address_ftype *remote_translate_xfer_address);
1715 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REMOTE_TRANSLATE_XFER_ADDRESS)
1716 #error "Non multi-arch definition of REMOTE_TRANSLATE_XFER_ADDRESS"
1717 #endif
1718 #if GDB_MULTI_ARCH
1719 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REMOTE_TRANSLATE_XFER_ADDRESS)
1720 #define REMOTE_TRANSLATE_XFER_ADDRESS(gdb_addr, gdb_len, rem_addr, rem_len) (gdbarch_remote_translate_xfer_address (current_gdbarch, gdb_addr, gdb_len, rem_addr, rem_len))
1721 #endif
1722 #endif
1723
1724 extern CORE_ADDR gdbarch_frame_args_skip (struct gdbarch *gdbarch);
1725 extern void set_gdbarch_frame_args_skip (struct gdbarch *gdbarch, CORE_ADDR frame_args_skip);
1726 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FRAME_ARGS_SKIP)
1727 #error "Non multi-arch definition of FRAME_ARGS_SKIP"
1728 #endif
1729 #if GDB_MULTI_ARCH
1730 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FRAME_ARGS_SKIP)
1731 #define FRAME_ARGS_SKIP (gdbarch_frame_args_skip (current_gdbarch))
1732 #endif
1733 #endif
1734
1735 /* Default (function) for non- multi-arch platforms. */
1736 #if (!GDB_MULTI_ARCH) && !defined (FRAMELESS_FUNCTION_INVOCATION)
1737 #define FRAMELESS_FUNCTION_INVOCATION(fi) (generic_frameless_function_invocation_not (fi))
1738 #endif
1739
1740 typedef int (gdbarch_frameless_function_invocation_ftype) (struct frame_info *fi);
1741 extern int gdbarch_frameless_function_invocation (struct gdbarch *gdbarch, struct frame_info *fi);
1742 extern void set_gdbarch_frameless_function_invocation (struct gdbarch *gdbarch, gdbarch_frameless_function_invocation_ftype *frameless_function_invocation);
1743 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FRAMELESS_FUNCTION_INVOCATION)
1744 #error "Non multi-arch definition of FRAMELESS_FUNCTION_INVOCATION"
1745 #endif
1746 #if GDB_MULTI_ARCH
1747 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FRAMELESS_FUNCTION_INVOCATION)
1748 #define FRAMELESS_FUNCTION_INVOCATION(fi) (gdbarch_frameless_function_invocation (current_gdbarch, fi))
1749 #endif
1750 #endif
1751
1752 typedef CORE_ADDR (gdbarch_frame_chain_ftype) (struct frame_info *frame);
1753 extern CORE_ADDR gdbarch_frame_chain (struct gdbarch *gdbarch, struct frame_info *frame);
1754 extern void set_gdbarch_frame_chain (struct gdbarch *gdbarch, gdbarch_frame_chain_ftype *frame_chain);
1755 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FRAME_CHAIN)
1756 #error "Non multi-arch definition of FRAME_CHAIN"
1757 #endif
1758 #if GDB_MULTI_ARCH
1759 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FRAME_CHAIN)
1760 #define FRAME_CHAIN(frame) (gdbarch_frame_chain (current_gdbarch, frame))
1761 #endif
1762 #endif
1763
1764 typedef int (gdbarch_frame_chain_valid_ftype) (CORE_ADDR chain, struct frame_info *thisframe);
1765 extern int gdbarch_frame_chain_valid (struct gdbarch *gdbarch, CORE_ADDR chain, struct frame_info *thisframe);
1766 extern void set_gdbarch_frame_chain_valid (struct gdbarch *gdbarch, gdbarch_frame_chain_valid_ftype *frame_chain_valid);
1767 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FRAME_CHAIN_VALID)
1768 #error "Non multi-arch definition of FRAME_CHAIN_VALID"
1769 #endif
1770 #if GDB_MULTI_ARCH
1771 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FRAME_CHAIN_VALID)
1772 #define FRAME_CHAIN_VALID(chain, thisframe) (gdbarch_frame_chain_valid (current_gdbarch, chain, thisframe))
1773 #endif
1774 #endif
1775
1776 typedef CORE_ADDR (gdbarch_frame_saved_pc_ftype) (struct frame_info *fi);
1777 extern CORE_ADDR gdbarch_frame_saved_pc (struct gdbarch *gdbarch, struct frame_info *fi);
1778 extern void set_gdbarch_frame_saved_pc (struct gdbarch *gdbarch, gdbarch_frame_saved_pc_ftype *frame_saved_pc);
1779 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FRAME_SAVED_PC)
1780 #error "Non multi-arch definition of FRAME_SAVED_PC"
1781 #endif
1782 #if GDB_MULTI_ARCH
1783 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FRAME_SAVED_PC)
1784 #define FRAME_SAVED_PC(fi) (gdbarch_frame_saved_pc (current_gdbarch, fi))
1785 #endif
1786 #endif
1787
1788 typedef CORE_ADDR (gdbarch_frame_args_address_ftype) (struct frame_info *fi);
1789 extern CORE_ADDR gdbarch_frame_args_address (struct gdbarch *gdbarch, struct frame_info *fi);
1790 extern void set_gdbarch_frame_args_address (struct gdbarch *gdbarch, gdbarch_frame_args_address_ftype *frame_args_address);
1791 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FRAME_ARGS_ADDRESS)
1792 #error "Non multi-arch definition of FRAME_ARGS_ADDRESS"
1793 #endif
1794 #if GDB_MULTI_ARCH
1795 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FRAME_ARGS_ADDRESS)
1796 #define FRAME_ARGS_ADDRESS(fi) (gdbarch_frame_args_address (current_gdbarch, fi))
1797 #endif
1798 #endif
1799
1800 typedef CORE_ADDR (gdbarch_frame_locals_address_ftype) (struct frame_info *fi);
1801 extern CORE_ADDR gdbarch_frame_locals_address (struct gdbarch *gdbarch, struct frame_info *fi);
1802 extern void set_gdbarch_frame_locals_address (struct gdbarch *gdbarch, gdbarch_frame_locals_address_ftype *frame_locals_address);
1803 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FRAME_LOCALS_ADDRESS)
1804 #error "Non multi-arch definition of FRAME_LOCALS_ADDRESS"
1805 #endif
1806 #if GDB_MULTI_ARCH
1807 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FRAME_LOCALS_ADDRESS)
1808 #define FRAME_LOCALS_ADDRESS(fi) (gdbarch_frame_locals_address (current_gdbarch, fi))
1809 #endif
1810 #endif
1811
1812 typedef CORE_ADDR (gdbarch_saved_pc_after_call_ftype) (struct frame_info *frame);
1813 extern CORE_ADDR gdbarch_saved_pc_after_call (struct gdbarch *gdbarch, struct frame_info *frame);
1814 extern void set_gdbarch_saved_pc_after_call (struct gdbarch *gdbarch, gdbarch_saved_pc_after_call_ftype *saved_pc_after_call);
1815 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SAVED_PC_AFTER_CALL)
1816 #error "Non multi-arch definition of SAVED_PC_AFTER_CALL"
1817 #endif
1818 #if GDB_MULTI_ARCH
1819 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SAVED_PC_AFTER_CALL)
1820 #define SAVED_PC_AFTER_CALL(frame) (gdbarch_saved_pc_after_call (current_gdbarch, frame))
1821 #endif
1822 #endif
1823
1824 typedef int (gdbarch_frame_num_args_ftype) (struct frame_info *frame);
1825 extern int gdbarch_frame_num_args (struct gdbarch *gdbarch, struct frame_info *frame);
1826 extern void set_gdbarch_frame_num_args (struct gdbarch *gdbarch, gdbarch_frame_num_args_ftype *frame_num_args);
1827 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (FRAME_NUM_ARGS)
1828 #error "Non multi-arch definition of FRAME_NUM_ARGS"
1829 #endif
1830 #if GDB_MULTI_ARCH
1831 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (FRAME_NUM_ARGS)
1832 #define FRAME_NUM_ARGS(frame) (gdbarch_frame_num_args (current_gdbarch, frame))
1833 #endif
1834 #endif
1835
1836 #if defined (STACK_ALIGN)
1837 /* Legacy for systems yet to multi-arch STACK_ALIGN */
1838 #if !defined (STACK_ALIGN_P)
1839 #define STACK_ALIGN_P() (1)
1840 #endif
1841 #endif
1842
1843 /* Default predicate for non- multi-arch targets. */
1844 #if (!GDB_MULTI_ARCH) && !defined (STACK_ALIGN_P)
1845 #define STACK_ALIGN_P() (0)
1846 #endif
1847
1848 extern int gdbarch_stack_align_p (struct gdbarch *gdbarch);
1849 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (STACK_ALIGN_P)
1850 #error "Non multi-arch definition of STACK_ALIGN"
1851 #endif
1852 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (STACK_ALIGN_P)
1853 #define STACK_ALIGN_P() (gdbarch_stack_align_p (current_gdbarch))
1854 #endif
1855
1856 /* Default (function) for non- multi-arch platforms. */
1857 #if (!GDB_MULTI_ARCH) && !defined (STACK_ALIGN)
1858 #define STACK_ALIGN(sp) (internal_error (__FILE__, __LINE__, "STACK_ALIGN"), 0)
1859 #endif
1860
1861 typedef CORE_ADDR (gdbarch_stack_align_ftype) (CORE_ADDR sp);
1862 extern CORE_ADDR gdbarch_stack_align (struct gdbarch *gdbarch, CORE_ADDR sp);
1863 extern void set_gdbarch_stack_align (struct gdbarch *gdbarch, gdbarch_stack_align_ftype *stack_align);
1864 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (STACK_ALIGN)
1865 #error "Non multi-arch definition of STACK_ALIGN"
1866 #endif
1867 #if GDB_MULTI_ARCH
1868 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (STACK_ALIGN)
1869 #define STACK_ALIGN(sp) (gdbarch_stack_align (current_gdbarch, sp))
1870 #endif
1871 #endif
1872
1873 /* Default (value) for non- multi-arch platforms. */
1874 #if (!GDB_MULTI_ARCH) && !defined (EXTRA_STACK_ALIGNMENT_NEEDED)
1875 #define EXTRA_STACK_ALIGNMENT_NEEDED (1)
1876 #endif
1877
1878 extern int gdbarch_extra_stack_alignment_needed (struct gdbarch *gdbarch);
1879 extern void set_gdbarch_extra_stack_alignment_needed (struct gdbarch *gdbarch, int extra_stack_alignment_needed);
1880 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (EXTRA_STACK_ALIGNMENT_NEEDED)
1881 #error "Non multi-arch definition of EXTRA_STACK_ALIGNMENT_NEEDED"
1882 #endif
1883 #if GDB_MULTI_ARCH
1884 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (EXTRA_STACK_ALIGNMENT_NEEDED)
1885 #define EXTRA_STACK_ALIGNMENT_NEEDED (gdbarch_extra_stack_alignment_needed (current_gdbarch))
1886 #endif
1887 #endif
1888
1889 #if defined (REG_STRUCT_HAS_ADDR)
1890 /* Legacy for systems yet to multi-arch REG_STRUCT_HAS_ADDR */
1891 #if !defined (REG_STRUCT_HAS_ADDR_P)
1892 #define REG_STRUCT_HAS_ADDR_P() (1)
1893 #endif
1894 #endif
1895
1896 /* Default predicate for non- multi-arch targets. */
1897 #if (!GDB_MULTI_ARCH) && !defined (REG_STRUCT_HAS_ADDR_P)
1898 #define REG_STRUCT_HAS_ADDR_P() (0)
1899 #endif
1900
1901 extern int gdbarch_reg_struct_has_addr_p (struct gdbarch *gdbarch);
1902 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REG_STRUCT_HAS_ADDR_P)
1903 #error "Non multi-arch definition of REG_STRUCT_HAS_ADDR"
1904 #endif
1905 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REG_STRUCT_HAS_ADDR_P)
1906 #define REG_STRUCT_HAS_ADDR_P() (gdbarch_reg_struct_has_addr_p (current_gdbarch))
1907 #endif
1908
1909 /* Default (function) for non- multi-arch platforms. */
1910 #if (!GDB_MULTI_ARCH) && !defined (REG_STRUCT_HAS_ADDR)
1911 #define REG_STRUCT_HAS_ADDR(gcc_p, type) (internal_error (__FILE__, __LINE__, "REG_STRUCT_HAS_ADDR"), 0)
1912 #endif
1913
1914 typedef int (gdbarch_reg_struct_has_addr_ftype) (int gcc_p, struct type *type);
1915 extern int gdbarch_reg_struct_has_addr (struct gdbarch *gdbarch, int gcc_p, struct type *type);
1916 extern void set_gdbarch_reg_struct_has_addr (struct gdbarch *gdbarch, gdbarch_reg_struct_has_addr_ftype *reg_struct_has_addr);
1917 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (REG_STRUCT_HAS_ADDR)
1918 #error "Non multi-arch definition of REG_STRUCT_HAS_ADDR"
1919 #endif
1920 #if GDB_MULTI_ARCH
1921 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (REG_STRUCT_HAS_ADDR)
1922 #define REG_STRUCT_HAS_ADDR(gcc_p, type) (gdbarch_reg_struct_has_addr (current_gdbarch, gcc_p, type))
1923 #endif
1924 #endif
1925
1926 #if defined (SAVE_DUMMY_FRAME_TOS)
1927 /* Legacy for systems yet to multi-arch SAVE_DUMMY_FRAME_TOS */
1928 #if !defined (SAVE_DUMMY_FRAME_TOS_P)
1929 #define SAVE_DUMMY_FRAME_TOS_P() (1)
1930 #endif
1931 #endif
1932
1933 /* Default predicate for non- multi-arch targets. */
1934 #if (!GDB_MULTI_ARCH) && !defined (SAVE_DUMMY_FRAME_TOS_P)
1935 #define SAVE_DUMMY_FRAME_TOS_P() (0)
1936 #endif
1937
1938 extern int gdbarch_save_dummy_frame_tos_p (struct gdbarch *gdbarch);
1939 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SAVE_DUMMY_FRAME_TOS_P)
1940 #error "Non multi-arch definition of SAVE_DUMMY_FRAME_TOS"
1941 #endif
1942 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SAVE_DUMMY_FRAME_TOS_P)
1943 #define SAVE_DUMMY_FRAME_TOS_P() (gdbarch_save_dummy_frame_tos_p (current_gdbarch))
1944 #endif
1945
1946 /* Default (function) for non- multi-arch platforms. */
1947 #if (!GDB_MULTI_ARCH) && !defined (SAVE_DUMMY_FRAME_TOS)
1948 #define SAVE_DUMMY_FRAME_TOS(sp) (internal_error (__FILE__, __LINE__, "SAVE_DUMMY_FRAME_TOS"), 0)
1949 #endif
1950
1951 typedef void (gdbarch_save_dummy_frame_tos_ftype) (CORE_ADDR sp);
1952 extern void gdbarch_save_dummy_frame_tos (struct gdbarch *gdbarch, CORE_ADDR sp);
1953 extern void set_gdbarch_save_dummy_frame_tos (struct gdbarch *gdbarch, gdbarch_save_dummy_frame_tos_ftype *save_dummy_frame_tos);
1954 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SAVE_DUMMY_FRAME_TOS)
1955 #error "Non multi-arch definition of SAVE_DUMMY_FRAME_TOS"
1956 #endif
1957 #if GDB_MULTI_ARCH
1958 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SAVE_DUMMY_FRAME_TOS)
1959 #define SAVE_DUMMY_FRAME_TOS(sp) (gdbarch_save_dummy_frame_tos (current_gdbarch, sp))
1960 #endif
1961 #endif
1962
1963 extern int gdbarch_parm_boundary (struct gdbarch *gdbarch);
1964 extern void set_gdbarch_parm_boundary (struct gdbarch *gdbarch, int parm_boundary);
1965 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (PARM_BOUNDARY)
1966 #error "Non multi-arch definition of PARM_BOUNDARY"
1967 #endif
1968 #if GDB_MULTI_ARCH
1969 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (PARM_BOUNDARY)
1970 #define PARM_BOUNDARY (gdbarch_parm_boundary (current_gdbarch))
1971 #endif
1972 #endif
1973
1974 /* Default (value) for non- multi-arch platforms. */
1975 #if (!GDB_MULTI_ARCH) && !defined (TARGET_FLOAT_FORMAT)
1976 #define TARGET_FLOAT_FORMAT (default_float_format (current_gdbarch))
1977 #endif
1978
1979 extern const struct floatformat * gdbarch_float_format (struct gdbarch *gdbarch);
1980 extern void set_gdbarch_float_format (struct gdbarch *gdbarch, const struct floatformat * float_format);
1981 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_FLOAT_FORMAT)
1982 #error "Non multi-arch definition of TARGET_FLOAT_FORMAT"
1983 #endif
1984 #if GDB_MULTI_ARCH
1985 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_FLOAT_FORMAT)
1986 #define TARGET_FLOAT_FORMAT (gdbarch_float_format (current_gdbarch))
1987 #endif
1988 #endif
1989
1990 /* Default (value) for non- multi-arch platforms. */
1991 #if (!GDB_MULTI_ARCH) && !defined (TARGET_DOUBLE_FORMAT)
1992 #define TARGET_DOUBLE_FORMAT (default_double_format (current_gdbarch))
1993 #endif
1994
1995 extern const struct floatformat * gdbarch_double_format (struct gdbarch *gdbarch);
1996 extern void set_gdbarch_double_format (struct gdbarch *gdbarch, const struct floatformat * double_format);
1997 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_DOUBLE_FORMAT)
1998 #error "Non multi-arch definition of TARGET_DOUBLE_FORMAT"
1999 #endif
2000 #if GDB_MULTI_ARCH
2001 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_DOUBLE_FORMAT)
2002 #define TARGET_DOUBLE_FORMAT (gdbarch_double_format (current_gdbarch))
2003 #endif
2004 #endif
2005
2006 /* Default (value) for non- multi-arch platforms. */
2007 #if (!GDB_MULTI_ARCH) && !defined (TARGET_LONG_DOUBLE_FORMAT)
2008 #define TARGET_LONG_DOUBLE_FORMAT (default_double_format (current_gdbarch))
2009 #endif
2010
2011 extern const struct floatformat * gdbarch_long_double_format (struct gdbarch *gdbarch);
2012 extern void set_gdbarch_long_double_format (struct gdbarch *gdbarch, const struct floatformat * long_double_format);
2013 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_LONG_DOUBLE_FORMAT)
2014 #error "Non multi-arch definition of TARGET_LONG_DOUBLE_FORMAT"
2015 #endif
2016 #if GDB_MULTI_ARCH
2017 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_LONG_DOUBLE_FORMAT)
2018 #define TARGET_LONG_DOUBLE_FORMAT (gdbarch_long_double_format (current_gdbarch))
2019 #endif
2020 #endif
2021
2022 /* Default (function) for non- multi-arch platforms. */
2023 #if (!GDB_MULTI_ARCH) && !defined (CONVERT_FROM_FUNC_PTR_ADDR)
2024 #define CONVERT_FROM_FUNC_PTR_ADDR(addr) (core_addr_identity (addr))
2025 #endif
2026
2027 typedef CORE_ADDR (gdbarch_convert_from_func_ptr_addr_ftype) (CORE_ADDR addr);
2028 extern CORE_ADDR gdbarch_convert_from_func_ptr_addr (struct gdbarch *gdbarch, CORE_ADDR addr);
2029 extern void set_gdbarch_convert_from_func_ptr_addr (struct gdbarch *gdbarch, gdbarch_convert_from_func_ptr_addr_ftype *convert_from_func_ptr_addr);
2030 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (CONVERT_FROM_FUNC_PTR_ADDR)
2031 #error "Non multi-arch definition of CONVERT_FROM_FUNC_PTR_ADDR"
2032 #endif
2033 #if GDB_MULTI_ARCH
2034 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (CONVERT_FROM_FUNC_PTR_ADDR)
2035 #define CONVERT_FROM_FUNC_PTR_ADDR(addr) (gdbarch_convert_from_func_ptr_addr (current_gdbarch, addr))
2036 #endif
2037 #endif
2038
2039 /* On some machines there are bits in addresses which are not really
2040 part of the address, but are used by the kernel, the hardware, etc.
2041 for special purposes. ADDR_BITS_REMOVE takes out any such bits so
2042 we get a "real" address such as one would find in a symbol table.
2043 This is used only for addresses of instructions, and even then I'm
2044 not sure it's used in all contexts. It exists to deal with there
2045 being a few stray bits in the PC which would mislead us, not as some
2046 sort of generic thing to handle alignment or segmentation (it's
2047 possible it should be in TARGET_READ_PC instead). */
2048
2049 /* Default (function) for non- multi-arch platforms. */
2050 #if (!GDB_MULTI_ARCH) && !defined (ADDR_BITS_REMOVE)
2051 #define ADDR_BITS_REMOVE(addr) (core_addr_identity (addr))
2052 #endif
2053
2054 typedef CORE_ADDR (gdbarch_addr_bits_remove_ftype) (CORE_ADDR addr);
2055 extern CORE_ADDR gdbarch_addr_bits_remove (struct gdbarch *gdbarch, CORE_ADDR addr);
2056 extern void set_gdbarch_addr_bits_remove (struct gdbarch *gdbarch, gdbarch_addr_bits_remove_ftype *addr_bits_remove);
2057 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (ADDR_BITS_REMOVE)
2058 #error "Non multi-arch definition of ADDR_BITS_REMOVE"
2059 #endif
2060 #if GDB_MULTI_ARCH
2061 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (ADDR_BITS_REMOVE)
2062 #define ADDR_BITS_REMOVE(addr) (gdbarch_addr_bits_remove (current_gdbarch, addr))
2063 #endif
2064 #endif
2065
2066 /* It is not at all clear why SMASH_TEXT_ADDRESS is not folded into
2067 ADDR_BITS_REMOVE. */
2068
2069 /* Default (function) for non- multi-arch platforms. */
2070 #if (!GDB_MULTI_ARCH) && !defined (SMASH_TEXT_ADDRESS)
2071 #define SMASH_TEXT_ADDRESS(addr) (core_addr_identity (addr))
2072 #endif
2073
2074 typedef CORE_ADDR (gdbarch_smash_text_address_ftype) (CORE_ADDR addr);
2075 extern CORE_ADDR gdbarch_smash_text_address (struct gdbarch *gdbarch, CORE_ADDR addr);
2076 extern void set_gdbarch_smash_text_address (struct gdbarch *gdbarch, gdbarch_smash_text_address_ftype *smash_text_address);
2077 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SMASH_TEXT_ADDRESS)
2078 #error "Non multi-arch definition of SMASH_TEXT_ADDRESS"
2079 #endif
2080 #if GDB_MULTI_ARCH
2081 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SMASH_TEXT_ADDRESS)
2082 #define SMASH_TEXT_ADDRESS(addr) (gdbarch_smash_text_address (current_gdbarch, addr))
2083 #endif
2084 #endif
2085
2086 /* FIXME/cagney/2001-01-18: This should be split in two. A target method that indicates if
2087 the target needs software single step. An ISA method to implement it.
2088
2089 FIXME/cagney/2001-01-18: This should be replaced with something that inserts breakpoints
2090 using the breakpoint system instead of blatting memory directly (as with rs6000).
2091
2092 FIXME/cagney/2001-01-18: The logic is backwards. It should be asking if the target can
2093 single step. If not, then implement single step using breakpoints. */
2094
2095 #if defined (SOFTWARE_SINGLE_STEP)
2096 /* Legacy for systems yet to multi-arch SOFTWARE_SINGLE_STEP */
2097 #if !defined (SOFTWARE_SINGLE_STEP_P)
2098 #define SOFTWARE_SINGLE_STEP_P() (1)
2099 #endif
2100 #endif
2101
2102 /* Default predicate for non- multi-arch targets. */
2103 #if (!GDB_MULTI_ARCH) && !defined (SOFTWARE_SINGLE_STEP_P)
2104 #define SOFTWARE_SINGLE_STEP_P() (0)
2105 #endif
2106
2107 extern int gdbarch_software_single_step_p (struct gdbarch *gdbarch);
2108 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SOFTWARE_SINGLE_STEP_P)
2109 #error "Non multi-arch definition of SOFTWARE_SINGLE_STEP"
2110 #endif
2111 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SOFTWARE_SINGLE_STEP_P)
2112 #define SOFTWARE_SINGLE_STEP_P() (gdbarch_software_single_step_p (current_gdbarch))
2113 #endif
2114
2115 /* Default (function) for non- multi-arch platforms. */
2116 #if (!GDB_MULTI_ARCH) && !defined (SOFTWARE_SINGLE_STEP)
2117 #define SOFTWARE_SINGLE_STEP(sig, insert_breakpoints_p) (internal_error (__FILE__, __LINE__, "SOFTWARE_SINGLE_STEP"), 0)
2118 #endif
2119
2120 typedef void (gdbarch_software_single_step_ftype) (enum target_signal sig, int insert_breakpoints_p);
2121 extern void gdbarch_software_single_step (struct gdbarch *gdbarch, enum target_signal sig, int insert_breakpoints_p);
2122 extern void set_gdbarch_software_single_step (struct gdbarch *gdbarch, gdbarch_software_single_step_ftype *software_single_step);
2123 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SOFTWARE_SINGLE_STEP)
2124 #error "Non multi-arch definition of SOFTWARE_SINGLE_STEP"
2125 #endif
2126 #if GDB_MULTI_ARCH
2127 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SOFTWARE_SINGLE_STEP)
2128 #define SOFTWARE_SINGLE_STEP(sig, insert_breakpoints_p) (gdbarch_software_single_step (current_gdbarch, sig, insert_breakpoints_p))
2129 #endif
2130 #endif
2131
2132 /* Default (function) for non- multi-arch platforms. */
2133 #if (!GDB_MULTI_ARCH) && !defined (TARGET_PRINT_INSN)
2134 #define TARGET_PRINT_INSN(vma, info) (legacy_print_insn (vma, info))
2135 #endif
2136
2137 typedef int (gdbarch_print_insn_ftype) (bfd_vma vma, disassemble_info *info);
2138 extern int gdbarch_print_insn (struct gdbarch *gdbarch, bfd_vma vma, disassemble_info *info);
2139 extern void set_gdbarch_print_insn (struct gdbarch *gdbarch, gdbarch_print_insn_ftype *print_insn);
2140 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (TARGET_PRINT_INSN)
2141 #error "Non multi-arch definition of TARGET_PRINT_INSN"
2142 #endif
2143 #if GDB_MULTI_ARCH
2144 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (TARGET_PRINT_INSN)
2145 #define TARGET_PRINT_INSN(vma, info) (gdbarch_print_insn (current_gdbarch, vma, info))
2146 #endif
2147 #endif
2148
2149 /* Default (function) for non- multi-arch platforms. */
2150 #if (!GDB_MULTI_ARCH) && !defined (SKIP_TRAMPOLINE_CODE)
2151 #define SKIP_TRAMPOLINE_CODE(pc) (generic_skip_trampoline_code (pc))
2152 #endif
2153
2154 typedef CORE_ADDR (gdbarch_skip_trampoline_code_ftype) (CORE_ADDR pc);
2155 extern CORE_ADDR gdbarch_skip_trampoline_code (struct gdbarch *gdbarch, CORE_ADDR pc);
2156 extern void set_gdbarch_skip_trampoline_code (struct gdbarch *gdbarch, gdbarch_skip_trampoline_code_ftype *skip_trampoline_code);
2157 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (SKIP_TRAMPOLINE_CODE)
2158 #error "Non multi-arch definition of SKIP_TRAMPOLINE_CODE"
2159 #endif
2160 #if GDB_MULTI_ARCH
2161 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (SKIP_TRAMPOLINE_CODE)
2162 #define SKIP_TRAMPOLINE_CODE(pc) (gdbarch_skip_trampoline_code (current_gdbarch, pc))
2163 #endif
2164 #endif
2165
2166 /* For SVR4 shared libraries, each call goes through a small piece of
2167 trampoline code in the ".plt" section. IN_SOLIB_CALL_TRAMPOLINE evaluates
2168 to nonzero if we are current stopped in one of these. */
2169
2170 /* Default (function) for non- multi-arch platforms. */
2171 #if (!GDB_MULTI_ARCH) && !defined (IN_SOLIB_CALL_TRAMPOLINE)
2172 #define IN_SOLIB_CALL_TRAMPOLINE(pc, name) (generic_in_solib_call_trampoline (pc, name))
2173 #endif
2174
2175 typedef int (gdbarch_in_solib_call_trampoline_ftype) (CORE_ADDR pc, char *name);
2176 extern int gdbarch_in_solib_call_trampoline (struct gdbarch *gdbarch, CORE_ADDR pc, char *name);
2177 extern void set_gdbarch_in_solib_call_trampoline (struct gdbarch *gdbarch, gdbarch_in_solib_call_trampoline_ftype *in_solib_call_trampoline);
2178 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (IN_SOLIB_CALL_TRAMPOLINE)
2179 #error "Non multi-arch definition of IN_SOLIB_CALL_TRAMPOLINE"
2180 #endif
2181 #if GDB_MULTI_ARCH
2182 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (IN_SOLIB_CALL_TRAMPOLINE)
2183 #define IN_SOLIB_CALL_TRAMPOLINE(pc, name) (gdbarch_in_solib_call_trampoline (current_gdbarch, pc, name))
2184 #endif
2185 #endif
2186
2187 /* A target might have problems with watchpoints as soon as the stack
2188 frame of the current function has been destroyed. This mostly happens
2189 as the first action in a funtion's epilogue. in_function_epilogue_p()
2190 is defined to return a non-zero value if either the given addr is one
2191 instruction after the stack destroying instruction up to the trailing
2192 return instruction or if we can figure out that the stack frame has
2193 already been invalidated regardless of the value of addr. Targets
2194 which don't suffer from that problem could just let this functionality
2195 untouched. */
2196
2197 typedef int (gdbarch_in_function_epilogue_p_ftype) (struct gdbarch *gdbarch, CORE_ADDR addr);
2198 extern int gdbarch_in_function_epilogue_p (struct gdbarch *gdbarch, CORE_ADDR addr);
2199 extern void set_gdbarch_in_function_epilogue_p (struct gdbarch *gdbarch, gdbarch_in_function_epilogue_p_ftype *in_function_epilogue_p);
2200
2201 /* Given a vector of command-line arguments, return a newly allocated
2202 string which, when passed to the create_inferior function, will be
2203 parsed (on Unix systems, by the shell) to yield the same vector.
2204 This function should call error() if the argument vector is not
2205 representable for this target or if this target does not support
2206 command-line arguments.
2207 ARGC is the number of elements in the vector.
2208 ARGV is an array of strings, one per argument. */
2209
2210 typedef char * (gdbarch_construct_inferior_arguments_ftype) (struct gdbarch *gdbarch, int argc, char **argv);
2211 extern char * gdbarch_construct_inferior_arguments (struct gdbarch *gdbarch, int argc, char **argv);
2212 extern void set_gdbarch_construct_inferior_arguments (struct gdbarch *gdbarch, gdbarch_construct_inferior_arguments_ftype *construct_inferior_arguments);
2213
2214 #if defined (DWARF2_BUILD_FRAME_INFO)
2215 /* Legacy for systems yet to multi-arch DWARF2_BUILD_FRAME_INFO */
2216 #if !defined (DWARF2_BUILD_FRAME_INFO_P)
2217 #define DWARF2_BUILD_FRAME_INFO_P() (1)
2218 #endif
2219 #endif
2220
2221 /* Default predicate for non- multi-arch targets. */
2222 #if (!GDB_MULTI_ARCH) && !defined (DWARF2_BUILD_FRAME_INFO_P)
2223 #define DWARF2_BUILD_FRAME_INFO_P() (0)
2224 #endif
2225
2226 extern int gdbarch_dwarf2_build_frame_info_p (struct gdbarch *gdbarch);
2227 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (DWARF2_BUILD_FRAME_INFO_P)
2228 #error "Non multi-arch definition of DWARF2_BUILD_FRAME_INFO"
2229 #endif
2230 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (DWARF2_BUILD_FRAME_INFO_P)
2231 #define DWARF2_BUILD_FRAME_INFO_P() (gdbarch_dwarf2_build_frame_info_p (current_gdbarch))
2232 #endif
2233
2234 /* Default (function) for non- multi-arch platforms. */
2235 #if (!GDB_MULTI_ARCH) && !defined (DWARF2_BUILD_FRAME_INFO)
2236 #define DWARF2_BUILD_FRAME_INFO(objfile) (internal_error (__FILE__, __LINE__, "DWARF2_BUILD_FRAME_INFO"), 0)
2237 #endif
2238
2239 typedef void (gdbarch_dwarf2_build_frame_info_ftype) (struct objfile *objfile);
2240 extern void gdbarch_dwarf2_build_frame_info (struct gdbarch *gdbarch, struct objfile *objfile);
2241 extern void set_gdbarch_dwarf2_build_frame_info (struct gdbarch *gdbarch, gdbarch_dwarf2_build_frame_info_ftype *dwarf2_build_frame_info);
2242 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (DWARF2_BUILD_FRAME_INFO)
2243 #error "Non multi-arch definition of DWARF2_BUILD_FRAME_INFO"
2244 #endif
2245 #if GDB_MULTI_ARCH
2246 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (DWARF2_BUILD_FRAME_INFO)
2247 #define DWARF2_BUILD_FRAME_INFO(objfile) (gdbarch_dwarf2_build_frame_info (current_gdbarch, objfile))
2248 #endif
2249 #endif
2250
2251 /* Default (function) for non- multi-arch platforms. */
2252 #if (!GDB_MULTI_ARCH) && !defined (ELF_MAKE_MSYMBOL_SPECIAL)
2253 #define ELF_MAKE_MSYMBOL_SPECIAL(sym, msym) (default_elf_make_msymbol_special (sym, msym))
2254 #endif
2255
2256 typedef void (gdbarch_elf_make_msymbol_special_ftype) (asymbol *sym, struct minimal_symbol *msym);
2257 extern void gdbarch_elf_make_msymbol_special (struct gdbarch *gdbarch, asymbol *sym, struct minimal_symbol *msym);
2258 extern void set_gdbarch_elf_make_msymbol_special (struct gdbarch *gdbarch, gdbarch_elf_make_msymbol_special_ftype *elf_make_msymbol_special);
2259 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (ELF_MAKE_MSYMBOL_SPECIAL)
2260 #error "Non multi-arch definition of ELF_MAKE_MSYMBOL_SPECIAL"
2261 #endif
2262 #if GDB_MULTI_ARCH
2263 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (ELF_MAKE_MSYMBOL_SPECIAL)
2264 #define ELF_MAKE_MSYMBOL_SPECIAL(sym, msym) (gdbarch_elf_make_msymbol_special (current_gdbarch, sym, msym))
2265 #endif
2266 #endif
2267
2268 /* Default (function) for non- multi-arch platforms. */
2269 #if (!GDB_MULTI_ARCH) && !defined (COFF_MAKE_MSYMBOL_SPECIAL)
2270 #define COFF_MAKE_MSYMBOL_SPECIAL(val, msym) (default_coff_make_msymbol_special (val, msym))
2271 #endif
2272
2273 typedef void (gdbarch_coff_make_msymbol_special_ftype) (int val, struct minimal_symbol *msym);
2274 extern void gdbarch_coff_make_msymbol_special (struct gdbarch *gdbarch, int val, struct minimal_symbol *msym);
2275 extern void set_gdbarch_coff_make_msymbol_special (struct gdbarch *gdbarch, gdbarch_coff_make_msymbol_special_ftype *coff_make_msymbol_special);
2276 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) && defined (COFF_MAKE_MSYMBOL_SPECIAL)
2277 #error "Non multi-arch definition of COFF_MAKE_MSYMBOL_SPECIAL"
2278 #endif
2279 #if GDB_MULTI_ARCH
2280 #if (GDB_MULTI_ARCH > GDB_MULTI_ARCH_PARTIAL) || !defined (COFF_MAKE_MSYMBOL_SPECIAL)
2281 #define COFF_MAKE_MSYMBOL_SPECIAL(val, msym) (gdbarch_coff_make_msymbol_special (current_gdbarch, val, msym))
2282 #endif
2283 #endif
2284
2285 extern struct gdbarch_tdep *gdbarch_tdep (struct gdbarch *gdbarch);
2286
2287
2288 /* Mechanism for co-ordinating the selection of a specific
2289 architecture.
2290
2291 GDB targets (*-tdep.c) can register an interest in a specific
2292 architecture. Other GDB components can register a need to maintain
2293 per-architecture data.
2294
2295 The mechanisms below ensures that there is only a loose connection
2296 between the set-architecture command and the various GDB
2297 components. Each component can independently register their need
2298 to maintain architecture specific data with gdbarch.
2299
2300 Pragmatics:
2301
2302 Previously, a single TARGET_ARCHITECTURE_HOOK was provided. It
2303 didn't scale.
2304
2305 The more traditional mega-struct containing architecture specific
2306 data for all the various GDB components was also considered. Since
2307 GDB is built from a variable number of (fairly independent)
2308 components it was determined that the global aproach was not
2309 applicable. */
2310
2311
2312 /* Register a new architectural family with GDB.
2313
2314 Register support for the specified ARCHITECTURE with GDB. When
2315 gdbarch determines that the specified architecture has been
2316 selected, the corresponding INIT function is called.
2317
2318 --
2319
2320 The INIT function takes two parameters: INFO which contains the
2321 information available to gdbarch about the (possibly new)
2322 architecture; ARCHES which is a list of the previously created
2323 ``struct gdbarch'' for this architecture.
2324
2325 The INIT function parameter INFO shall, as far as possible, be
2326 pre-initialized with information obtained from INFO.ABFD or
2327 previously selected architecture (if similar).
2328
2329 The INIT function shall return any of: NULL - indicating that it
2330 doesn't recognize the selected architecture; an existing ``struct
2331 gdbarch'' from the ARCHES list - indicating that the new
2332 architecture is just a synonym for an earlier architecture (see
2333 gdbarch_list_lookup_by_info()); a newly created ``struct gdbarch''
2334 - that describes the selected architecture (see gdbarch_alloc()).
2335
2336 The DUMP_TDEP function shall print out all target specific values.
2337 Care should be taken to ensure that the function works in both the
2338 multi-arch and non- multi-arch cases. */
2339
2340 struct gdbarch_list
2341 {
2342 struct gdbarch *gdbarch;
2343 struct gdbarch_list *next;
2344 };
2345
2346 struct gdbarch_info
2347 {
2348 /* Use default: NULL (ZERO). */
2349 const struct bfd_arch_info *bfd_arch_info;
2350
2351 /* Use default: BFD_ENDIAN_UNKNOWN (NB: is not ZERO). */
2352 int byte_order;
2353
2354 /* Use default: NULL (ZERO). */
2355 bfd *abfd;
2356
2357 /* Use default: NULL (ZERO). */
2358 struct gdbarch_tdep_info *tdep_info;
2359 };
2360
2361 typedef struct gdbarch *(gdbarch_init_ftype) (struct gdbarch_info info, struct gdbarch_list *arches);
2362 typedef void (gdbarch_dump_tdep_ftype) (struct gdbarch *gdbarch, struct ui_file *file);
2363
2364 /* DEPRECATED - use gdbarch_register() */
2365 extern void register_gdbarch_init (enum bfd_architecture architecture, gdbarch_init_ftype *);
2366
2367 extern void gdbarch_register (enum bfd_architecture architecture,
2368 gdbarch_init_ftype *,
2369 gdbarch_dump_tdep_ftype *);
2370
2371
2372 /* Return a freshly allocated, NULL terminated, array of the valid
2373 architecture names. Since architectures are registered during the
2374 _initialize phase this function only returns useful information
2375 once initialization has been completed. */
2376
2377 extern const char **gdbarch_printable_names (void);
2378
2379
2380 /* Helper function. Search the list of ARCHES for a GDBARCH that
2381 matches the information provided by INFO. */
2382
2383 extern struct gdbarch_list *gdbarch_list_lookup_by_info (struct gdbarch_list *arches, const struct gdbarch_info *info);
2384
2385
2386 /* Helper function. Create a preliminary ``struct gdbarch''. Perform
2387 basic initialization using values obtained from the INFO andTDEP
2388 parameters. set_gdbarch_*() functions are called to complete the
2389 initialization of the object. */
2390
2391 extern struct gdbarch *gdbarch_alloc (const struct gdbarch_info *info, struct gdbarch_tdep *tdep);
2392
2393
2394 /* Helper function. Free a partially-constructed ``struct gdbarch''.
2395 It is assumed that the caller freeds the ``struct
2396 gdbarch_tdep''. */
2397
2398 extern void gdbarch_free (struct gdbarch *);
2399
2400
2401 /* Helper function. Force an update of the current architecture.
2402
2403 The actual architecture selected is determined by INFO, ``(gdb) set
2404 architecture'' et.al., the existing architecture and BFD's default
2405 architecture. INFO should be initialized to zero and then selected
2406 fields should be updated.
2407
2408 Returns non-zero if the update succeeds */
2409
2410 extern int gdbarch_update_p (struct gdbarch_info info);
2411
2412
2413
2414 /* Register per-architecture data-pointer.
2415
2416 Reserve space for a per-architecture data-pointer. An identifier
2417 for the reserved data-pointer is returned. That identifer should
2418 be saved in a local static variable.
2419
2420 The per-architecture data-pointer can be initialized in one of two
2421 ways: The value can be set explicitly using a call to
2422 set_gdbarch_data(); the value can be set implicitly using the value
2423 returned by a non-NULL INIT() callback. INIT(), when non-NULL is
2424 called after the basic architecture vector has been created.
2425
2426 When a previously created architecture is re-selected, the
2427 per-architecture data-pointer for that previous architecture is
2428 restored. INIT() is not called.
2429
2430 During initialization, multiple assignments of the data-pointer are
2431 allowed, non-NULL values are deleted by calling FREE(). If the
2432 architecture is deleted using gdbarch_free() all non-NULL data
2433 pointers are also deleted using FREE().
2434
2435 Multiple registrarants for any architecture are allowed (and
2436 strongly encouraged). */
2437
2438 struct gdbarch_data;
2439
2440 typedef void *(gdbarch_data_init_ftype) (struct gdbarch *gdbarch);
2441 typedef void (gdbarch_data_free_ftype) (struct gdbarch *gdbarch,
2442 void *pointer);
2443 extern struct gdbarch_data *register_gdbarch_data (gdbarch_data_init_ftype *init,
2444 gdbarch_data_free_ftype *free);
2445 extern void set_gdbarch_data (struct gdbarch *gdbarch,
2446 struct gdbarch_data *data,
2447 void *pointer);
2448
2449 extern void *gdbarch_data (struct gdbarch_data*);
2450
2451
2452 /* Register per-architecture memory region.
2453
2454 Provide a memory-region swap mechanism. Per-architecture memory
2455 region are created. These memory regions are swapped whenever the
2456 architecture is changed. For a new architecture, the memory region
2457 is initialized with zero (0) and the INIT function is called.
2458
2459 Memory regions are swapped / initialized in the order that they are
2460 registered. NULL DATA and/or INIT values can be specified.
2461
2462 New code should use register_gdbarch_data(). */
2463
2464 typedef void (gdbarch_swap_ftype) (void);
2465 extern void register_gdbarch_swap (void *data, unsigned long size, gdbarch_swap_ftype *init);
2466 #define REGISTER_GDBARCH_SWAP(VAR) register_gdbarch_swap (&(VAR), sizeof ((VAR)), NULL)
2467
2468
2469
2470 /* The target-system-dependent byte order is dynamic */
2471
2472 extern int target_byte_order;
2473 #ifndef TARGET_BYTE_ORDER
2474 #define TARGET_BYTE_ORDER (target_byte_order + 0)
2475 #endif
2476
2477 extern int target_byte_order_auto;
2478 #ifndef TARGET_BYTE_ORDER_AUTO
2479 #define TARGET_BYTE_ORDER_AUTO (target_byte_order_auto + 0)
2480 #endif
2481
2482
2483
2484 /* The target-system-dependent BFD architecture is dynamic */
2485
2486 extern int target_architecture_auto;
2487 #ifndef TARGET_ARCHITECTURE_AUTO
2488 #define TARGET_ARCHITECTURE_AUTO (target_architecture_auto + 0)
2489 #endif
2490
2491 extern const struct bfd_arch_info *target_architecture;
2492 #ifndef TARGET_ARCHITECTURE
2493 #define TARGET_ARCHITECTURE (target_architecture + 0)
2494 #endif
2495
2496
2497 /* The target-system-dependent disassembler is semi-dynamic */
2498
2499 extern int dis_asm_read_memory (bfd_vma memaddr, bfd_byte *myaddr,
2500 unsigned int len, disassemble_info *info);
2501
2502 extern void dis_asm_memory_error (int status, bfd_vma memaddr,
2503 disassemble_info *info);
2504
2505 extern void dis_asm_print_address (bfd_vma addr,
2506 disassemble_info *info);
2507
2508 extern int (*tm_print_insn) (bfd_vma, disassemble_info*);
2509 extern disassemble_info tm_print_insn_info;
2510 #ifndef TARGET_PRINT_INSN_INFO
2511 #define TARGET_PRINT_INSN_INFO (&tm_print_insn_info)
2512 #endif
2513
2514
2515
2516 /* Set the dynamic target-system-dependent parameters (architecture,
2517 byte-order, ...) using information found in the BFD */
2518
2519 extern void set_gdbarch_from_file (bfd *);
2520
2521
2522 /* Initialize the current architecture to the "first" one we find on
2523 our list. */
2524
2525 extern void initialize_current_architecture (void);
2526
2527 /* For non-multiarched targets, do any initialization of the default
2528 gdbarch object necessary after the _initialize_MODULE functions
2529 have run. */
2530 extern void initialize_non_multiarch ();
2531
2532 /* gdbarch trace variable */
2533 extern int gdbarch_debug;
2534
2535 extern void gdbarch_dump (struct gdbarch *gdbarch, struct ui_file *file);
2536
2537 #endif