* calls.c (emit_call_1): Mark parameter with ATTRIBUTE_UNUSED.

	* 1750a.c (print_operand): Fix format specifier warning.
	* 1750a.h (ASM_FILE_START): Don't discard pointer qualifier.
	* 1750a.md: Likewise.
	* gcc.c (init_gcc_specs): Wrap with ENABLE_SHARED_LIBGCC.
	* genemit.c (output_add_clobbers): Mark parameter with
	ATTRIBUTE_UNUSED.
	* genrecog.c (write_subroutine): Likewise.
	* integrate.c (expand_inline_function): Delete unused variable.
	* varasm.c (remove_from_pending_weak_list): Wrap with
	ASM_WEAKEN_LABEL.


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

10 files changed, 35 insertions, 15 deletions

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index cd0732cb8dd..4404282ddf4 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,17 @@
+2001-10-19  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
+
+	* calls.c (emit_call_1): Mark parameter with ATTRIBUTE_UNUSED.
+	* 1750a.c (print_operand): Fix format specifier warning.
+	* 1750a.h (ASM_FILE_START): Don't discard pointer qualifier.
+	* 1750a.md: Likewise.
+	* gcc.c (init_gcc_specs): Wrap with ENABLE_SHARED_LIBGCC.
+	* genemit.c (output_add_clobbers): Mark parameter with
+	ATTRIBUTE_UNUSED.
+	* genrecog.c (write_subroutine): Likewise.
+	* integrate.c (expand_inline_function): Delete unused variable.
+	* varasm.c (remove_from_pending_weak_list): Wrap with
+	ASM_WEAKEN_LABEL.
+
 2001-10-19  Jakub Jelinek  <jakub@redhat.com>
 
 	* simplify-rtx.c (simplify_plus_minus): Negate constant iff its neg
diff --git a/gcc/calls.c b/gcc/calls.c
index 5b5657fc1b9..5a4850242bc 100644
--- a/gcc/calls.c
+++ b/gcc/calls.c
@@ -449,7 +449,7 @@ emit_call_1 (funexp, fndecl, funtype, stack_size, rounded_stack_size,
      HOST_WIDE_INT stack_size ATTRIBUTE_UNUSED;
      HOST_WIDE_INT rounded_stack_size;
      HOST_WIDE_INT struct_value_size ATTRIBUTE_UNUSED;
-     rtx next_arg_reg;
+     rtx next_arg_reg ATTRIBUTE_UNUSED;
      rtx valreg;
      int old_inhibit_defer_pop;
      rtx call_fusage;
diff --git a/gcc/config/1750a/1750a.c b/gcc/config/1750a/1750a.c
index 4856de2a37a..8f2ba21b5e6 100644
--- a/gcc/config/1750a/1750a.c
+++ b/gcc/config/1750a/1750a.c
@@ -652,7 +652,7 @@ print_operand (file, x, letter)
 
     case CALL:
       fprintf (file, "CALL nargs=");
-      fprintf (file, HOST_PTR_PRINTF, XEXP (x, 1));
+      fprintf (file, HOST_PTR_PRINTF, (PTR) XEXP (x, 1));
       fprintf (file, ", func is either '%s' or '%s'",
 	       XSTR (XEXP (XEXP (x, 0), 1), 0), XSTR (XEXP (x, 0), 1));
       break;
diff --git a/gcc/config/1750a/1750a.h b/gcc/config/1750a/1750a.h
index ac6e7ee6335..07af4798b15 100644
--- a/gcc/config/1750a/1750a.h
+++ b/gcc/config/1750a/1750a.h
@@ -857,15 +857,16 @@ enum reg_class { NO_REGS, R2, R0_1, INDEX_REGS, BASE_REGS, ALL_REGS, LIM_REG_CLA
 /* Output at beginning of assembler file.  */
 
 #define ASM_FILE_START(FILE)   {					\
-   char *p, name[40];							\
-   if ((p = (char *)strrchr(main_input_filename,'/')) != NULL ? 1 :	\
-       (p = (char *)strrchr(main_input_filename,']')) != NULL)		\
+   char *p2, name[40];							\
+   const char *p;							\
+   if ((p = strrchr(main_input_filename,'/')) != NULL ? 1 :		\
+       (p = strrchr(main_input_filename,']')) != NULL)			\
 	p++;								\
    else									\
 	p = main_input_filename;					\
    strcpy(name,p);							\
-   if ((p = (char *)strchr(name,'.')))					\
-	*p = '\0';							\
+   if ((p2 = strchr(name,'.')))						\
+	*p2 = '\0';							\
    fprintf(FILE,"\tname %s\n",name); 					\
    fprintf(FILE,"\tnolist\n\tinclude \"ms1750.inc\"\n\tlist\n\n");	\
    fprintf(FILE,"\tglobal\t__main\n\n");  }
diff --git a/gcc/config/1750a/1750a.md b/gcc/config/1750a/1750a.md
index e9a4deb198e..1f4098f0f80 100644
--- a/gcc/config/1750a/1750a.md
+++ b/gcc/config/1750a/1750a.md
@@ -667,7 +667,7 @@
   ""
   "*
    {
-     char *istr;
+     const char *istr;
      switch(which_alternative)
        {
        case 0:
diff --git a/gcc/gcc.c b/gcc/gcc.c
index df036e9c7e9..504bba275ee 100644
--- a/gcc/gcc.c
+++ b/gcc/gcc.c
@@ -313,9 +313,11 @@ static int execute			PARAMS ((void));
 static void clear_args			PARAMS ((void));
 static void fatal_error			PARAMS ((int));
 static void set_input			PARAMS ((const char *));
+#ifdef ENABLE_SHARED_LIBGCC
 static void init_gcc_specs              PARAMS ((struct obstack *,
 						 const char *,
 						 const char *));
+#endif
 
 /* The Specs Language
 
@@ -1376,6 +1378,7 @@ static struct spec_list *specs = (struct spec_list *) 0;
 /* Add appropriate libgcc specs to OBSTACK, taking into account
    various permutations of -shared-libgcc, -shared, and such.  */
 
+#ifdef ENABLE_SHARED_LIBGCC
 static void
 init_gcc_specs (obstack, shared_name, static_name)
      struct obstack *obstack;
@@ -1401,6 +1404,7 @@ init_gcc_specs (obstack, shared_name, static_name)
 	   static_name);
   obstack_grow (obstack, buffer, strlen (buffer));
 }
+#endif /* ENABLE_SHARED_LIBGCC */
 
 /* Initialize the specs lookup routines.  */
 
diff --git a/gcc/genemit.c b/gcc/genemit.c
index 24d41874c51..34d671164cd 100644
--- a/gcc/genemit.c
+++ b/gcc/genemit.c
@@ -672,7 +672,7 @@ output_add_clobbers ()
   int i;
 
   printf ("\n\nvoid\nadd_clobbers (pattern, insn_code_number)\n");
-  printf ("     rtx pattern;\n     int insn_code_number;\n");
+  printf ("     rtx pattern ATTRIBUTE_UNUSED;\n     int insn_code_number;\n");
   printf ("{\n");
   printf ("  switch (insn_code_number)\n");
   printf ("    {\n");
diff --git a/gcc/genrecog.c b/gcc/genrecog.c
index 7e1d849c70b..4a3198b7ff2 100644
--- a/gcc/genrecog.c
+++ b/gcc/genrecog.c
@@ -2349,7 +2349,7 @@ write_subroutine (head, type)
       printf ("%sint recog%s PARAMS ((rtx, rtx, int *));\n", s_or_e, extension);
       printf ("%sint\n\
 recog%s (x0, insn, pnum_clobbers)\n\
-     rtx x0;\n\
+     rtx x0 ATTRIBUTE_UNUSED;\n\
      rtx insn ATTRIBUTE_UNUSED;\n\
      int *pnum_clobbers ATTRIBUTE_UNUSED;\n", s_or_e, extension);
       break;
@@ -2357,7 +2357,7 @@ recog%s (x0, insn, pnum_clobbers)\n\
       printf ("%srtx split%s PARAMS ((rtx, rtx));\n", s_or_e, extension);
       printf ("%srtx\n\
 split%s (x0, insn)\n\
-     rtx x0;\n\
+     rtx x0 ATTRIBUTE_UNUSED;\n\
      rtx insn ATTRIBUTE_UNUSED;\n", s_or_e, extension);
       break;
     case PEEPHOLE2:
@@ -2365,7 +2365,7 @@ split%s (x0, insn)\n\
 	      s_or_e, extension);
       printf ("%srtx\n\
 peephole2%s (x0, insn, _pmatch_len)\n\
-     rtx x0;\n\
+     rtx x0 ATTRIBUTE_UNUSED;\n\
      rtx insn ATTRIBUTE_UNUSED;\n\
      int *_pmatch_len ATTRIBUTE_UNUSED;\n", s_or_e, extension);
       break;
