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:
parent
bd5f99ffcb
commit
7517234180
@ -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"
|
||||
}
|
||||
|
||||
|
||||
@ -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.
|
||||
|
||||
@ -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
|
||||
|
||||
@ -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,
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user