github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-04-25 20:01:40 +00:00
Code Issues Releases Wiki Activity

Fix IOPUSH UUO and .CALL scribbling random memory location.

Browse Source 
At some point, AIOPUSH was changed not to load B from (R).  On top of
that, the call to AIOPP1 clobbers B.  This makes TYIIOP unhappy,
because it expects B to retain the information from AIOPUSH.  Since R
is unchanged, we can just restore B in AIOPP1.
This commit is contained in:
Lars Brinkhoff
2018-08-02 12:41:20 +02:00
committed by Eric Swenson
parent 86dfd49727
commit f185e2b74e
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/system/ts3tty.400 → src/system/ts3tty.401
View File

@@ -3337,6 +3337,7 @@ STATY2: CAIL B,TIBS-10.
TYOIOP: TDZA A,A ;OUUTPUT CHNL. TYOIOP: TDZA A,A ;OUUTPUT CHNL.
TYIIOP: MOVEI A,TYIMSK-TYOMSK ;INPUT CHNL, SET TYIMSK INSTEAD TYOMSK. TYIIOP: MOVEI A,TYIMSK-TYOMSK ;INPUT CHNL, SET TYIMSK INSTEAD TYOMSK.
CONO PI,CLKOFF ;TO PREVENT TELETYPE (IF CONSOLE) FROM MOVING AROUND CONO PI,CLKOFF ;TO PREVENT TELETYPE (IF CONSOLE) FROM MOVING AROUND
MOVE B,(R) ;GET I/O CHANNEL WORD
JUMPGE B,TYIOP1 ;JUMP IF OPEN AS DEVICE JUMPGE B,TYIOP1 ;JUMP IF OPEN AS DEVICE
SKIPGE TTYTBL(U) ;IF PROCEDURE DOESN'T HAVE CONSOLE, SKIPGE TTYTBL(U) ;IF PROCEDURE DOESN'T HAVE CONSOLE,
JRST CLKONJ ;THEN THAT'S ALL JRST CLKONJ ;THEN THAT'S ALL