github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-03-10 12:48:25 +00:00
Code Issues Releases Wiki Activity

Always run PDSET after booting.

Browse Source
This commit is contained in:
Lars Brinkhoff
2018-02-21 16:20:18 +01:00
committed by Eric Swenson
parent 7896cd7268
commit f97c6df093
1 changed files with 2 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
build/build.tcl
View File

@@ -42,18 +42,6 @@ proc pdset {} {
expect ":KILL"
}
proc maybe_pdset {} {
expect "YOU MAY HAVE TO :PDSET" {
pdset
} "PDTIME OFFSET" {
pdset
} "IT IS NOW" {
type "\032"
expect "Fair"
type ":vk\r"
}
}
proc shutdown {} {
global emulator_escape
respond "*" ":lock\r"
@@ -136,7 +124,7 @@ quit_emulator
start_its
respond "DSKDMP" "its\r"
type "\033g"
maybe_pdset
pdset
respond "*" ":login db\r"
sleep 1
@@ -221,7 +209,7 @@ respond "DSKDMP" "m\033nsalv bin\r"
expect "\n"; type "d\033nits\r"
expect "\n"; type "nits\r"
expect "\n"; type "\033g"
maybe_pdset
pdset
respond "*" ":login db\r"
sleep 1