diff options
author | Jason Thorpe <thorpej@netbsd.org> | 2002-01-19 20:22:28 +0000 |
---|---|---|
committer | Jason Thorpe <thorpej@netbsd.org> | 2002-01-19 20:22:28 +0000 |
commit | 0d056799fda335eaa9a7cd1206098c9076de74c1 (patch) | |
tree | 517081c2ba64464742c4d8ab5940e835f7b96046 /gdb/config/alpha | |
parent | 63e63b07a26b1d38e53851cbbb42f9ffb1b54f40 (diff) | |
download | gdb-0d056799fda335eaa9a7cd1206098c9076de74c1.zip gdb-0d056799fda335eaa9a7cd1206098c9076de74c1.tar.gz gdb-0d056799fda335eaa9a7cd1206098c9076de74c1.tar.bz2 |
* alpha-tdep.c (alpha_register_virtual_type): New function.
(alpha_init_frame_pc_first): Ditto.
(alpha_fix_call_dummy): Ditto.
(alpha_store_struct_return): Ditto.
(alpha_extract_struct_value_address): Ditto.
* config/alpha/tm-alpha.h (REGISTER_VIRTUAL_TYPE): Use
alpha_register_virtual_type.
(STORE_STRUCT_RETURN): Use alpha_store_struct_return.
(EXTRACT_STRUCT_VALUE_ADDRESS): Use
alpha_extract_struct_value_address.
(FIX_CALL_DUMMY): Use alpha_fix_call_dummy.
(INIT_FRAME_PC): Use init_frame_pc_noop.
(INIT_FRAME_PC_FIRST): Use alpha_init_frame_pc_first.
Diffstat (limited to 'gdb/config/alpha')
-rw-r--r-- | gdb/config/alpha/tm-alpha.h | 32 |
1 files changed, 15 insertions, 17 deletions
diff --git a/gdb/config/alpha/tm-alpha.h b/gdb/config/alpha/tm-alpha.h index 5c53622..84ba3b4 100644 --- a/gdb/config/alpha/tm-alpha.h +++ b/gdb/config/alpha/tm-alpha.h @@ -195,14 +195,15 @@ alpha_register_convert_to_raw (struct type *, int, char *, char *); /* Return the GDB type object for the "standard" data type of data in register N. */ -#define REGISTER_VIRTUAL_TYPE(N) \ - (((N) >= FP0_REGNUM && (N) < FP0_REGNUM+31) \ - ? builtin_type_double : builtin_type_long) \ +#define REGISTER_VIRTUAL_TYPE(N) alpha_register_virtual_type ((N)) +extern struct type * alpha_register_virtual_type (int); /* Store the address of the place in which to copy the structure the subroutine will return. Handled by alpha_push_arguments. */ -#define STORE_STRUCT_RETURN(addr, sp) +#define STORE_STRUCT_RETURN(addr, sp) \ + alpha_store_struct_return ((addr), (sp)) +extern void alpha_store_struct_return (CORE_ADDR, CORE_ADDR); /**/ /* Extract from an array REGBUF containing the (raw) register state @@ -229,8 +230,8 @@ extern void alpha_store_return_value (struct type *, char *); on it. */ #define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) \ - (extract_address (REGBUF + REGISTER_BYTE (V0_REGNUM), \ - REGISTER_RAW_SIZE (V0_REGNUM))) + alpha_extract_struct_value_address (REGBUF) +extern CORE_ADDR alpha_extract_struct_value_address (char *); /* Structures are returned by ref in extra arg0 */ #define USE_STRUCT_CONVENTION(gcc_p, type) \ @@ -346,23 +347,20 @@ extern CORE_ADDR alpha_call_dummy_address (void); We only have to set RA_REGNUM to the dummy breakpoint address and T12_REGNUM (the `procedure value register') to the function address. */ -#define FIX_CALL_DUMMY(dummyname, pc, fun, nargs, args, type, gcc_p) \ -{ \ - CORE_ADDR bp_address = CALL_DUMMY_ADDRESS (); \ - if (bp_address == 0) \ - error ("no place to put call"); \ - write_register (RA_REGNUM, bp_address); \ - write_register (T12_REGNUM, fun); \ -} +#define FIX_CALL_DUMMY(dummyname, pc, fun, nargs, args, type, gcc_p) \ + alpha_fix_call_dummy ((dummyname), (pc), (fun), (nargs), (args), \ + (type), (gcc_p)) +extern void alpha_fix_call_dummy (char *, CORE_ADDR, CORE_ADDR, int, + struct value **, struct type *, int); /* There's a mess in stack frame creation. See comments in blockframe.c near reference to INIT_FRAME_PC_FIRST. */ -#define INIT_FRAME_PC(fromleaf, prev) /* nada */ +#define INIT_FRAME_PC(fromleaf, prev) init_frame_pc_noop ((fromleaf), (prev)) #define INIT_FRAME_PC_FIRST(fromleaf, prev) \ - (prev)->pc = ((fromleaf) ? SAVED_PC_AFTER_CALL ((prev)->next) : \ - (prev)->next ? FRAME_SAVED_PC ((prev)->next) : read_pc ()); + alpha_init_frame_pc_first ((fromleaf), (prev)) +extern void alpha_init_frame_pc_first (int, struct frame_info *); /* Special symbol found in blocks associated with routines. We can hang alpha_extra_func_info_t's off of this. */ |