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

(FUNCTION_ARG): General PARALLEL instead of EXPR_LIST.

Browse Source 
From-SVN: r12197
This commit is contained in:
Jim Wilson 1996-06-06 16:40:38 -07:00
parent bd16a708b9
commit bd625e2114
1 changed files with 18 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
gcc/config/pa/pa.h
View File

@ -887,7 +887,7 @@ struct hppa_args {int words, nargs_prototype, indirect; };
/* Similar, but when scanning the definition of a procedure. We always
set NARGS_PROTOTYPE large so we never return an EXPR_LIST. */
set NARGS_PROTOTYPE large so we never return a PARALLEL. */
#define INIT_CUMULATIVE_INCOMING_ARGS(CUM,FNTYPE,IGNORE) \
(CUM).words = 0, \
@ -984,16 +984,23 @@ struct hppa_args {int words, nargs_prototype, indirect; };
(TYPE))))))\
/* We are calling a non-prototyped function with floating point \
arguments using the portable conventions. */ \
: gen_rtx (EXPR_LIST, VOIDmode, \
gen_rtx (REG, (MODE), \
(FUNCTION_ARG_SIZE ((MODE), (TYPE)) > 1 \
? ((CUM).words ? 38 : 34) \
: (32 + 2 * (CUM).words))), \
gen_rtx (REG, (MODE), \
(FUNCTION_ARG_SIZE ((MODE), (TYPE)) > 1 \
? ((CUM).words ? 23 : 25) \
: (27 - (CUM).words - FUNCTION_ARG_SIZE ((MODE),\
(TYPE)))))) \
: gen_rtx (PARALLEL, (MODE), \
gen_rtvec \
(2, \
gen_rtx (EXPR_LIST, VOIDmode, \
gen_rtx (REG, (MODE), \
(FUNCTION_ARG_SIZE ((MODE), (TYPE)) > 1 \
? ((CUM).words ? 38 : 34) \
: (32 + 2 * (CUM).words))), \
const0_rtx), \
gen_rtx (EXPR_LIST, VOIDmode, \
gen_rtx (REG, (MODE), \
(FUNCTION_ARG_SIZE ((MODE), (TYPE)) > 1 \
? ((CUM).words ? 23 : 25) \
: (27 - (CUM).words - \
FUNCTION_ARG_SIZE ((MODE), \
(TYPE))))), \
const0_rtx))) \
/* Pass this parameter in the stack. */ \
: 0)