github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-13 23:36:30 +00:00
Code Issues Releases Wiki Activity

Correct ITS conditionals in STINK 121T.

Browse Source 
It looks like the <mdl.int> version hadn't actually been built for ITS.
This commit is contained in:
Adam Sampson 2020-08-30 22:38:11 +01:00 committed by Adam Sampson
parent 084028417e
commit 7c28bc7571
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/sysen2/stink.121t
View File

@ -1831,6 +1831,7 @@ IFN T-1,[
IFN T-1,[
MOVE T,1
MOVE 1,JSYS1
]
]
CAIE T,15
CAIN T,12
@ -2055,7 +2056,7 @@ IFN T-1,[
]
PBOUT
IFN T-1, MOVE 1,JSYS1
]
C.12: POPJ P,12
CRLS1: MOVEI T,"*
@ -2348,7 +2349,7 @@ IFE ITS,[
]
LOADN: SKIPA C,SYMFLG
LOADG: MOVEI C,DDSYMS
PUSHJ P,OPNPTR ;DO THE REAL OPEN (AND FIRST READ)
@ -2982,6 +2983,7 @@ TWNTY4: MOVE B,T
MOVEI B,0
PUSHJ P,OUTWRD
JRST TWNTY6
]
;SUBROUTINE TO PUT OUT ONE WORD