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

Fix KA10 build script MARK responses.

Browse Source 
SALV prints "PACK # =" for information, not request for input.
This commit is contained in:
Lars Brinkhoff 2018-09-10 08:34:59 +02:00
parent dda1077240
commit 4c722344a7
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
build/ka10/include.tcl
View File

@ -12,7 +12,6 @@ proc mark_packs {} {
respond "NO =" "2\r"
expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK # =" "2\r"
respond "PACK ID =" "2\r"
respond "\n" "mark\033g"
@ -21,7 +20,6 @@ proc mark_packs {} {
respond "NO =" "3\r"
expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK # =" "3\r"
respond "PACK ID =" "3\r"
respond "\n" "mark\033g"
@ -30,7 +28,6 @@ proc mark_packs {} {
respond "NO =" "0\r"
expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK # =" "0\r"
respond "PACK ID =" "0\r"
respond "DDT" "mark\033g"
@ -39,7 +36,6 @@ proc mark_packs {} {
respond "NO =" "1\r"
expect -timeout 300 "VERIFICATION"
respond "ALLOC =" "3000\r"
respond "PACK # =" "1\r"
respond "PACK ID =" "1\r"
}