(RETURN_POPS_ARGS): Test first argument for IDENTIFIER_NODE.

From-SVN: r13278

diff --git a/gcc/config/gmicro/gmicro.h b/gcc/config/gmicro/gmicro.h
index 6333b1e1e3c7de0b728ab2d84015f2e161591c4e..1cb6cc9ef7bc87ecddaa17355521ae1dc4c77a2d 100644 (file)
--- a/gcc/config/gmicro/gmicro.h
+++ b/gcc/config/gmicro/gmicro.h
@@ -460,10 +460,10 @@ extern enum reg_class regno_reg_class[];
    for the Gmicro. The option name may be changed in the future. */
 
 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)   \
-  ((TARGET_RTD && TREE_CODE (FUNTYPE) != IDENTIFIER_NODE       \
+  ((TARGET_RTD && TREE_CODE (FUNDECL) != IDENTIFIER_NODE       \
     && (TYPE_ARG_TYPES (FUNTYPE) == 0                          \
        || (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE)))   \
-           = void_type_node)))                                 \
+           == void_type_node)))                                        \
    ? (SIZE) : 0)
 
 /* Define how to find the value returned by a function.

diff --git a/gcc/config/i386/next.h b/gcc/config/i386/next.h
index ab36b8cef7aafa2432391eb7c18113f6d12fd6bf..62c8dd6f25bfef0e86a49cb9c24b7bff20c1b476 100644 (file)
--- a/gcc/config/i386/next.h
+++ b/gcc/config/i386/next.h
@@ -1,5 +1,5 @@
 /* Target definitions for GNU compiler for Intel x86 CPU running NeXTSTEP
-   Copyright (C) 1993, 1995 Free Software Foundation, Inc.
+   Copyright (C) 1993, 1995, 1996 Free Software Foundation, Inc.
 
 This file is part of GNU CC.
 
@@ -216,7 +216,7 @@ Boston, MA 02111-1307, USA.  */
 
 #undef RETURN_POPS_ARGS
 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)                                 \
