summaryrefslogtreecommitdiff
path: root/gcc/config/pyr
diff options
context:
space:
mode:
authorkenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4>1995-02-21 23:21:14 +0000
committerkenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4>1995-02-21 23:21:14 +0000
commit97a18f26ea3a4d091fa9d57d9c00773cdecbfaef (patch)
tree804db72713ffd33458515ca2cde99ed7e257f631 /gcc/config/pyr
parent473b618688e87814cea076f9da0e8e4a2c5e3942 (diff)
downloadgcc-97a18f26ea3a4d091fa9d57d9c00773cdecbfaef.tar.gz
Added arg to RETURN_POPS_ARGS.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@8999 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/config/pyr')
-rw-r--r--gcc/config/pyr/pyr.h7
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/config/pyr/pyr.h b/gcc/config/pyr/pyr.h
index 1dd5f5c7d80..05b2cfb2911 100644
--- a/gcc/config/pyr/pyr.h
+++ b/gcc/config/pyr/pyr.h
@@ -1,6 +1,6 @@
/* Definitions of target machine parameters for GNU compiler,
for Pyramid 90x, 9000, and MIServer Series.
- Copyright (C) 1989 Free Software Foundation, Inc.
+ Copyright (C) 1989, 1995 Free Software Foundation, Inc.
This file is part of GNU CC.
@@ -17,7 +17,7 @@ GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GNU CC; see the file COPYING. If not, write to
the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
-
+
/*
* If you're going to change this, and you haven't already,
* you should get and read
@@ -484,6 +484,7 @@ enum reg_class { NO_REGS, ALL_REGS, LIM_REG_CLASSES };
/* Value is the number of bytes of arguments automatically
popped when returning from a subroutine call.
+ FUNDECL is the declaration node of the function (as a tree),
FUNTYPE is the data type of the function (as a tree),
or for a library call it is an identifier node for the subroutine name.
SIZE is the number of bytes of arguments passed on the stack.
@@ -492,7 +493,7 @@ enum reg_class { NO_REGS, ALL_REGS, LIM_REG_CLASSES };
using RETD in this way violates the Pyramid calling convention.
We may nevertheless provide this as an option. */
-#define RETURN_POPS_ARGS(FUNTYPE,SIZE) \
+#define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE) \
((TARGET_RETD && TREE_CODE (FUNTYPE) != IDENTIFIER_NODE \
&& (TYPE_ARG_TYPES (FUNTYPE) == 0 \
|| (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE))) \