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

Add a "cwd" TCL procedure.

And use it in the build scripts.
This commit is contained in:
Lars Brinkhoff
2025-02-08 21:07:19 +01:00
parent a9dc62eae8
commit 655f74a34d
12 changed files with 51 additions and 47 deletions

View File

@@ -181,6 +181,10 @@ proc macro10 {target sources} {
respond "*" ":kill\r"
}
proc cwd {directory} {
respond "*" ":cwd $directory\r"
}
set ip [ip_address [lindex $argv 0]]
set gw [ip_address [lindex $argv 1]]