* simops.c: Fix minor typos. Handle "cmp", "setf", "tst"
"di", and "ei" instructions correctly.
This commit is contained in:
parent
2108e86459
commit
3095b8dfc5
@ -1,5 +1,8 @@
|
|||||||
Thu Aug 29 13:53:29 1996 Jeffrey A Law (law@cygnus.com)
|
Thu Aug 29 13:53:29 1996 Jeffrey A Law (law@cygnus.com)
|
||||||
|
|
||||||
|
* simops.c: Fix minor typos. Handle "cmp", "setf", "tst"
|
||||||
|
"di", and "ei" instructions correctly.
|
||||||
|
|
||||||
* interp.c (do_format_3): Get operands correctly and call
|
* interp.c (do_format_3): Get operands correctly and call
|
||||||
the target function.
|
the target function.
|
||||||
* simops.c: Handle bCC instructions.
|
* simops.c: Handle bCC instructions.
|
||||||
|
@ -401,7 +401,6 @@ OP_1A0 ()
|
|||||||
State.psw &= ~(PSW_Z | PSW_S | PSW_CY | PSW_OV);
|
State.psw &= ~(PSW_Z | PSW_S | PSW_CY | PSW_OV);
|
||||||
State.psw |= ((z ? PSW_Z : 0) | (s ? PSW_S : 0)
|
State.psw |= ((z ? PSW_Z : 0) | (s ? PSW_S : 0)
|
||||||
| (cy ? PSW_CY : 0) | (ov ? PSW_OV : 0));
|
| (cy ? PSW_CY : 0) | (ov ? PSW_OV : 0));
|
||||||
State.regs[OP[1]] = State.regs[OP[0]];
|
|
||||||
}
|
}
|
||||||
|
|
||||||
/* subr reg1, reg2 */
|
/* subr reg1, reg2 */
|
||||||
@ -498,6 +497,145 @@ OP_40 ()
|
|||||||
| (ov ? PSW_OV : 0));
|
| (ov ? PSW_OV : 0));
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/* cmp reg, reg */
|
||||||
|
void
|
||||||
|
OP_1E0 ()
|
||||||
|
{
|
||||||
|
unsigned int op0, op1, result, z, s, cy, ov;
|
||||||
|
|
||||||
|
/* Compute the result. */
|
||||||
|
op0 = State.regs[OP[0]];
|
||||||
|
op1 = State.regs[OP[1]];
|
||||||
|
result = op1 - op0;
|
||||||
|
|
||||||
|
/* Compute the condition codes. */
|
||||||
|
z = (result == 0);
|
||||||
|
s = (result & 0x80000000);
|
||||||
|
cy = (result < -op0);
|
||||||
|
ov = ((op1 & 0x80000000) != (op0 & 0x80000000)
|
||||||
|
&& (op1 & 0x80000000) != (result & 0x80000000));
|
||||||
|
|
||||||
|
/* Set condition codes. */
|
||||||
|
State.psw &= ~(PSW_Z | PSW_S | PSW_CY | PSW_OV);
|
||||||
|
State.psw |= ((z ? PSW_Z : 0) | (s ? PSW_S : 0)
|
||||||
|
| (cy ? PSW_CY : 0) | (ov ? PSW_OV : 0));
|
||||||
|
}
|
||||||
|
|
||||||
|
/* cmp sign_extend(imm5), reg */
|
||||||
|
void
|
||||||
|
OP_260 ()
|
||||||
|
{
|
||||||
|
unsigned int op0, op1, result, z, s, cy, ov;
|
||||||
|
int temp;
|
||||||
|
|
||||||
|
/* Compute the result. */
|
||||||
|
temp = OP[0];
|
||||||
|
temp = (temp << 27) >> 27;
|
||||||
|
op0 = temp;
|
||||||
|
op1 = State.regs[OP[1]];
|
||||||
|
result = op1 - op0;
|
||||||
|
|
||||||
|
/* Compute the condition codes. */
|
||||||
|
z = (result == 0);
|
||||||
|
s = (result & 0x80000000);
|
||||||
|
cy = (result < -op0);
|
||||||
|
ov = ((op1 & 0x80000000) != (op0 & 0x80000000)
|
||||||
|
&& (op1 & 0x80000000) != (result & 0x80000000));
|
||||||
|
|
||||||
|
/* Set condition codes. */
|
||||||
|
State.psw &= ~(PSW_Z | PSW_S | PSW_CY | PSW_OV);
|
||||||
|
State.psw |= ((z ? PSW_Z : 0) | (s ? PSW_S : 0)
|
||||||
|
| (cy ? PSW_CY : 0) | (ov ? PSW_OV : 0));
|
||||||
|
}
|
||||||
|
|
||||||
|
/* setf cccc,reg2 */
|
||||||
|
void
|
||||||
|
OP_7E0 ()
|
||||||
|
{
|
||||||
|
/* Hack alert. We turn off a bit in op0 since we really only
|
||||||
|
wanted 4 bits. */
|
||||||
|
unsigned int op0, psw, result;
|
||||||
|
|
||||||
|
op0 = OP[0] & 0xf;
|
||||||
|
psw = State.psw;
|
||||||
|
|
||||||
|
switch (op0)
|
||||||
|
{
|
||||||
|
case 0x0:
|
||||||
|
result = ((psw & PSW_OV) != 0);
|
||||||
|
break;
|
||||||
|
case 0x1:
|
||||||
|
result = ((psw & PSW_CY) != 0);
|
||||||
|
break;
|
||||||
|
case 0x2:
|
||||||
|
result = ((psw & PSW_Z) != 0);
|
||||||
|
break;
|
||||||
|
case 0x3:
|
||||||
|
result = ((((psw & PSW_CY) != 0) | ((psw & PSW_Z) != 0)) != 0);
|
||||||
|
break;
|
||||||
|
case 0x4:
|
||||||
|
result = ((psw & PSW_S) != 0);
|
||||||
|
break;
|
||||||
|
case 0x5:
|
||||||
|
result = 1;
|
||||||
|
break;
|
||||||
|
case 0x6:
|
||||||
|
result = ((((psw & PSW_S) != 0) ^ ((psw & PSW_OV) != 0)) != 0);
|
||||||
|
break;
|
||||||
|
case 0x7:
|
||||||
|
result = (((((psw & PSW_S) != 0) ^ ((psw & PSW_OV) != 0))
|
||||||
|
|| ((psw & PSW_Z) != 0)) != 0);
|
||||||
|
break;
|
||||||
|
case 0x8:
|
||||||
|
result = ((psw & PSW_OV) == 0);
|
||||||
|
break;
|
||||||
|
case 0x9:
|
||||||
|
result = ((psw & PSW_CY) == 0);
|
||||||
|
break;
|
||||||
|
case 0xa:
|
||||||
|
result = ((psw & PSW_Z) == 0);
|
||||||
|
break;
|
||||||
|
case 0xb:
|
||||||
|
result = ((((psw & PSW_CY) != 0) | ((psw & PSW_Z) != 0)) == 0);
|
||||||
|
break;
|
||||||
|
case 0xc:
|
||||||
|
result = ((psw & PSW_S) == 0);
|
||||||
|
break;
|
||||||
|
case 0xd:
|
||||||
|
result = ((psw & PSW_SAT) != 0);
|
||||||
|
break;
|
||||||
|
case 0xe:
|
||||||
|
result = ((((psw & PSW_S) != 0) ^ ((psw & PSW_OV) != 0)) == 0);
|
||||||
|
break;
|
||||||
|
case 0xf:
|
||||||
|
result = (((((psw & PSW_S) != 0) ^ ((psw & PSW_OV) != 0))
|
||||||
|
|| ((psw & PSW_Z) != 0)) == 0);
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
|
||||||
|
State.regs[OP[1]] = result;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* tst reg,reg */
|
||||||
|
void
|
||||||
|
OP_160 ()
|
||||||
|
{
|
||||||
|
unsigned int op0, op1, result, z, s, cy, ov;
|
||||||
|
|
||||||
|
/* Compute the result. */
|
||||||
|
op0 = State.regs[OP[0]];
|
||||||
|
op1 = State.regs[OP[1]];
|
||||||
|
result = op0 & op1;
|
||||||
|
|
||||||
|
/* Compute the condition codes. */
|
||||||
|
z = (result == 0);
|
||||||
|
s = (result & 0x80000000);
|
||||||
|
|
||||||
|
/* Store the condition codes. */
|
||||||
|
State.psw &= ~(PSW_Z | PSW_S | PSW_OV);
|
||||||
|
State.psw |= ((z ? PSW_Z : 0) | (s ? PSW_S : 0));
|
||||||
|
}
|
||||||
|
|
||||||
void
|
void
|
||||||
OP_10720 ()
|
OP_10720 ()
|
||||||
{
|
{
|
||||||
@ -578,21 +716,11 @@ OP_1687E0 ()
|
|||||||
{
|
{
|
||||||
}
|
}
|
||||||
|
|
||||||
void
|
|
||||||
OP_1E0 ()
|
|
||||||
{
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
void
|
||||||
OP_A0 ()
|
OP_A0 ()
|
||||||
{
|
{
|
||||||
}
|
}
|
||||||
|
|
||||||
void
|
|
||||||
OP_260 ()
|
|
||||||
{
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
void
|
||||||
OP_740 ()
|
OP_740 ()
|
||||||
{
|
{
|
||||||
@ -745,11 +873,6 @@ OP_47C0 ()
|
|||||||
{
|
{
|
||||||
}
|
}
|
||||||
|
|
||||||
void
|
|
||||||
OP_7E0 ()
|
|
||||||
{
|
|
||||||
}
|
|
||||||
|
|
||||||
/* or reg, reg */
|
/* or reg, reg */
|
||||||
void
|
void
|
||||||
OP_100 ()
|
OP_100 ()
|
||||||
@ -912,18 +1035,18 @@ OP_501 ()
|
|||||||
{
|
{
|
||||||
}
|
}
|
||||||
|
|
||||||
/* di, not supported */
|
/* di */
|
||||||
void
|
void
|
||||||
OP_16007E0 ()
|
OP_16007E0 ()
|
||||||
{
|
{
|
||||||
abort ();
|
State.psw |= PSW_ID;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* ei, not supported */
|
/* ei */
|
||||||
void
|
void
|
||||||
OP_16087E0 ()
|
OP_16087E0 ()
|
||||||
{
|
{
|
||||||
abort ();
|
State.psw &= ~PSW_ID;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* halt, not supported */
|
/* halt, not supported */
|
||||||
@ -966,11 +1089,6 @@ OP_400 ()
|
|||||||
{
|
{
|
||||||
}
|
}
|
||||||
|
|
||||||
void
|
|
||||||
OP_160 ()
|
|
||||||
{
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
void
|
||||||
OP_700 ()
|
OP_700 ()
|
||||||
{
|
{
|
||||||
|
Loading…
Reference in New Issue
Block a user