diff options
| author | Jim Wilson <wilson@gcc.gnu.org> | 1996-06-06 16:40:38 -0700 |
|---|---|---|
| committer | Jim Wilson <wilson@gcc.gnu.org> | 1996-06-06 16:40:38 -0700 |
| commit | bd625e2114ad9ecde1bd4c72f063b942a5f910f2 (patch) | |
| tree | f5d60b9b546f00089d208b5ad06bfa02bc94d4e0 /gcc | |
| parent | bd16a708b9e21300511c7187a81fc5c8fb949d7c (diff) | |
| download | gcc-bd625e2114ad9ecde1bd4c72f063b942a5f910f2.zip gcc-bd625e2114ad9ecde1bd4c72f063b942a5f910f2.tar.gz gcc-bd625e2114ad9ecde1bd4c72f063b942a5f910f2.tar.bz2 | |
(FUNCTION_ARG): General PARALLEL instead of EXPR_LIST.
From-SVN: r12197
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/config/pa/pa.h | 29 |
1 files changed, 18 insertions, 11 deletions
diff --git a/gcc/config/pa/pa.h b/gcc/config/pa/pa.h index 2d0c812..8179c6b 100644 --- a/gcc/config/pa/pa.h +++ b/gcc/config/pa/pa.h @@ -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) |