darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

* config/tc-sh.c (parse_at): Reject @(r0) and @(r0,).

Browse source
This commit is contained in:
Alexandre Oliva 2001-12-20 17:28:13 +00:00
parent 2c283bc467
commit 8d4d84c202
2 changed files with 30 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gas/ChangeLog
View file

@ -1,3 +1,7 @@
2001-12-20 Alexandre Oliva <aoliva@redhat.com>
* config/tc-sh.c (parse_at): Reject @(r0) and @(r0,).
2001-12-20 matthew green <mrg@redhat.com>
* config/tc-ppc.c (md_parse_option): Make -maltivec default

39
gas/config/tc-sh.c
View file

@ -914,7 +914,7 @@ parse_at (src, op)
else if (src[0] == '(')
{
/* Could be @(disp, rn), @(disp, gbr), @(disp, pc), @(r0, gbr) or
@(r0, rn) */
@(r0, rn). */
src++;
len = parse_reg (src, &mode, &(op->reg));
if (len && mode == A_REG_N)
@ -925,29 +925,42 @@ parse_at (src, op)
as_bad (_("must be @(r0,...)"));
}
if (src[0] == ',')
src++;
/* Now can be rn or gbr */
len = parse_reg (src, &mode, &(op->reg));
if (mode == A_GBR)
{
op->type = A_R0_GBR;
}
else if (mode == A_REG_N)
{
op->type = A_IND_R0_REG_N;
src++;
/* Now can be rn or gbr. */
len = parse_reg (src, &mode, &(op->reg));
}
else
{
as_bad (_("syntax error in @(r0,...)"));
len = 0;
}
if (len)
{
if (mode == A_GBR)
{
op->type = A_R0_GBR;
}
else if (mode == A_REG_N)
{
op->type = A_IND_R0_REG_N;
}
else
{
as_bad (_("syntax error in @(r0,...)"));
}
}
else
{
as_bad (_("syntax error in @(r0...)"));
}
}
else
{
/* Must be an @(disp,.. thing) */
/* Must be an @(disp,.. thing). */
src = parse_exp (src, op);
if (src[0] == ',')
src++;
/* Now can be rn, gbr or pc */
/* Now can be rn, gbr or pc. */
len = parse_reg (src, &mode, &op->reg);
if (len)
{