1
0
mirror of https://github.com/PDP-10/its.git synced 2026-01-27 12:42:10 +00:00

Make $^N work in exec DDT when not using KS10 one-proceed.

This commit is contained in:
Lars Brinkhoff
2018-10-02 10:32:47 +02:00
parent bd5f99ffcb
commit 7517234180
4 changed files with 3 additions and 6 deletions

View File

@@ -79,7 +79,6 @@ TKS, SETF New One Proceed? (Using 1-proceed microcode),KS1PR
IFNDEF KS1PR, KS1PR==:0
IFN KS1PR, 1PRSW==:0 ; Only one kind of one proceed please
1PRSW==:0 ; DOESN'T WORK!
setf Old One Proceed?,1PRSW
subttl assignments and definitions
@@ -1995,10 +1994,6 @@ REMOV1: MOVE T,B1INS-B1ADR(S) ;INSTRUCTION AT BREAKPOINT <N>
REMOV3: SUBI S,3
CAIL S,B0ADR
JRST REMOV1
IFN 1PRSW,[
SETZM TB1ADR ;FLUSH TEMPORARY BREAKS
SETZM TB2ADR
];1PRSW
IFN KS1PR,[
MOVE T,1PNSV
SKIPE R,1POADR ; If UPT1PN usurped,