* config/alpha/alpha.c: Remove mentions of deprecates macros

	in comments, remove some target-independent comments about target
	macros, and/or add minimal function comments for target hook
	implementations.
	* config/avr/avr.c: Likewise.
	* config/ia64/ia64.h: Likewise.
	* config/ip2k/ip2k.c: Likewise.
	* config/iq2000/iq2000.c: Likewise.
	* config/m32r/m32r.h: Likewise.
	* config/m68hc11/m68hc11.c: Likewise.
	* config/mcore/mcore.c: Likewise.
	* config/mmix/mmix.c: Likewise.
	* config/mn10300/mn10300.c: Likewise.
	* config/pa/pa.c: Likewise.
	* config/pdp11/pdp11.c: Likewise.
	* config/rs6000/rs6000.h: Likewise.
	* config/sh/sh.c: Likewise.
	* config/sh/sh.h: Likewise.
	* config/sparc/sparc.c: Likewise.
	* config/sparc/sparc.h: Likewise.
	* config/stormy16/stormy16.c: Likewise.
	* config/xtensa/xtensa.c: Likewise.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@77005 138bc75d-0d04-0410-961f-82ee72b054a4

19 files changed, 50 insertions, 43 deletions

diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c
index 581d344d54a..276359c1352 100644
--- a/gcc/config/alpha/alpha.c
+++ b/gcc/config/alpha/alpha.c
@@ -6240,7 +6240,7 @@ alpha_va_start (tree valist, rtx nextarg ATTRIBUTE_UNUSED)
   if (TARGET_ABI_UNICOSMK)
     std_expand_builtin_va_start (valist, nextarg);
 
-  /* For Unix, SETUP_INCOMING_VARARGS moves the starting address base
+  /* For Unix, TARGET_SETUP_INCOMING_VARARGS moves the starting address base
      up by 48, storing fp arg registers in the first 48 bytes, and the
      integer arg registers in the next 48 bytes.  This is only done,
      however, if any integer registers need to be stored.
diff --git a/gcc/config/avr/avr.c b/gcc/config/avr/avr.c
index dc60d18fcb8..80e6fa9ed38 100644
--- a/gcc/config/avr/avr.c
+++ b/gcc/config/avr/avr.c
@@ -5361,6 +5361,8 @@ avr_out_sbxx_branch (rtx insn, rtx operands[])
   return "";
 }
 
+/* Worker function for TARGET_ASM_CONSTRUCTOR.  */
+
 static void
 avr_asm_out_ctor (rtx symbol, int priority)
 {
@@ -5368,6 +5370,8 @@ avr_asm_out_ctor (rtx symbol, int priority)
   default_ctor_section_asm_out_constructor (symbol, priority);
 }
 
+/* Worker function for TARGET_ASM_DESTRUCTOR.  */
+
 static void
 avr_asm_out_dtor (rtx symbol, int priority)
 {
@@ -5375,6 +5379,8 @@ avr_asm_out_dtor (rtx symbol, int priority)
   default_dtor_section_asm_out_destructor (symbol, priority);
 }
 
+/* Worker function for TARGET_RETURN_IN_MEMORY.  */
+
 static bool
 avr_return_in_memory (tree type, tree fntype ATTRIBUTE_UNUSED)
 {
diff --git a/gcc/config/ia64/ia64.h b/gcc/config/ia64/ia64.h
index e9fd52a1452..74c5465b355 100644
--- a/gcc/config/ia64/ia64.h
+++ b/gcc/config/ia64/ia64.h
@@ -1422,9 +1422,6 @@ do {									\
 
 /* How Large Values are Returned */
 
-/* If you define this macro to be 0, then the conventions used for structure
-   and union return values are decided by the `RETURN_IN_MEMORY' macro.  */
-
 #define DEFAULT_PCC_STRUCT_RETURN 0
 
 
diff --git a/gcc/config/ip2k/ip2k.c b/gcc/config/ip2k/ip2k.c
index 53f71b38f1a..07537f678be 100644
--- a/gcc/config/ip2k/ip2k.c
+++ b/gcc/config/ip2k/ip2k.c
@@ -6196,12 +6196,16 @@ ip2k_unsigned_comparison_operator (rtx op, enum machine_mode mode)
           && unsigned_condition (GET_CODE (op)) == GET_CODE (op));
 }
 
