github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-02-27 01:09:49 +00:00
Code Issues Releases Wiki Activity

Disabled COMSAT initialization on SIMH, since it appears that this

Browse Source 
operation requires the network support to be functional.
This commit is contained in:
Eric Swenson
2016-11-28 08:39:10 -08:00
committed by Lars Brinkhoff
parent c81af35115
commit ba6c23d8fe
3 changed files with 18 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
build/build.tcl
View File

@@ -453,10 +453,8 @@ type "purify\033g"
respond ":PDUMP DSK:.MAIL.;COMSAT LAUNCH" "\r"
respond "*" ":kill\r"
respond "*" ":job comsat\r"
respond "*" ":load .mail.;comsat launch\r"
respond "*" "debug/-1\r"
type "mfinit\033g"
initialize_comsat
respond "*" ":link emacs;rmail \021:ej,emacs;\[rmai\] >\r"

7
build/klh10/build.tcl
View File

@@ -43,4 +43,11 @@ proc quit_emulator {} {
respond "Confirm" "y\r"
}
proc initialize_comsat {} {
respond "*" ":job comsat\r"
respond "*" ":load .mail.;comsat launch\r"
respond "*" "debug/-1\r"
type "mfinit\033g"
}
source ../build.tcl

9
build/simh/build.tcl
View File

@@ -36,4 +36,13 @@ proc quit_emulator {} {
respond "sim>" "q\r"
}
proc initialize_comsat {} {
# commented out because you cannot run COMSAT initialization without network
# support
#respond "*" ":job comsat\r"
#respond "*" ":load .mail.;comsat launch\r"
#respond "*" "debug/-1\r"
#type "mfinit\033g"
}
source build/build.tcl