mirror of
https://github.com/simh/simh.git
synced 2026-04-17 16:44:15 +00:00
alpha: Fixed reversed definitions of FTOIS, FTOIT (Maurice Marks)
This commit is contained in:
committed by
Mark Pizzolato
parent
d074853138
commit
bd0cad685c
@@ -23,6 +23,7 @@
|
|||||||
used in advertising or otherwise to promote the sale, use or other dealings
|
used in advertising or otherwise to promote the sale, use or other dealings
|
||||||
in this Software without prior written authorization from Robert M Supnik.
|
in this Software without prior written authorization from Robert M Supnik.
|
||||||
|
|
||||||
|
05-Oct-2017 RMS Fixed reversed definitions of FTOIS, FTOIT (Maurice Marks)
|
||||||
27-May-2017 RMS Fixed MIN/MAXx4 iteration counts (Mark Pizzolato)
|
27-May-2017 RMS Fixed MIN/MAXx4 iteration counts (Mark Pizzolato)
|
||||||
26-May-2017 RMS Fixed other reversed definitions in opcode 12
|
26-May-2017 RMS Fixed other reversed definitions in opcode 12
|
||||||
28-Apr-2017 RMS Fixed reversed definitions of INSQH, EXTQH (Maurice Marks)
|
28-Apr-2017 RMS Fixed reversed definitions of INSQH, EXTQH (Maurice Marks)
|
||||||
@@ -1498,18 +1499,18 @@ while (reason == 0) {
|
|||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
case 0x70: /* FTOIS */
|
case 0x70: /* FTOIT */
|
||||||
if (!(arch_mask & AMASK_FIX)) ABORT (EXC_RSVI);
|
|
||||||
if (fpen == 0) ABORT (EXC_FPDIS); /* flt point disabled? */
|
|
||||||
res = op_sts (FR[ra]);
|
|
||||||
break;
|
|
||||||
|
|
||||||
case 0x78: /* FTOIT */
|
|
||||||
if (!(arch_mask & AMASK_FIX)) ABORT (EXC_RSVI);
|
if (!(arch_mask & AMASK_FIX)) ABORT (EXC_RSVI);
|
||||||
if (fpen == 0) ABORT (EXC_FPDIS); /* flt point disabled? */
|
if (fpen == 0) ABORT (EXC_FPDIS); /* flt point disabled? */
|
||||||
res = FR[ra];
|
res = FR[ra];
|
||||||
break;
|
break;
|
||||||
|
|
||||||
|
case 0x78: /* FTOIS */
|
||||||
|
if (!(arch_mask & AMASK_FIX)) ABORT (EXC_RSVI);
|
||||||
|
if (fpen == 0) ABORT (EXC_FPDIS); /* flt point disabled? */
|
||||||
|
res = op_sts (FR[ra]);
|
||||||
|
break;
|
||||||
|
|
||||||
default:
|
default:
|
||||||
ABORT (EXC_RSVI);
|
ABORT (EXC_RSVI);
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user