+/* Worker function for TARGET_RETURN_IN_MEMORY.  */
+
 static bool
 ip2k_return_in_memory (tree type, tree fntype ATTRIBUTE_UNUSED)
 {
   return (TYPE_MODE (type) == BLKmode) ? int_size_in_bytes (type) > 8 : 0;
 }
 
+/* Worker function for TARGET_SETUP_INCOMING_VARARGS.  */
+
 static void
 ip2k_setup_incoming_varargs (CUMULATIVE_ARGS *ca ATTRIBUTE_UNUSED,
 			     enum machine_mode mode ATTRIBUTE_UNUSED,
diff --git a/gcc/config/iq2000/iq2000.c b/gcc/config/iq2000/iq2000.c
index 59fcc6c1fcb..b4281d4d2d3 100644
--- a/gcc/config/iq2000/iq2000.c
+++ b/gcc/config/iq2000/iq2000.c
@@ -3284,6 +3284,8 @@ iq2000_expand_builtin (tree exp, rtx target, rtx subtarget ATTRIBUTE_UNUSED,
   return NULL_RTX;
 }
 
+/* Worker function for TARGET_RETURN_IN_MEMORY.  */
+
 static bool
 iq2000_return_in_memory (tree type, tree fntype ATTRIBUTE_UNUSED)
 {
@@ -3291,6 +3293,8 @@ iq2000_return_in_memory (tree type, tree fntype ATTRIBUTE_UNUSED)
 	  || (int_size_in_bytes (type) == -1));
 }
 
+/* Worker function for TARGET_SETUP_INCOMING_VARARGS.  */
+
 static void
 iq2000_setup_incoming_varargs (CUMULATIVE_ARGS *cum,
 			       enum machine_mode mode ATTRIBUTE_UNUSED,
diff --git a/gcc/config/m32r/m32r.h b/gcc/config/m32r/m32r.h
index 6f4f5c91097..0370c458db3 100644
--- a/gcc/config/m32r/m32r.h
+++ b/gcc/config/m32r/m32r.h
@@ -1158,7 +1158,7 @@ extern enum reg_class m32r_regno_reg_class[FIRST_PSEUDO_REGISTER];
 /* ??? What about r1 in DI/DF values.  */
 #define FUNCTION_VALUE_REGNO_P(N) ((N) == 0)
 
-/* Tell GCC to use RETURN_IN_MEMORY.  */
+/* Tell GCC to use TARGET_RETURN_IN_MEMORY.  */
 #define DEFAULT_PCC_STRUCT_RETURN 0
 
 /* Function entry and exit.  */
diff --git a/gcc/config/m68hc11/m68hc11.c b/gcc/config/m68hc11/m68hc11.c
index 314697874eb..564079803a6 100644
--- a/gcc/config/m68hc11/m68hc11.c
+++ b/gcc/config/m68hc11/m68hc11.c
@@ -5504,6 +5504,8 @@ m68hc11_rtx_costs (rtx x, int code, int outer_code, int *total)
 }
 
 
+/* Worker function for TARGET_ASM_FILE_START.  */
+
 static void
 m68hc11_file_start (void)
 {
@@ -5513,6 +5515,8 @@ m68hc11_file_start (void)
 }
 
 
+/* Worker function for TARGET_ASM_CONSTRUCTOR.  */
+
 static void
 m68hc11_asm_out_constructor (rtx symbol, int priority)
 {
@@ -5520,6 +5524,8 @@ m68hc11_asm_out_constructor (rtx symbol, int priority)
   fprintf (asm_out_file, "\t.globl\t__do_global_ctors\n");
 }
 
+/* Worker function for TARGET_ASM_DESTRUCTOR.  */
+
 static void
 m68hc11_asm_out_destructor (rtx symbol, int priority)
 {
@@ -5527,6 +5533,8 @@ m68hc11_asm_out_destructor (rtx symbol, int priority)
   fprintf (asm_out_file, "\t.globl\t__do_global_dtors\n");
 }
 
+/* Worker function for TARGET_STRUCT_VALUE_RTX.  */
+
 static rtx
 m68hc11_struct_value_rtx (tree fntype ATTRIBUTE_UNUSED,
 			  int incoming ATTRIBUTE_UNUSED)
diff --git a/gcc/config/mcore/mcore.c b/gcc/config/mcore/mcore.c
index 1aaf7fcc460..0a503f0f3fb 100644
--- a/gcc/config/mcore/mcore.c
+++ b/gcc/config/mcore/mcore.c
@@ -1949,7 +1949,7 @@ mcore_expand_block_move (rtx dst_mem, rtx src_mem, rtx * operands)
 /* Code to generate prologue and epilogue sequences.  */
 static int number_of_regs_before_varargs;
 
-/* Set by SETUP_INCOMING_VARARGS to indicate to prolog that this is
+/* Set by TARGET_SETUP_INCOMING_VARARGS to indicate to prolog that this is
    for a varargs function.  */
 static int current_function_anonymous_args;
 
diff --git a/gcc/config/mmix/mmix.c b/gcc/config/mmix/mmix.c
index 8c74d226537..46bfcea210c 100644
--- a/gcc/config/mmix/mmix.c
+++ b/gcc/config/mmix/mmix.c
@@ -792,9 +792,9 @@ mmix_asm_output_mi_thunk (FILE *stream,
 			  HOST_WIDE_INT vcall_offset ATTRIBUTE_UNUSED,
 			  tree func)
 {
-  /* If you define STRUCT_VALUE to 0, rather than use STRUCT_VALUE_REGNUM,
-     (i.e. pass location of structure to return as invisible first
-     argument) you need to tweak this code too.  */
+  /* If you define TARGET_STRUCT_VALUE_RTX that returns 0 (i.e. pass
+     location of structure to return as invisible first argument), you
+     need to tweak this code too.  */
   const char *regname = reg_names[MMIX_FIRST_INCOMING_ARG_REGNUM];
 
   if (delta >= 0 && delta < 65536)
diff --git a/gcc/config/mn10300/mn10300.c b/gcc/config/mn10300/mn10300.c
index 669acce64f6..03b54b9603d 100644
--- a/gcc/config/mn10300/mn10300.c
+++ b/gcc/config/mn10300/mn10300.c
@@ -1418,6 +1418,8 @@ initial_offset (int from, int to)
   abort ();
 }
 
+/* Worker function for TARGET_RETURN_IN_MEMORY.  */
+
 static bool
 mn10300_return_in_memory (tree type, tree fntype ATTRIBUTE_UNUSED)
 {
diff --git a/gcc/config/pa/pa.c b/gcc/config/pa/pa.c
index 31883cee047..0cce6a9e376 100644
--- a/gcc/config/pa/pa.c
+++ b/gcc/config/pa/pa.c
@@ -9096,6 +9096,8 @@ pa_globalize_label (FILE *stream, const char *name)
   }
 }
 
+/* Worker function for TARGET_STRUCT_VALUE_RTX.  */
+
 static rtx
 pa_struct_value_rtx (tree fntype ATTRIBUTE_UNUSED,
 		     int incoming ATTRIBUTE_UNUSED)
@@ -9103,6 +9105,8 @@ pa_struct_value_rtx (tree fntype ATTRIBUTE_UNUSED,
   return gen_rtx_REG (Pmode, PA_STRUCT_VALUE_REGNUM);
 }
 
+/* Worker function for TARGET_RETURN_IN_MEMORY.  */
+
 bool
 pa_return_in_memory (tree type, tree fntype ATTRIBUTE_UNUSED)
 {
diff --git a/gcc/config/pdp11/pdp11.c b/gcc/config/pdp11/pdp11.c
index 117510955b4..2ef56c0b142 100644
--- a/gcc/config/pdp11/pdp11.c
+++ b/gcc/config/pdp11/pdp11.c
@@ -1700,6 +1700,8 @@ output_addr_const_pdp11 (FILE *file, rtx x)
     }
 }
 
