github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-04-26 12:17:41 +00:00
Code Issues Releases Wiki Activity

Edit PDS-4 Crash source code to match PDS-1 version of CRASH IML.

Browse Source
This commit is contained in:
Lars Brinkhoff
2020-06-18 11:22:17 +02:00
parent aafa8b9bcc
commit 5c6c647603
3 changed files with 150 additions and 69 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
build/misc.tcl
View File

@@ -1443,10 +1443,18 @@ respond "*" ":imtran\r"
respond "@" "imlac; pong iml_imlac; pong bin\r"
respond "@" "\021"
# CRASH
# CRASH, PDS-4 version
respond "*" ":midas imlac;_imsrc; crash\r"
expect ":KILL"
respond "*" ":imtran\r"
respond "@" "imlac; crash4 iml_imlac; crash bin\r"
respond "@" "\021"
# PDS-1 version
respond "*" ":midas /t imlac;_imsrc; crash\r"
respond "with ^C" "PDS4==0\r\003"
respond "with ^C" "PDS4==0\r\003"
expect ":KILL"
respond "*" ":imtran\r"
respond "@" "imlac; crash iml_imlac; crash bin\r"
respond "@" "\021"