github.com/open-simh.simh
1
0
Fork 0
mirror of https://github.com/open-simh/simh.git synced 2026-01-13 15:27:46 +00:00
Code Issues Projects Releases Wiki Activity

VAX: Add idle support for VMS V5.0 and V5.1

Browse Source 
As discussed in #853
This commit is contained in:
Mark Pizzolato 2020-05-18 06:26:10 -07:00
parent d24fa1e5d2
commit 09f18ec2ba
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
VAX/vax_cpu.c
View File

@ -1635,13 +1635,16 @@ for ( ;; ) {
case TSTL:
CC_IIZZ_L (op0); /* set cc's */
if ((cc == CC_Z) && /* zero result and */
((((cpu_idle_mask & VAX_IDLE_ULTOLD) && /* running Old Ultrix or friends? */
((PC - fault_PC) == 6) && /* 6 byte instruction? */
(fault_PC & 0x80000000) && /* in system space? */
(((cpu_idle_mask & VAX_IDLE_VMS) && /* VMS 5.0 and 5.1 */
(PSL_GETIPL (PSL) == 0x3) && /* at IPL 3 */
(PSL_IS & PSL)) || /* on the interrupt stack */
((((cpu_idle_mask & VAX_IDLE_ULTOLD) && /* running Old Ultrix or friends? */
(PSL_GETIPL (PSL) == 0x1)) || /* at IPL 1? */
((cpu_idle_mask & VAX_IDLE_QUAD) && /* running Quasijarus or friends? */
(PSL_GETIPL (PSL) == 0x0))) && /* at IPL 0? */
(fault_PC & 0x80000000) && /* in system space? */
((PC - fault_PC) == 6) && /* 6 byte instruction? */
((fault_PC & 0x7fffffff) < 0x4000))) /* in low system space? */
((fault_PC & 0x7fffffff) < 0x4000)))) /* in low system space? */
cpu_idle(); /* idle loop */
break;