+/* Worker function for TARGET_RETURN_IN_MEMORY.  */
+
 static bool
 pdp11_return_in_memory (tree type, tree fntype ATTRIBUTE_UNUSED)
 {
diff --git a/gcc/config/rs6000/rs6000.h b/gcc/config/rs6000/rs6000.h
index 4d83416d548..23dd0829b62 100644
--- a/gcc/config/rs6000/rs6000.h
+++ b/gcc/config/rs6000/rs6000.h
@@ -1645,7 +1645,7 @@ extern enum rs6000_abi rs6000_current_abi;	/* available for use by subtarget */
 /* DRAFT_V4_STRUCT_RET defaults off.  */
 #define DRAFT_V4_STRUCT_RET 0
 
-/* Let RETURN_IN_MEMORY control what happens.  */
+/* Let TARGET_RETURN_IN_MEMORY control what happens.  */
 #define DEFAULT_PCC_STRUCT_RETURN 0
 
 /* Mode of stack savearea.
diff --git a/gcc/config/sh/sh.c b/gcc/config/sh/sh.c
index f745265a922..15a9fdebdf8 100644
--- a/gcc/config/sh/sh.c
+++ b/gcc/config/sh/sh.c
@@ -92,7 +92,7 @@ static int pragma_trapa;
    interrupted.  */
 int pragma_nosave_low_regs;
 
-/* This is used for communication between SETUP_INCOMING_VARARGS and
+/* This is used for communication between TARGET_SETUP_INCOMING_VARARGS and
    sh_expand_prologue.  */
 int current_function_anonymous_args;
 
@@ -6520,10 +6520,6 @@ sh_function_arg_advance (CUMULATIVE_ARGS *ca, enum machine_mode mode,
 	  : ROUND_ADVANCE (GET_MODE_SIZE (mode)))));
 }
 
-/* If the structure value address is not passed in a register, define
-   `STRUCT_VALUE' as an expression returning an RTX for the place
-   where the address is passed.  If it returns 0, the address is
-   passed as an "invisible" first argument.  */
 /* The Renesas calling convention doesn't quite fit into this scheme since
    the address is passed like an invisible argument, but one that is always
    passed in memory.  */
@@ -6535,6 +6531,8 @@ sh_struct_value_rtx (tree fndecl, int incoming ATTRIBUTE_UNUSED)
   return gen_rtx_REG (Pmode, 2);
 }
 
+/* Worker function for TARGET_RETURN_IN_MEMORY.  */
+
 static bool
 sh_return_in_memory (tree type, tree fndecl)
 {
diff --git a/gcc/config/sh/sh.h b/gcc/config/sh/sh.h
index 5355d0a407b..caece67bdac 100644
--- a/gcc/config/sh/sh.h
+++ b/gcc/config/sh/sh.h
@@ -1126,7 +1126,8 @@ extern char sh_additional_register_names[ADDREGNAMES_SIZE] \
 #define STATIC_CHAIN_REGNUM	(TARGET_SH5 ? 1 : 3)
 
 /* Don't default to pcc-struct-return, because we have already specified
-   exactly how to return structures in the RETURN_IN_MEMORY macro.  */
+   exactly how to return structures in the TARGET_RETURN_IN_MEMORY
+   target hook.  */
 
 #define DEFAULT_PCC_STRUCT_RETURN 0
 
diff --git a/gcc/config/sparc/sparc.c b/gcc/config/sparc/sparc.c
index 8beea5248eb..6f9be4f8432 100644
--- a/gcc/config/sparc/sparc.c
+++ b/gcc/config/sparc/sparc.c
@@ -4852,7 +4852,7 @@ init_cumulative_args (struct sparc_args *cum, tree fntype,
   cum->libcall_p = fntype == 0;
 }
 
-/* Handle the PROMOTE_PROTOTYPES macro.
+/* Handle the TARGET_PROMOTE_PROTOTYPES target hook.
    When a prototype says `char' or `short', really pass an `int'.  */
 
 static bool
@@ -4861,7 +4861,7 @@ sparc_promote_prototypes (tree fntype ATTRIBUTE_UNUSED)
   return TARGET_ARCH32 ? true : false;
 }
 
-/* Handle the STRICT_ARGUMENT_NAMING macro.  */
+/* Handle the TARGET_STRICT_ARGUMENT_NAMING target hook.  */
 
 static bool
 sparc_strict_argument_naming (CUMULATIVE_ARGS *ca ATTRIBUTE_UNUSED)
