FreeChainXenon/binutils-gdb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix net-equip pr 2975: tm-m68k.c(m68k_ip): adjust for pc-rel offset before using value, not after

Browse source
This commit is contained in:
Ken Raeburn 1993-07-19 16:49:01 +00:00
parent c4161ca8c2
commit 9d4dfbf379
2 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gas/ChangeLog
View file

@ -1,3 +1,9 @@
Mon Jul 19 12:35:39 1993 Ken Raeburn (raeburn@cambridge.cygnus.com)
* config/tc-m68k.c (m68k_ip, case AINDX): Add 6 to operand
expression (to take the pc-rel instruction itself into account)
before using the expression, instead of after.
Fri Jul 16 08:56:04 1993 Ian Lance Taylor (ian@cygnus.com) Fri Jul 16 08:56:04 1993 Ian Lance Taylor (ian@cygnus.com)
* read.c (float_cons): Simplified parsing logic. If * read.c (float_cons): Simplified parsing logic. If

4
gas/config/tc-m68k.c
View file

@ -2443,8 +2443,8 @@ m68k_ip (instring)
{ {
if (opP->reg == PC || opP->reg == ZPC) if (opP->reg == PC || opP->reg == ZPC)
{ {
add_fix (siz1 == 3 ? 'l' : 'w', opP->con1, 1);
opP->con1->e_exp.X_add_number += 6; opP->con1->e_exp.X_add_number += 6;
add_fix (siz1 == 3 ? 'l' : 'w', opP->con1, 1);
} }
else else
add_fix (siz1 == 3 ? 'l' : 'w', opP->con1, 0); add_fix (siz1 == 3 ? 'l' : 'w', opP->con1, 0);
@ -2458,8 +2458,8 @@ m68k_ip (instring)
{ {
if (opP->reg == PC || opP->reg == ZPC) if (opP->reg == PC || opP->reg == ZPC)
{ {
add_fix (siz2 == 3 ? 'l' : 'w', opP->con2, 1);
opP->con1->e_exp.X_add_number += 6; opP->con1->e_exp.X_add_number += 6;
add_fix (siz2 == 3 ? 'l' : 'w', opP->con2, 1);
} }
else else
add_fix (siz2 == 3 ? 'l' : 'w', opP->con2, 0); add_fix (siz2 == 3 ? 'l' : 'w', opP->con2, 0);