diff --git a/gcc/integrate.c b/gcc/integrate.c
index 8e1ff76b9fb..874029fbb9c 100644
--- a/gcc/integrate.c
+++ b/gcc/integrate.c
@@ -663,9 +663,6 @@ expand_inline_function (fndecl, parms, target, ignore, type,
   rtx stack_save = 0;
   rtx temp;
   struct inline_remap *map = 0;
-#ifdef HAVE_cc0
-  rtx cc0_insn = 0;
-#endif
   rtvec arg_vector = (rtvec) inl_f->original_arg_vector;
   rtx static_chain_value = 0;
   int inl_max_uid;
diff --git a/gcc/varasm.c b/gcc/varasm.c
index 0d6dc76c3a3..525d9c3e4b2 100644
--- a/gcc/varasm.c
+++ b/gcc/varasm.c
@@ -163,7 +163,9 @@ static void output_after_function_constants PARAMS ((void));
 static unsigned HOST_WIDE_INT array_size_for_constructor PARAMS ((tree));
 static unsigned min_align		PARAMS ((unsigned, unsigned));
 static void output_constructor		PARAMS ((tree, int, unsigned));
+#ifdef ASM_WEAKEN_LABEL
 static void remove_from_pending_weak_list	PARAMS ((const char *));
+#endif
 static int in_named_entry_eq		PARAMS ((const PTR, const PTR));
 static hashval_t in_named_entry_hash	PARAMS ((const PTR));
 #ifdef ASM_OUTPUT_BSS
@@ -5047,6 +5049,7 @@ weak_finish ()
 /* Remove NAME from the pending list of weak symbols.  This prevents
    the compiler from emitting multiple .weak directives which confuses
    some assemblers.  */
+#ifdef ASM_WEAKEN_LABEL
 static void
 remove_from_pending_weak_list (name)
      const char *name;
@@ -5066,6 +5069,7 @@ remove_from_pending_weak_list (name)
         p = &(t->next);
     }
 }
+#endif /* ASM_WEAKEN_LABEL */
 
 /* Emit an assembler directive to make the symbol for DECL an alias to
    the symbol for TARGET.  */