This is the mail archive of the
binutils@sources.redhat.com
mailing list for the binutils project.
silence more gas warnings
- From: Alan Modra <amodra at bigpond dot net dot au>
- To: binutils at sources dot redhat dot com
- Date: Fri, 18 Feb 2005 10:51:01 +1030
- Subject: silence more gas warnings
* 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