1
0
mirror of https://github.com/PDP-10/its.git synced 2026-04-15 16:20:21 +00:00

No need to logout, just use :CWD.

This commit is contained in:
Lars Brinkhoff
2018-02-03 21:04:00 +01:00
parent 1e4a80b7de
commit 5f33f750ab

View File

@@ -1058,14 +1058,9 @@ respond "*" ":link sys;ts dec\021 *,must; be here\r"
respond "*" ":midas decsys;_decbot\r"
expect ":KILL"
# Need to login as user GAMES to build Fortran files in that directory.
respond "*" ":logout\r"
respond "SYSTEM JOB USING THIS CONSOLE" "\032"
respond "Fair share" ":login games\r"
sleep 1
# Compile ADVENT and dump it out with DECUUO.
type ":dec sys:f40\r"
respond "*" ":cwd games\r"
respond "*" ":dec sys:f40\r"
respond "*" "advent=advent\r"
respond "CORE USED" "\032"
type ":kill\r"
@@ -1078,12 +1073,6 @@ respond "Command:" "d"
respond "*" ":pdump sys3; ts advent\r"
respond "*" ":kill\r"
respond "*" ":logout\r"
respond "SYSTEM JOB USING THIS CONSOLE" "\032"
respond "Fair share" ":login db\r"
sleep 1
type ":vk\r"
# ten50
respond "*" ":midas sys3;ts ten50_mrc; ten50\r"
expect ":KILL"