-  (TREE_CODE (FUNTYPE) == IDENTIFIER_NODE                      \
+  (TREE_CODE (FUNDECL) == IDENTIFIER_NODE                      \
    ? 0                                                         \
    : (TARGET_RTD                                               \
       && (TYPE_ARG_TYPES (FUNTYPE) == 0                                \

diff --git a/gcc/config/i386/sco.h b/gcc/config/i386/sco.h
index 81034e42fa2eb3e48facc4f977911b3c42ab8a80..8676889f9448f9a61d91d4745ed631dc17632ead 100644 (file)
--- a/gcc/config/i386/sco.h
+++ b/gcc/config/i386/sco.h
@@ -1,5 +1,5 @@
 /* Definitions for Intel 386 running SCO Unix System V.
-   Copyright (C) 1988, 1992, 1994, 1995 Free Software Foundation, Inc.
+   Copyright (C) 1988, 1992, 1994, 1995 Free, 1996 Software Foundation, Inc.
 
 This file is part of GNU CC.
 
@@ -104,7 +104,7 @@ Boston, MA 02111-1307, USA.  */
 
 #undef RETURN_POPS_ARGS
 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)   \
-  (TREE_CODE (FUNTYPE) == IDENTIFIER_NODE ? 0                  \
+  (TREE_CODE (FUNDECL) == IDENTIFIER_NODE ? 0                  \
    : (TARGET_RTD                                               \
       && (TYPE_ARG_TYPES (FUNTYPE) == 0                                \
          || (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE))) \

diff --git a/gcc/config/i386/sco5.h b/gcc/config/i386/sco5.h
index d5546c9f87eea6a5950ecbf9dad02535c1ebdd79..ac8dc15d6e1443c4b958957242532e834a26f017 100644 (file)
--- a/gcc/config/i386/sco5.h
+++ b/gcc/config/i386/sco5.h
@@ -674,7 +674,7 @@ dtors_section ()                                                    \
 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)                                 \
  ((TARGET_ELF) ?                                                       \
   (i386_return_pops_args (FUNDECL, FUNTYPE, SIZE)) :                   \
-  (TREE_CODE (FUNTYPE) == IDENTIFIER_NODE ? 0                          \
+  (TREE_CODE (FUNDECL) == IDENTIFIER_NODE ? 0                          \
    : (TARGET_RTD                                                       \
       && (TYPE_ARG_TYPES (FUNTYPE) == 0                                        \
          || (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE)))         \

diff --git a/gcc/config/i386/scodbx.h b/gcc/config/i386/scodbx.h
index 7f068957b03ed53324470b10e3fa189517c60ef5..3a7a1984c203420cb6d84bc37a03a182dfb657e1 100644 (file)
--- a/gcc/config/i386/scodbx.h
+++ b/gcc/config/i386/scodbx.h
@@ -1,6 +1,6 @@
 /* Definitions for Intel 386 running SCO Unix System V,
    using dbx-in-coff encapsulation.
-   Copyright (C) 1992, 1995 Free Software Foundation, Inc.
+   Copyright (C) 1992, 1995, 1996 Free Software Foundation, Inc.
 
 This file is part of GNU CC.
 
@@ -75,7 +75,7 @@ Boston, MA 02111-1307, USA.  */
 
 #undef RETURN_POPS_ARGS
 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)   \
-  (TREE_CODE (FUNTYPE) == IDENTIFIER_NODE ? 0                  \
+  (TREE_CODE (FUNDECL) == IDENTIFIER_NODE ? 0                  \
    : (TARGET_RTD                                               \
       && (TYPE_ARG_TYPES (FUNTYPE) == 0                                \
          || (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE))) \

diff --git a/gcc/config/m68k/m68k.h b/gcc/config/m68k/m68k.h
index 84834626c31beed99ac00aa482058e0d86fb9060..244bb8faaa958b750d9b1fc9076fc89fd8607da4 100644 (file)
--- a/gcc/config/m68k/m68k.h
+++ b/gcc/config/m68k/m68k.h
@@ -818,7 +818,7 @@ extern enum reg_class regno_reg_class[];
    the caller must always pop the args.  */
 
 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)   \
-  ((TARGET_RTD && TREE_CODE (FUNTYPE) != IDENTIFIER_NODE       \
+  ((TARGET_RTD && TREE_CODE (FUNDECL) != IDENTIFIER_NODE       \
     && (TYPE_ARG_TYPES (FUNTYPE) == 0                          \
        || (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE)))   \
            == void_type_node)))                                \

diff --git a/gcc/config/ns32k/ns32k.h b/gcc/config/ns32k/ns32k.h
index f10c772e0bad61bf989ba59ae510b52f0e6b8a0e..854c794314f6df1102f5e0c5d144356747931975 100644 (file)
--- a/gcc/config/ns32k/ns32k.h
+++ b/gcc/config/ns32k/ns32k.h
@@ -405,7 +405,7 @@ enum reg_class { NO_REGS, GENERAL_REGS, FLOAT_REGS, GEN_AND_FP_REGS,
    the caller must always pop the args.  */
 
 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)   \
-  ((TARGET_RTD && TREE_CODE (FUNTYPE) != IDENTIFIER_NODE       \
+  ((TARGET_RTD && TREE_CODE (FUNDECL) != IDENTIFIER_NODE       \
     && (TYPE_ARG_TYPES (FUNTYPE) == 0                          \
        || (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE)))   \
            == void_type_node)))                                \

diff --git a/gcc/config/pyr/pyr.h b/gcc/config/pyr/pyr.h
index db9d1742e2353bc18864c26c52967f1696ad6980..407a39ed7ce80b2508f046a054a3fb6c22e23c43 100644 (file)
--- a/gcc/config/pyr/pyr.h
+++ b/gcc/config/pyr/pyr.h
@@ -495,7 +495,7 @@ enum reg_class { NO_REGS, ALL_REGS, LIM_REG_CLASSES };
    We may nevertheless provide this as an option.   */
 
 #define RETURN_POPS_ARGS(FUNDECL,FUNTYPE,SIZE)   \
-  ((TARGET_RETD && TREE_CODE (FUNTYPE) != IDENTIFIER_NODE      \
+  ((TARGET_RETD && TREE_CODE (FUNDECL) != IDENTIFIER_NODE      \
     && (TYPE_ARG_TYPES (FUNTYPE) == 0                          \
        || (TREE_VALUE (tree_last (TYPE_ARG_TYPES (FUNTYPE)))   \
            == void_type_node)))                                \