* 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.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index ebf77e72d072fd44a02070f6a9c99dd52bcbb1d4..101e1e581d863285af317f411e492bb8cce95651 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,9 @@
+2005-02-18  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.
+
 2005-02-17  H.J. Lu  <hongjiu.lu@intel.com>
 
        * NEWS: Mention "-mhint.b=[ok|warning|error]".

diff --git a/gas/config/tc-openrisc.c b/gas/config/tc-openrisc.c
index 9a2f142ccdd833a8a62365b2d58c1f02dfd265b5..194fe4ba348aa2ac20c67a18542b3faf44acb3d4 100644 (file)
--- a/gas/config/tc-openrisc.c
+++ b/gas/config/tc-openrisc.c
@@ -1,5 +1,5 @@
 /* tc-openrisc.c -- Assembler for the OpenRISC family.
-   Copyright 2001, 2002, 2003 Free Software Foundation.
+   Copyright 2001, 2002, 2003, 2005 Free Software Foundation.
    Contributed by Johan Rydberg, jrydberg@opencores.org
 
    This file is part of GAS, the GNU Assembler.
@@ -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.

diff --git a/gas/config/tc-sparc.c b/gas/config/tc-sparc.c
index 49f218afb128d39fca92423f074e29c0e5c8d45a..fe361a1b1f0ce7812e19383fe162f559a6c9c67d 100644 (file)
--- a/gas/config/tc-sparc.c
+++ b/gas/config/tc-sparc.c
@@ -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.  */

diff --git a/gas/config/tc-tic80.c b/gas/config/tc-tic80.c
index 5d86f82d6ff203aa31aeb2111e60c216ada63826..af4ceb40c72dbf471778c17bacb03efcadc97aa6 100644 (file)
--- a/gas/config/tc-tic80.c
+++ b/gas/config/tc-tic80.c
@@ -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.  */