Fix PR gas/619
Alan Modra
amodra@bigpond.net.au
Wed Dec 29 10:21:00 GMT 2004
This one is a simple case of zapping part of the string we're parsing.
gas/ChangeLog
PR gas/619
* read.c (s_comm_internal): Don't zero end of name until size
expression has been parsed.
Index: gas/read.c
===================================================================
RCS file: /cvs/src/src/gas/read.c,v
retrieving revision 1.83
diff -u -p -r1.83 read.c
--- gas/read.c 7 Dec 2004 12:13:24 -0000 1.83
+++ gas/read.c 29 Dec 2004 10:19:38 -0000
@@ -1377,7 +1377,6 @@ s_comm_internal (int param,
if (*input_line_pointer == ',')
input_line_pointer++;
- *p = 0;
temp = get_absolute_expr (&exp);
size = temp;
#ifdef BFD_ASSEMBLER
@@ -1386,18 +1385,17 @@ s_comm_internal (int param,
if (exp.X_op == O_absent)
{
as_bad (_("missing size expression"));
- *p = c;
ignore_rest_of_line ();
goto out;
}
else if (temp != size || !exp.X_unsigned)
{
as_warn (_("size (%ld) out of range, ignored"), (long) temp);
- *p = c;
ignore_rest_of_line ();
goto out;
}
+ *p = 0;
symbolP = symbol_find_or_make (name);
if (S_IS_DEFINED (symbolP) && !S_IS_COMMON (symbolP))
{
--
Alan Modra
IBM OzLabs - Linux Technology Centre
More information about the Binutils
mailing list