1
0
mirror of https://github.com/PDP-10/its.git synced 2026-02-16 12:53:06 +00:00

Fix uses of DSDEV without DSDP.

This commit is contained in:
Lars Brinkhoff
2018-06-28 11:30:46 +02:00
parent 29de9c9cc7
commit 7e979d2183

View File

@@ -2444,7 +2444,9 @@ DIGNOR: 0
BBLK
CONO DIS,0
IFN DSDP,[
DATAO DSDEV,[DSNDIS]
]
JRST 12,@DIGNOR
ENDLIS: SETOM DISDIE
@@ -2591,7 +2593,9 @@ AIDS7: PUSHJ P,ADCLB
JFCL
AIDS9: SETOM 340MD
SETOM DISUSR
IFN DSDP,[
DATAO DSDEV,[DSNDIS] ;DEASSIGN DIS
]
POPJ P,
AIDS8: MOVE A,U ;FLUSH CHNLS IN CASE OF .DCLOSE FROM DIS OR IDS
@@ -3720,7 +3724,9 @@ TVCINI: CONO PI,OMXOFF
VIDFLS: SKIPL NVDUSE ;SKIP IF OPENS ON NVD, .VSCAN
POPJ P,
IFN DSDP,[
DATAO DSDEV,[DSNVID] ;DEASSIGN VIDI
]
SETOM NVDUSR
POPJ P,
@@ -3838,8 +3844,10 @@ NEWORK:; SKIPGE DAEMFL
CONI NVDX,A
CONO NVDX,(T)
SKIPN A
IFN DSDP,[
DATAO DSDEV,[DSNVID] ;RE DEASSIGN VIDI IF WAS DEASSIGNED
;(CONO DID CLEAR PIA, DONE, AND SET MODE FLOPS THO)
]
JRST OMXRET
TVCFIN: SETZM TVFLG
@@ -4139,7 +4147,9 @@ SCNB4: SKIPL NVDCNY ;WAIT FOR LAST DATAO TO RETURN A POINT
SOSL NVDUSE
JRST NEWORK
SETOM NVDUSR
IFN DSDP,[
DATAO DSDEV,[DSNVID] ;DEASSIGN BAT
]
MOVSI B,-1
MOVSI W,-2
SCNB4B: LDB A,VEXT(W)