silence more gas warnings

[Alan Modra <amodra@bigpond.net.au>]

	* config/tc-openrisc.c (openrisc_relax_frag): Delete unused function.
	* config/tc-sparc.c (sparc_ip): Make op_exp static to silence warnings.
	* config/tc-tic80.c (build_insn): Init insn[1] to silence warning.

Index: gas/config/tc-openrisc.c
===================================================================
RCS file: /cvs/src/src/gas/config/tc-openrisc.c,v
retrieving revision 1.10
diff -u -p -r1.10 tc-openrisc.c
--- gas/config/tc-openrisc.c	31 Jan 2005 23:18:33 -0000	1.10
+++ gas/config/tc-openrisc.c	18 Feb 2005 00:18:37 -0000
@@ -211,49 +211,6 @@ const relax_typeS md_relax_table[] =
   {0x2000000 - 1 - 2, -0x2000000 - 2, 4, 0 }
 };
 
-long
-openrisc_relax_frag (segment, fragP, stretch)
-     segT    segment;
-     fragS * fragP;
-     long    stretch;
-{
-  /* Address of branch insn.  */
-  long address = fragP->fr_address + fragP->fr_fix - 2;
-  long growth = 0;
-
-  /* Keep 32 bit insns aligned on 32 bit boundaries.  */
-  if (fragP->fr_subtype == 2)
-    {
-      if ((address & 3) != 0)
-	{
-	  fragP->fr_subtype = 3;
-	  growth = 2;
-	}
-    }
-  else if (fragP->fr_subtype == 3)
-    {
-      if ((address & 3) == 0)
-	{
-	  fragP->fr_subtype = 2;
-	  growth = -2;
-	}
-    }
-  else
-    {
-      growth = relax_frag (segment, fragP, stretch);
-
-      /* Long jump on odd halfword boundary?  */
-      if (fragP->fr_subtype == 2 && (address & 3) != 0)
-	{
-	  fragP->fr_subtype = 3;
-	  growth += 2;
-	}
-    }
-
-  return growth;
-}
-
-
 /* Return an initial guess of the length by which a fragment must grow to
    hold a branch to reach its destination.
    Also updates fr_type/fr_subtype as necessary.
Index: gas/config/tc-sparc.c
===================================================================
RCS file: /cvs/src/src/gas/config/tc-sparc.c,v
retrieving revision 1.53
diff -u -p -r1.53 tc-sparc.c
--- gas/config/tc-sparc.c	17 Feb 2005 13:46:04 -0000	1.53
+++ gas/config/tc-sparc.c	18 Feb 2005 00:18:38 -0000
@@ -2231,7 +2231,7 @@ sparc_ip (str, pinsn)
 	      {
 		char *s1;
 		char *op_arg = NULL;
-		expressionS op_exp;
+		static expressionS op_exp;
 		bfd_reloc_code_real_type old_reloc = the_insn.reloc;
 
 		/* Check for %hi, etc.  */
Index: gas/config/tc-tic80.c
===================================================================
RCS file: /cvs/src/src/gas/config/tc-tic80.c,v
retrieving revision 1.11
diff -u -p -r1.11 tc-tic80.c
--- gas/config/tc-tic80.c	31 Jan 2005 23:18:34 -0000	1.11
+++ gas/config/tc-tic80.c	18 Feb 2005 00:18:38 -0000
@@ -490,6 +490,7 @@ build_insn (opcode, opers)
 
   /* Start with the raw opcode bits from the opcode table.  */
   insn[0] = opcode->opcode;
+  insn[1] = 0;
 
   /* We are going to insert at least one 32 bit opcode so get the
      frag now.  */

-- 
Alan Modra
IBM OzLabs - Linux Technology Centre