From 02cae72bb892e18d697ddddcdee1c1cbaa7cb1c4 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Sun, 22 Oct 2023 13:50:27 +0200
Subject: [PATCH] Make it possible to customize ITS per-machine.

---
 build/build.tcl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/build/build.tcl b/build/build.tcl
index 05ba86d9..6b9662cc 100644
--- a/build/build.tcl
+++ b/build/build.tcl
@@ -195,6 +195,10 @@ respond "*" ":copy sys; ts ddt, dsk0: backup;\r"
 respond "*" ":copy sys; ts dump, dsk0: backup;\r"
 respond "*" ":copy sys; ts midas, dsk0: backup;\r"
 
+if [file exists $build/mchn/$mchn/custom.tcl] {
+    source $build/mchn/$mchn/custom.tcl
+}
+
 if {![info exists env(NODUMP)]} {
     # make output.tape
     respond "*" $emulator_escape