assembling of (xxx,a6) addressing mode was wrong for large values of xxx
This commit is contained in:
parent
8eff53f8ea
commit
c70195a81e
|
@ -317,8 +317,15 @@ code_instr( opcode, field1, field2, eaddr)
|
|||
int opcode, field1, field2;
|
||||
struct t_operand *eaddr;
|
||||
{
|
||||
code_opcode( opcode, field1, field2, eaddr);
|
||||
code_extension( eaddr);
|
||||
if (eaddr->type == IS_IND_REG_DISPL) {
|
||||
@__instr_code(%d(((opcode & 0xf) << 12) | ((field1 & 0x7) << 9) |
|
||||
((field2 & 0x7) << 6)),
|
||||
%d(eaddr->reg), %$(eaddr->expr));
|
||||
}
|
||||
else {
|
||||
code_opcode( opcode, field1, field2, eaddr);
|
||||
code_extension( eaddr);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
@ -326,10 +333,27 @@ code_move( size, src, dst)
|
|||
int size;
|
||||
struct t_operand *src, *dst;
|
||||
{
|
||||
@text2( %d( ((size & 0x3) << 12) | ((reg_mode( dst) & 0x3f) << 6) |
|
||||
if (src->type == IS_IND_REG_DISPL) {
|
||||
if (dst->type == IS_IND_REG_DISPL) {
|
||||
@__moveXX(%d( ((size & 0x3) << 12)),
|
||||
%d(dst->reg), %$(dst->expr),
|
||||
%d(src->reg), %$(src->expr));
|
||||
}
|
||||
else {
|
||||
@__instr_code(%d( ((size & 0x3) << 12)|((reg_mode( dst) & 0x3f) << 6)),
|
||||
%d(src->reg), %$(src->expr));
|
||||
}
|
||||
}
|
||||
else if (dst->type == IS_IND_REG_DISPL) {
|
||||
@__move_X(%d( ((size & 0x3) << 12) | (mode_reg( src) & 0x3f)),
|
||||
%d(dst->reg), %$(dst->expr));
|
||||
}
|
||||
else {
|
||||
@text2( %d( ((size & 0x3) << 12) | ((reg_mode( dst) & 0x3f) << 6) |
|
||||
(mode_reg( src) & 0x3f)));
|
||||
code_extension( src);
|
||||
code_extension( dst);
|
||||
code_extension( src);
|
||||
code_extension( dst);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
|
|
@ -31,3 +31,44 @@ char *filename;
|
|||
#define FL_MSW_AT_LOW_ADDRESS 1
|
||||
#define FL_MSB_AT_LOW_ADDRESS 1
|
||||
#include <con_float>
|
||||
|
||||
__instr_code(code, reg, off)
|
||||
{
|
||||
if (off <= 32767 & off >= -32768) {
|
||||
text2(code|0x28|reg);
|
||||
text2(off);
|
||||
return;
|
||||
}
|
||||
text2(code|0x30|reg);
|
||||
text2(0x0170);
|
||||
text4(off);
|
||||
}
|
||||
|
||||
__move_X(code, reg, off)
|
||||
{
|
||||
if (off <= 32767 & off >= -32768) {
|
||||
text2(code|(reg<<9)|0x140);
|
||||
text2(off);
|
||||
return;
|
||||
}
|
||||
text2(code|(reg<<9)|0x180);
|
||||
text2(0x0170);
|
||||
text4(off);
|
||||
}
|
||||
|
||||
__moveXX(code, srcreg, srcoff, dstreg, dstoff)
|
||||
{
|
||||
if (srcoff <= 32767 && srcoff >= -32768) {
|
||||
__move_X(code|0x28|srcreg, dstreg, dstoff);
|
||||
return;
|
||||
}
|
||||
if (dstoff <= 32767 && dstoff >= -32768) {
|
||||
__instr_code(code|0x140|(dstreg<<9), srcreg, srcoff);
|
||||
return;
|
||||
}
|
||||
text2(code|(dstreg<<9)|srcreg|0x180|0x30);
|
||||
text2(0x0170);
|
||||
text4(srcoff);
|
||||
text2(0x0170);
|
||||
text4(dstoff);
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue