MatCat.OpenSource/8sa1-gcc
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

*** empty log message ***

Browse Source 
From-SVN: r1025
This commit is contained in:
Jim Wilson 1992-05-19 17:41:48 -07:00
parent cbc3885de2
commit 29008b51e3
4 changed files with 32 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
gcc/calls.c
View File

@ -1485,15 +1485,27 @@ expand_call (exp, target, ignore)
else if (structure_value_addr) else if (structure_value_addr)
{ {
if (target == 0 || GET_CODE (target) != MEM) if (target == 0 || GET_CODE (target) != MEM)
target = gen_rtx (MEM, TYPE_MODE (TREE_TYPE (exp)), {
memory_address (TYPE_MODE (TREE_TYPE (exp)), target = gen_rtx (MEM, TYPE_MODE (TREE_TYPE (exp)),
structure_value_addr)); memory_address (TYPE_MODE (TREE_TYPE (exp)),
structure_value_addr));
MEM_IN_STRUCT_P (target)
= (TREE_CODE (TREE_TYPE (exp)) == ARRAY_TYPE
|| TREE_CODE (TREE_TYPE (exp)) == RECORD_TYPE
|| TREE_CODE (TREE_TYPE (exp)) == UNION_TYPE);
}
} }
else if (pcc_struct_value) else if (pcc_struct_value)
{ {
if (target == 0) if (target == 0)
target = gen_rtx (MEM, TYPE_MODE (TREE_TYPE (exp)), {
copy_to_reg (valreg)); target = gen_rtx (MEM, TYPE_MODE (TREE_TYPE (exp)),
copy_to_reg (valreg));
MEM_IN_STRUCT_P (target)
= (TREE_CODE (TREE_TYPE (exp)) == ARRAY_TYPE
|| TREE_CODE (TREE_TYPE (exp)) == RECORD_TYPE
|| TREE_CODE (TREE_TYPE (exp)) == UNION_TYPE);
}
else if (TYPE_MODE (TREE_TYPE (exp)) != BLKmode) else if (TYPE_MODE (TREE_TYPE (exp)) != BLKmode)
emit_move_insn (target, gen_rtx (MEM, TYPE_MODE (TREE_TYPE (exp)), emit_move_insn (target, gen_rtx (MEM, TYPE_MODE (TREE_TYPE (exp)),
copy_to_reg (valreg))); copy_to_reg (valreg)));

6
gcc/config/i960/i960.c
View File

@ -1919,7 +1919,8 @@ i960_function_arg_advance (cum, mode, type, named)
i960_arg_size_and_align (mode, type, &size, &align); i960_arg_size_and_align (mode, type, &size, &align);
if (named == 0 || size > 4 || cum->ca_nstackparms != 0 if (named == 0 || size > 4 || cum->ca_nstackparms != 0
|| (size + ROUND (cum->ca_nregparms, align)) > NPARM_REGS) || (size + ROUND (cum->ca_nregparms, align)) > NPARM_REGS
|| MUST_PASS_IN_STACK (mode, type))
cum->ca_nstackparms = ROUND (cum->ca_nstackparms, align) + size; cum->ca_nstackparms = ROUND (cum->ca_nstackparms, align) + size;
else else
cum->ca_nregparms = ROUND (cum->ca_nregparms, align) + size; cum->ca_nregparms = ROUND (cum->ca_nregparms, align) + size;
@ -1941,7 +1942,8 @@ i960_function_arg (cum, mode, type, named)
i960_arg_size_and_align (mode, type, &size, &align); i960_arg_size_and_align (mode, type, &size, &align);
if (named == 0 || size > 4 || cum->ca_nstackparms != 0 if (named == 0 || size > 4 || cum->ca_nstackparms != 0
|| (size + ROUND (cum->ca_nregparms, align)) > NPARM_REGS) || (size + ROUND (cum->ca_nregparms, align)) > NPARM_REGS
|| MUST_PASS_IN_STACK (mode, type))
{ {
cum->ca_nstackparms = ROUND (cum->ca_nstackparms, align); cum->ca_nstackparms = ROUND (cum->ca_nstackparms, align);
ret = 0; ret = 0;

9
gcc/config/i960/i960.h
View File

@ -790,8 +790,13 @@ struct cum_args { int ca_nregparms; int ca_nstackparms; };
/* Indicate the alignment boundary for an argument of the specified mode and /* Indicate the alignment boundary for an argument of the specified mode and
type. */ type. */
#define FUNCTION_ARG_BOUNDARY(MODE, TYPE) \ #define FUNCTION_ARG_BOUNDARY(MODE, TYPE) \
((TYPE) && TYPE_ALIGN (TYPE) > PARM_BOUNDARY ? TYPE_ALIGN (TYPE) \ (((TYPE) != 0) \
: PARM_BOUNDARY) ? ((TYPE_ALIGN (TYPE) <= PARM_BOUNDARY) \
? PARM_BOUNDARY \
: TYPE_ALIGN (TYPE)) \
: ((GET_MODE_ALIGNMENT (MODE) <= PARM_BOUNDARY) \
? PARM_BOUNDARY \
: GET_MODE_ALIGNMENT (MODE)))
/* Determine where to put an argument to a function. /* Determine where to put an argument to a function.
Value is zero to push the argument on the stack, Value is zero to push the argument on the stack,

4
gcc/function.c
View File

@ -3031,7 +3031,11 @@ locate_and_pad_parm (passed_mode, type, in_regs, fndecl,
area reserved for registers, skip that area. */ area reserved for registers, skip that area. */
if (! in_regs) if (! in_regs)
{ {
#ifdef MAYBE_REG_PARM_STACK_SPACE
reg_parm_stack_space = MAYBE_REG_PARM_STACK_SPACE;
#else
reg_parm_stack_space = REG_PARM_STACK_SPACE (fndecl); reg_parm_stack_space = REG_PARM_STACK_SPACE (fndecl);
#endif
if (reg_parm_stack_space > 0) if (reg_parm_stack_space > 0)
{ {
if (initial_offset_ptr->var) if (initial_offset_ptr->var)