mirror of
https://github.com/espressif/binutils-gdb.git
synced 2025-06-21 10:34:21 +08:00
m68k_ip: for pc-rel addressing of a symbol, fix offset so +2 isn't needed
This commit is contained in:
@ -22,7 +22,6 @@
|
|||||||
#include <ctype.h>
|
#include <ctype.h>
|
||||||
#define NO_RELOC 0
|
#define NO_RELOC 0
|
||||||
#include "as.h"
|
#include "as.h"
|
||||||
#include "read.h"
|
|
||||||
|
|
||||||
#include "obstack.h"
|
#include "obstack.h"
|
||||||
|
|
||||||
@ -360,10 +359,15 @@ static struct m68k_it the_ins; /* the instruction being assembled */
|
|||||||
)
|
)
|
||||||
|
|
||||||
|
|
||||||
/* The numo+1 kludge is so we can hit the low order byte of the prev word. Blecch*/
|
/* The numo+1 kludge is so we can hit the low order byte of the prev word.
|
||||||
#define add_fix(width,exp,pc_rel) {\
|
Blecch. */
|
||||||
the_ins.reloc[the_ins.nrel].n= ((width)=='B') ? (the_ins.numo*2-1) : \
|
#define add_fix(width,exp,pc_rel) \
|
||||||
(((width)=='b') ? ((the_ins.numo-1)*2) : (the_ins.numo*2));\
|
{\
|
||||||
|
the_ins.reloc[the_ins.nrel].n= (((width)=='B') \
|
||||||
|
? (the_ins.numo*2-1) \
|
||||||
|
: (((width)=='b') \
|
||||||
|
? ((the_ins.numo-1)*2) \
|
||||||
|
: (the_ins.numo*2)));\
|
||||||
the_ins.reloc[the_ins.nrel].add=adds((exp));\
|
the_ins.reloc[the_ins.nrel].add=adds((exp));\
|
||||||
the_ins.reloc[the_ins.nrel].sub=subs((exp));\
|
the_ins.reloc[the_ins.nrel].sub=subs((exp));\
|
||||||
the_ins.reloc[the_ins.nrel].off=offs((exp));\
|
the_ins.reloc[the_ins.nrel].off=offs((exp));\
|
||||||
@ -371,7 +375,8 @@ static struct m68k_it the_ins; /* the instruction being assembled */
|
|||||||
the_ins.reloc[the_ins.nrel++].pcrel=pc_rel;\
|
the_ins.reloc[the_ins.nrel++].pcrel=pc_rel;\
|
||||||
}
|
}
|
||||||
|
|
||||||
#define add_frag(add,off,type) {\
|
#define add_frag(add,off,type) \
|
||||||
|
{\
|
||||||
the_ins.fragb[the_ins.nfrag].fragoff=the_ins.numo;\
|
the_ins.fragb[the_ins.nfrag].fragoff=the_ins.numo;\
|
||||||
the_ins.fragb[the_ins.nfrag].fadd=add;\
|
the_ins.fragb[the_ins.nfrag].fadd=add;\
|
||||||
the_ins.fragb[the_ins.nfrag].foff=off;\
|
the_ins.fragb[the_ins.nfrag].foff=off;\
|
||||||
@ -2196,13 +2201,11 @@ m68k_ip (instring)
|
|||||||
nextword = get_num (opP->con1, 80);
|
nextword = get_num (opP->con1, 80);
|
||||||
/* Force into index mode. Hope this works */
|
/* Force into index mode. Hope this works */
|
||||||
|
|
||||||
/* We do the first bit for 32-bit displacements,
|
/* We do the first bit for 32-bit displacements, and the
|
||||||
and the second bit for 16 bit ones. It is
|
second bit for 16 bit ones. It is possible that we
|
||||||
possible that we should make the default be
|
should make the default be WORD instead of LONG, but
|
||||||
WORD instead of LONG, but I think that'd
|
I think that'd break GCC, so we put up with a little
|
||||||
break GCC, so we put up with a little
|
inefficiency for the sake of working output. */
|
||||||
inefficiency for the sake of working output.
|
|
||||||
*/
|
|
||||||
|
|
||||||
if (!issword (nextword)
|
if (!issword (nextword)
|
||||||
|| (isvar (opP->con1)
|
|| (isvar (opP->con1)
|
||||||
@ -2220,7 +2223,7 @@ m68k_ip (instring)
|
|||||||
if (opP->reg == PC)
|
if (opP->reg == PC)
|
||||||
{
|
{
|
||||||
add_frag (adds (opP->con1),
|
add_frag (adds (opP->con1),
|
||||||
offs (opP->con1),
|
offs (opP->con1) + 2,
|
||||||
TAB (PCLEA, SZ_UNDEF));
|
TAB (PCLEA, SZ_UNDEF));
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
@ -4389,7 +4392,7 @@ tc_aout_fix_to_chars (where, fixP, segment_address_in_file)
|
|||||||
* Out: GNU LD relocation length code: 0, 1, or 2.
|
* Out: GNU LD relocation length code: 0, 1, or 2.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
static unsigned char nbytes_r_length[] =
|
static CONST unsigned char nbytes_r_length[] =
|
||||||
{42, 0, 1, 42, 2};
|
{42, 0, 1, 42, 2};
|
||||||
long r_symbolnum;
|
long r_symbolnum;
|
||||||
|
|
||||||
@ -4793,28 +4796,23 @@ md_parse_option (argP, cntP, vecP)
|
|||||||
omagic = 1 << 16 | OMAGIC;
|
omagic = 1 << 16 | OMAGIC;
|
||||||
#endif
|
#endif
|
||||||
current_architecture |= m68010;
|
current_architecture |= m68010;
|
||||||
|
|
||||||
}
|
}
|
||||||
else if (!strcmp (*argP, "68020"))
|
else if (!strcmp (*argP, "68020"))
|
||||||
{
|
{
|
||||||
current_architecture |= m68020 | MAYBE_FLOAT_TOO;
|
current_architecture |= m68020 | MAYBE_FLOAT_TOO;
|
||||||
|
|
||||||
}
|
}
|
||||||
else if (!strcmp (*argP, "68030"))
|
else if (!strcmp (*argP, "68030"))
|
||||||
{
|
{
|
||||||
current_architecture |= m68030 | MAYBE_FLOAT_TOO;
|
current_architecture |= m68030 | MAYBE_FLOAT_TOO;
|
||||||
|
|
||||||
}
|
}
|
||||||
else if (!strcmp (*argP, "68040"))
|
else if (!strcmp (*argP, "68040"))
|
||||||
{
|
{
|
||||||
current_architecture |= m68040 | MAYBE_FLOAT_TOO;
|
current_architecture |= m68040 | MAYBE_FLOAT_TOO;
|
||||||
|
|
||||||
#ifndef NO_68881
|
#ifndef NO_68881
|
||||||
}
|
}
|
||||||
else if (!strcmp (*argP, "68881"))
|
else if (!strcmp (*argP, "68881"))
|
||||||
{
|
{
|
||||||
current_architecture |= m68881;
|
current_architecture |= m68881;
|
||||||
|
|
||||||
}
|
}
|
||||||
else if (!strcmp (*argP, "68882"))
|
else if (!strcmp (*argP, "68882"))
|
||||||
{
|
{
|
||||||
@ -4961,46 +4959,6 @@ is_label (str)
|
|||||||
|
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#ifdef DONTDEF
|
|
||||||
abort ()
|
|
||||||
{
|
|
||||||
printf ("ABORT!\n");
|
|
||||||
exit (12);
|
|
||||||
}
|
|
||||||
|
|
||||||
print_frags ()
|
|
||||||
{
|
|
||||||
fragS *fragP;
|
|
||||||
extern fragS *text_frag_root;
|
|
||||||
|
|
||||||
for (fragP = text_frag_root; fragP; fragP = fragP->fr_next)
|
|
||||||
{
|
|
||||||
printf ("addr %lu next 0x%x fix %ld var %ld symbol 0x%x offset %ld\n",
|
|
||||||
fragP->fr_address, fragP->fr_next, fragP->fr_fix, fragP->fr_var, fragP->fr_symbol, fragP->fr_offset);
|
|
||||||
printf ("opcode 0x%x type %d subtype %d\n\n", fragP->fr_opcode, fragP->fr_type, fragP->fr_subtype);
|
|
||||||
}
|
|
||||||
fflush (stdout);
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#ifdef DONTDEF
|
|
||||||
/*VARARGS1*/
|
|
||||||
panic (format, args)
|
|
||||||
char *format;
|
|
||||||
{
|
|
||||||
fputs ("Internal error:", stderr);
|
|
||||||
_doprnt (format, &args, stderr);
|
|
||||||
(void) putc ('\n', stderr);
|
|
||||||
as_where ();
|
|
||||||
abort ();
|
|
||||||
}
|
|
||||||
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* We have no need to default values of symbols. */
|
/* We have no need to default values of symbols. */
|
||||||
|
|
||||||
/* ARGSUSED */
|
/* ARGSUSED */
|
||||||
@ -5064,11 +5022,4 @@ tc_coff_sizemachdep (frag)
|
|||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
/*
|
|
||||||
* Local Variables:
|
|
||||||
* comment-column: 0
|
|
||||||
* fill-column: 131
|
|
||||||
* End:
|
|
||||||
*/
|
|
||||||
|
|
||||||
/* end of tc-m68k.c */
|
/* end of tc-m68k.c */
|
||||||
|
Reference in New Issue
Block a user