Changeset 676 for trunk

Timestamp:

Sep 9, 2003, 8:37:41 PM (22 years ago)

Author:

bird

Message:

#631: return struct for system and optlink calling conventions.

Location:

trunk/src/gcc/gcc

Files:

• calls.c (modified) (1 diff, 1 prop)
• config/i386/emx.c (modified) (2 diffs, 1 prop)
• config/i386/emx.h (modified) (1 diff, 1 prop)
• cp/decl.c (modified) (1 diff, 1 prop)
• cp/semantics.c (modified) (1 diff, 1 prop)
• expr.c (modified) (1 diff, 1 prop)
• function.c (modified) (5 diffs, 1 prop)
• integrate.c (modified) (2 diffs, 1 prop)
• reg-stack.c (modified) (1 diff, 1 prop)
• tree.h (modified) (1 diff, 1 prop)

trunk/src/gcc/gcc/calls.c

@@ -2274 +2274 @@
 
   /* Cater to broken compilers.  */
-  if (aggregate_value_p (exp))
+  if (aggregate_value_p
     {
       /* This call returns a big structure.  */

trunk/src/gcc/gcc/config/i386/emx.c

@@ -130 +130 @@
   tree id, type;
   int rc = 1;
-
+  
+  /*
   dfprintf((stderr, "emx_c_set_decl_assembler_name\n"));
   DUMP(decl);
+
 
   /* Sometimes we recursively call DECL_ASSEMBLER_NAME to apply the default
@@ -421 +423 @@
   }
 }
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+

trunk/src/gcc/gcc/config/i386/emx.h

@@ -108 +108 @@
 #define TARGET_CXX_SET_DECL_ASSEMBLER_NAME(decl) \
   (emx_c_set_decl_assembler_name (decl, DECL_LANG_SPECIFIC(decl) && DECL_FUNCTION_MEMBER_P (decl)))
+
+
+
+
+
 
 /* This macros will stick a label to exception table for current file,

trunk/src/gcc/gcc/cp/decl.c

@@ -14337 +14337 @@
          simpler, since we don't have to worry about promoted modes.  */
       if (r != error_mark_node
-          && aggregate_value_p (TREE_TYPE (TREE_TYPE (fndecl))))
+          && aggregate_value_p
         {
           DECL_ALIGN (r) = DECL_ALIGN (DECL_RESULT (fndecl));

trunk/src/gcc/gcc/cp/semantics.c

@@ -2229 +2229 @@
   copy_from_buffer_p = 0;
 #ifdef PCC_STATIC_STRUCT_RETURN  
-  if (!AGGR_INIT_VIA_CTOR_P (aggr_init_expr) && aggregate_value_p (type))
+  if (!AGGR_INIT_VIA_CTOR_P (aggr_init_expr) && aggregate_value_p
     {
       int old_ac = flag_access_control;

trunk/src/gcc/gcc/expr.c

@@ -3791 +3791 @@
      needs to be done.  Handling this in the normal way is safe because no
      computation is done before the call.  */
-  if (TREE_CODE (from) == CALL_EXPR && ! aggregate_value_p (from)
+  if (TREE_CODE (from) == CALL_EXPR && ! aggregate_value_p
       && TREE_CODE (TYPE_SIZE (TREE_TYPE (from))) == INTEGER_CST
       && ! ((TREE_CODE (to) == VAR_DECL || TREE_CODE (to) == PARM_DECL)

trunk/src/gcc/gcc/function.c

@@ -4278 +4278 @@
    EXP may be a type node or an expression (whose type is tested).  */
 
+
+
+
+
 int
 aggregate_value_p (exp)
      tree exp;
 {
+
+
+
+
+
+
+
+
+
+
+
+
   int i, regno, nregs;
   rtx reg;
@@ -4289 +4305 @@
   if (TREE_CODE (type) == VOID_TYPE)
     return 0;
+
+
+
+
   if (RETURN_IN_MEMORY (type))
     return 1;
@@ -4386 +4406 @@
 
   /* If struct value address is treated as the first argument, make it so.  */
-  if (aggregate_value_p (DECL_RESULT (fndecl))
+  if (aggregate_value_p
       && ! current_function_returns_pcc_struct
       && struct_value_incoming_rtx == 0)
@@ -6408 +6428 @@
 
   /* Set flags used by final.c.  */
-  if (aggregate_value_p (DECL_RESULT (subr)))
+  if (aggregate_value_p
     {
 #ifdef PCC_STATIC_STRUCT_RETURN
@@ -6585 +6605 @@
 
   /* Decide whether to return the value in memory or in a register.  */
-  if (aggregate_value_p (DECL_RESULT (subr)))
+  if (aggregate_value_p
     {
       /* Returning something that won't go in a register.  */

trunk/src/gcc/gcc/integrate.c

@@ -1030 +1030 @@
         {
           if (! structure_value_addr
-              || ! aggregate_value_p (DECL_RESULT (fndecl)))
+              || ! aggregate_value_p
             abort ();
 
@@ -1285 +1285 @@
   if (target
       && TYPE_MODE (TREE_TYPE (TREE_TYPE (fndecl))) == BLKmode
-      && ! aggregate_value_p (TREE_TYPE (TREE_TYPE (fndecl))))
+      && ! aggregate_value_p
     target = copy_blkmode_from_reg (0, target, TREE_TYPE (TREE_TYPE (fndecl)));
 

trunk/src/gcc/gcc/reg-stack.c

@@ -832 +832 @@
   /* If the value is supposed to be returned in memory, then clearly
      it is not returned in a stack register.  */
-  if (aggregate_value_p (DECL_RESULT (decl)))
+  if (aggregate_value_p
     return 0;
 

trunk/src/gcc/gcc/tree.h

@@ -3020 +3020 @@
 extern void preserve_rtl_expr_temps     PARAMS ((tree));
 extern int aggregate_value_p            PARAMS ((tree));
+
+
+
+
+
 extern void free_temps_for_rtl_expr     PARAMS ((tree));
 extern void instantiate_virtual_regs    PARAMS ((tree, rtx));