mirror of
https://github.com/PDP-10/its.git
synced 2026-02-09 01:40:58 +00:00
Fixed DQXDEV (DQ) device to work in KA-10. Resolve #1669.
This commit is contained in:
@@ -221,3 +221,7 @@ proc copy_to_klfe {file} {
|
||||
proc comsat_switches {} {
|
||||
respond "Limit to KA-10 instructions" "y\r"
|
||||
}
|
||||
|
||||
proc dqxdev_switches {} {
|
||||
respond "Limit to KA-10 instructions" "y\r"
|
||||
}
|
||||
|
||||
@@ -196,3 +196,7 @@ proc copy_to_klfe {file} {
|
||||
proc comsat_switches {} {
|
||||
respond "Limit to KA-10 instructions" "y\r"
|
||||
}
|
||||
|
||||
proc dqxdev_switches {} {
|
||||
respond "Limit to KA-10 instructions" "y\r"
|
||||
}
|
||||
|
||||
@@ -210,3 +210,7 @@ proc copy_to_klfe {file} {
|
||||
proc comsat_switches {} {
|
||||
respond "Limit to KA-10 instructions" "n\r"
|
||||
}
|
||||
|
||||
proc dqxdev_switches {} {
|
||||
respond "Limit to KA-10 instructions" "n\r"
|
||||
}
|
||||
|
||||
@@ -194,6 +194,7 @@ comsat_switches
|
||||
expect ":KILL"
|
||||
|
||||
respond "*" ":midas device;jobdev dq_sysnet;dqxdev\r"
|
||||
dqxdev_switches
|
||||
expect ":KILL"
|
||||
|
||||
respond "*" "comsat\033j"
|
||||
|
||||
Reference in New Issue
Block a user