1
0
mirror of https://github.com/PDP-10/its.git synced 2026-01-11 23:53:12 +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

@ -54,6 +54,7 @@ proc make_ntsddt {} {
respond "cpusw=" "0\r"
respond "ndsk=" "0\r"
respond "dsksw=" "0\r"
respond "1PRSW=" "1\r"
expect ":KILL"
}

View File

@ -1184,6 +1184,7 @@ respond "*" ":midas dsk0:.;@ ntsddt_system;ddt\r"
respond "cpusw=" "2\r"
respond "ndsk=" "1\r"
respond "dsksw=" "3\r"
respond "1PRSW=" "1\r"
expect ":KILL"
# IOELEV, PDP-11 doing I/O for the PDP-10 host.

View File

@ -31,4 +31,4 @@ Notes where exec DDT differs from timesharing DDT.
| " | Print ◊Q as five ASCII characters
| # | Print ◊Q as one ASCII character | N/A
| <kbd>^N</kbd> | Single step | KS10 only
| ◊<kbd>^N</kbd> | Stop at next instruction (skip over calls) | N/A
| ◊<kbd>^N</kbd> | Stop at next instruction (skip over calls) | Not on KS10

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,