@@ -4870,7 +4870,7 @@ sparc_strict_argument_naming (CUMULATIVE_ARGS *ca ATTRIBUTE_UNUSED)
   return TARGET_V9 ? true : false;
 }
 
-/* Handle the RETURN_IN_MEMORY macro.
+/* Handle the TARGET_RETURN_IN_MEMORY target hook.
    Specify whether to return the return value in memory.  */
 
 static bool
@@ -4887,7 +4887,7 @@ sparc_return_in_memory (tree type, tree fntype ATTRIBUTE_UNUSED)
 	     && (unsigned HOST_WIDE_INT) int_size_in_bytes (type) > 32));
 }
 
-/* Handle the STRUCT_VALUE macro.
+/* Handle the TARGET_STRUCT_VALUE target hook.
    Return where to find the structure return value address.  */
 
 static rtx
diff --git a/gcc/config/sparc/sparc.h b/gcc/config/sparc/sparc.h
index 194fcb61af8..0ba2eb542df 100644
--- a/gcc/config/sparc/sparc.h
+++ b/gcc/config/sparc/sparc.h
@@ -748,10 +748,6 @@ if (TARGET_ARCH64				\
     && GET_MODE_SIZE (MODE) < UNITS_PER_WORD)	\
   (MODE) = word_mode;
 
-/* Define this macro if the promotion described by PROMOTE_MODE
-   should _only_ be performed for outgoing function arguments or
-   function return values, as specified by PROMOTE_FUNCTION_ARGS
-   and PROMOTE_FUNCTION_RETURN, respectively.  */
 /* This is only needed for TARGET_ARCH64, but since PROMOTE_MODE is a no-op
    for TARGET_ARCH32 this is ok.  Otherwise we'd need to add a runtime test
    for this value.  For TARGET_ARCH64 we need it, as we don't have instructions
diff --git a/gcc/config/stormy16/stormy16.c b/gcc/config/stormy16/stormy16.c
index fe518c6dcc2..cdb8c971ceb 100644
--- a/gcc/config/stormy16/stormy16.c
+++ b/gcc/config/stormy16/stormy16.c
@@ -1420,25 +1420,8 @@ xstormy16_initialize_trampoline (rtx addr, rtx fnaddr, rtx static_chain)
   emit_move_insn (reg_addr_mem, reg_fnaddr);
 }
 
-/* Create an RTX representing the place where a function returns a
-   value of data type VALTYPE.  VALTYPE is a tree node representing a
-   data type.  Write `TYPE_MODE (VALTYPE)' to get the machine mode
-   used to represent that type.  On many machines, only the mode is
-   relevant.  (Actually, on most machines, scalar values are returned
-   in the same place regardless of mode).
-
-   If `TARGET_PROMOTE_FUNCTION_RETURN' is defined to return true, you
-   must apply the same promotion rules specified in `PROMOTE_MODE' if
-   VALTYPE is a scalar type.
-
-   If the precise function being called is known, FUNC is a tree node
-   (`FUNCTION_DECL') for it; otherwise, FUNC is a null pointer.  This makes it
-   possible to use a different value-returning convention for specific
-   functions when all their calls are known.
-
-   `FUNCTION_VALUE' is not used for return vales with aggregate data types,
-   because these are returned in another way.  See `STRUCT_VALUE_REGNUM' and
-   related macros.  */
+/* Worker function for FUNCTION_VALUE.  */
+
 rtx
 xstormy16_function_value (tree valtype, tree func ATTRIBUTE_UNUSED)
 {
diff --git a/gcc/config/xtensa/xtensa.c b/gcc/config/xtensa/xtensa.c
index 7e7b03acadd..6e6a0b4ad25 100644
--- a/gcc/config/xtensa/xtensa.c
+++ b/gcc/config/xtensa/xtensa.c
@@ -3052,6 +3052,8 @@ xtensa_rtx_costs (rtx x, int code, int outer_code, int *total)
     }
 }
 
+/* Worker function for TARGET_RETURN_IN_MEMORY.  */
+
 static bool
 xtensa_return_in_memory (tree type, tree fntype ATTRIBUTE_UNUSED)
 {