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:
@@ -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)
|
||||
|
||||
Reference in New Issue
Block a user