start-sanitize-m32r
Tue Nov 12 12:06:58 1996 Michael Snyder <msnyder@cleaver.cygnus.com>
* m32r-tdep.c: Add functionality for target function calls.
* valops.c: Small change to support target function calls.
* config/m32r/tm-m32r.h: Add support for target function calls.
This is a safety checkin -- everything works, but there'll be another
clean-up round later.
This commit is contained in:
Michael Snyder
parent
cad9cd605c
commit
6f3eea2bdf
|
|
@ -1,3 +1,11 @@
|
|||
start-sanitize-m32r
|
||||
Tue Nov 12 12:06:58 1996 Michael Snyder <msnyder@cleaver.cygnus.com>
|
||||
|
||||
* m32r-tdep.c: Add functionality for target function calls.
|
||||
* valops.c: Small change to support target function calls.
|
||||
* config/m32r/tm-m32r.h: Add support for target function calls.
|
||||
end-sanitize-m32r
|
||||
|
||||
Mon Nov 11 17:15:59 1996 Geoffrey Noer <noer@cygnus.com>
|
||||
|
||||
* defs.h: modify Nov 11 12:59:00 change so _MSC_VER is checked
|
||||
|
|
|
|||
|
|
@ -38,6 +38,7 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
|||
|
||||
/* mvs_check *_REGNUM */
|
||||
#define R0_REGNUM 0
|
||||
#define STRUCT_RETURN_REGNUM 0
|
||||
#define ARG0_REGNUM 0
|
||||
#define ARGLAST_REGNUM 3
|
||||
#define V0_REGNUM 0
|
||||
|
|
@ -129,10 +130,14 @@ extern CORE_ADDR m32r_frame_chain PARAMS ((struct frame_info *fi));
|
|||
/* mvs_check FRAME_CHAIN */
|
||||
#define FRAME_CHAIN(fi) m32r_frame_chain (fi)
|
||||
|
||||
extern int generic_frame_chain_valid PARAMS ((CORE_ADDR, struct frame_info *));
|
||||
#define FRAME_CHAIN_VALID(fp, frame) (generic_frame_chain_valid (fp, frame))
|
||||
|
||||
extern CORE_ADDR m32r_find_callers_reg PARAMS ((struct frame_info *fi,
|
||||
int regnum));
|
||||
extern CORE_ADDR m32r_frame_saved_pc PARAMS((struct frame_info *));
|
||||
/* mvs_check FRAME_SAVED_PC */
|
||||
#define FRAME_SAVED_PC(fi) (m32r_find_callers_reg (fi, RP_REGNUM))
|
||||
#define FRAME_SAVED_PC(fi) (m32r_frame_saved_pc (fi))
|
||||
|
||||
/* mvs_check EXTRACT_RETURN_VALUE */
|
||||
#define EXTRACT_RETURN_VALUE(TYPE, REGBUF, VALBUF) \
|
||||
|
|
@ -147,11 +152,6 @@ extern CORE_ADDR m32r_find_callers_reg PARAMS ((struct frame_info *fi,
|
|||
((TYPE_LENGTH (TYPE) > 4 ? 8:4) - TYPE_LENGTH (TYPE)),\
|
||||
(VALBUF), TYPE_LENGTH (TYPE));
|
||||
|
||||
/* mvs_check EXTRACT_STRUCT_VALUE_ADDRESS */
|
||||
#define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) \
|
||||
(extract_address (REGBUF + REGISTER_BYTE (V0_REGNUM), \
|
||||
REGISTER_RAW_SIZE (V0_REGNUM)))
|
||||
|
||||
extern CORE_ADDR m32r_skip_prologue PARAMS ((CORE_ADDR pc));
|
||||
/* mvs_check SKIP_PROLOGUE */
|
||||
#define SKIP_PROLOGUE(pc) pc = m32r_skip_prologue (pc)
|
||||
|
|
@ -166,51 +166,85 @@ extern CORE_ADDR m32r_skip_prologue PARAMS ((CORE_ADDR pc));
|
|||
/* mvs_no_check FRAME_NUM_ARGS */
|
||||
#define FRAME_NUM_ARGS(val, fi) ((val) = -1)
|
||||
|
||||
#define COERCE_FLOAT_TO_DOUBLE 1
|
||||
|
||||
#define TARGET_WRITE_SP m32r_write_sp
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
/* struct passing and returning stuff */
|
||||
#define STORE_STRUCT_RETURN(STRUCT_ADDR, SP) \
|
||||
write_register (0, STRUCT_ADDR)
|
||||
|
||||
#define USE_STRUCT_CONVENTION(GCC_P, TYPE) \
|
||||
(TYPE_LENGTH (TYPE) > 8)
|
||||
|
||||
#define EXTRACT_STRUCT_VALUE_ADDRESS(REGBUF) \
|
||||
(extract_address (REGBUF + REGISTER_BYTE (V0_REGNUM), \
|
||||
REGISTER_RAW_SIZE (V0_REGNUM)))
|
||||
|
||||
#define REG_STRUCT_HAS_ADDR(gcc_p,type) (TYPE_LENGTH (type) > 8)
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
/* generic dummy frame stuff */
|
||||
|
||||
extern CORE_ADDR generic_read_register_dummy PARAMS ((struct frame_info *fi,
|
||||
int regno));
|
||||
|
||||
extern void generic_push_dummy_frame PARAMS ((void));
|
||||
extern void generic_pop_dummy_frame PARAMS ((void));
|
||||
|
||||
extern int generic_pc_in_call_dummy PARAMS ((CORE_ADDR pc,
|
||||
CORE_ADDR fp,
|
||||
CORE_ADDR sp));
|
||||
extern char * generic_find_dummy_frame PARAMS ((CORE_ADDR pc,
|
||||
CORE_ADDR fp,
|
||||
CORE_ADDR sp));
|
||||
|
||||
#define PUSH_DUMMY_FRAME (generic_push_dummy_frame ())
|
||||
#define PC_IN_CALL_DUMMY(PC, SP, FP) (generic_pc_in_call_dummy (PC, SP, FP))
|
||||
|
||||
|
||||
/* target-specific dummy_frame stuff */
|
||||
|
||||
extern struct frame_info *m32r_pop_frame PARAMS ((struct frame_info *frame));
|
||||
/* mvs_check POP_FRAME */
|
||||
#define POP_FRAME m32r_pop_frame (get_current_frame ())
|
||||
|
||||
/* mvs_no_check CALL_DUMMY */
|
||||
/* #define CALL_DUMMY { 0 } */
|
||||
/* mvs_no_check STACK_ALIGN */
|
||||
/* #define STACK_ALIGN(x) ((x + 3) & ~3) */
|
||||
|
||||
/* mvs_no_check CALL_DUMMY_START_OFFSET */
|
||||
#define CALL_DUMMY_START_OFFSET (0)
|
||||
extern void m32r_push_return_address PARAMS ((CORE_ADDR));
|
||||
extern CORE_ADDR m32r_push_arguments PARAMS ((int nargs,
|
||||
struct value **args,
|
||||
CORE_ADDR sp,
|
||||
unsigned char struct_return,
|
||||
CORE_ADDR struct_addr));
|
||||
|
||||
/* mvs_no_check CALL_DUMMY_BREAKPOINT_OFFSET */
|
||||
#define CALL_DUMMY_BREAKPOINT_OFFSET (0)
|
||||
|
||||
extern void m32r_push_dummy_frame PARAMS ((void));
|
||||
/* mvs_no_check PUSH_DUMMY_FRAME */
|
||||
#define PUSH_DUMMY_FRAME m32r_push_dummy_frame ()
|
||||
|
||||
/* mvs_no_check PUSH_ARGUMENTS */
|
||||
#define PUSH_ARGUMENTS(NARGS, ARGS, SP, STRUCT_RETURN, STRUCT_ADDR) \
|
||||
(SP) = m32r_push_arguments (NARGS, ARGS, SP, STRUCT_RETURN, STRUCT_ADDR)
|
||||
|
||||
|
||||
|
||||
#define CALL_DUMMY { } /* mvs_no_check CALL_DUMMY */
|
||||
#define CALL_DUMMY_ADDRESS() (entry_point_address ()) /* mvs_no_check CALL_DUMMY_ADDRESS */
|
||||
|
||||
#define CALL_DUMMY_START_OFFSET (0) /* mvs_no_check CALL_DUMMY_START_OFFSET */
|
||||
#define CALL_DUMMY_BREAKPOINT_OFFSET (0) /* mvs_no_check CALL_DUMMY_BREAKPOINT_OFFSET */
|
||||
#define CALL_DUMMY_LENGTH (0) /* mvs_no_check CALL_DUMMY_LENGTH */
|
||||
|
||||
/* mvs_no_check FIX_CALL_DUMMY */
|
||||
#define FIX_CALL_DUMMY(DUMMY1, START_SP, FUNADDR, NARGS, \
|
||||
ARGS, VALUE_TYPE, USING_GCC)
|
||||
|
||||
/* mvs_no_check CALL_DUMMY_LOCATION_AT_ENTRY_POINT */
|
||||
#define CALL_DUMMY_LOCATION AT_ENTRY_POINT
|
||||
|
||||
/* mvs_no_check STACK_ALIGN */
|
||||
#define STACK_ALIGN(x) ((x + 3) & ~3)
|
||||
|
||||
extern CORE_ADDR
|
||||
m32r_push_arguments PARAMS ((int nargs, struct value **args, CORE_ADDR sp,
|
||||
unsigned char struct_return,
|
||||
CORE_ADDR struct_addr));
|
||||
/* mvs_no_check PUSH_ARGUMENTS */
|
||||
#define PUSH_ARGUMENTS(NARGS, ARGS, SP, STRUCT_RETURN, STRUCT_ADDR) \
|
||||
(SP) = m32r_push_arguments (NARGS, ARGS, SP, STRUCT_RETURN, STRUCT_ADDR)
|
||||
|
||||
/* mvs_no_check STORE_STRUCT_RETURN */
|
||||
#define STORE_STRUCT_RETURN(STRUCT_ADDR, SP)
|
||||
|
||||
/* mvs_no_check CALL_DUMMY_ADDRESS */
|
||||
#define CALL_DUMMY_ADDRESS() (entry_point_address ())
|
||||
|
||||
extern int m32r_pc_in_call_dummy PARAMS ((CORE_ADDR pc));
|
||||
/* mvs_no_check PC_IN_CALL_DUMMY */
|
||||
#define PC_IN_CALL_DUMMY(PC, SP, FP) m32r_pc_in_call_dummy (PC)
|
||||
|
||||
/* mvs_check USE_STRUCT_CONVENTION */
|
||||
#define USE_STRUCT_CONVENTION(GCC_P, TYPE) \
|
||||
(TYPE_LENGTH (TYPE) > 8)
|
||||
#define CALL_DUMMY_LOCATION AT_ENTRY_POINT
|
||||
#define PUSH_RETURN_ADDRESS(pc) (m32r_push_return_address (pc))
|
||||
|
|
|
|||
Loading…
Reference in New Issue