From 6467e4a70f9b1383cfe049c664dbc20b936af6cc Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Mon, 7 Nov 2016 21:22:43 +0100
Subject: [PATCH] Build TCTYP and CRTSTY.

---
 Makefile        |  2 +-
 build/build.tcl | 13 +++++++++++++
 2 files changed, 14 insertions(+), 1 deletion(-)

diff --git a/Makefile b/Makefile
index 8654bc97..60a90d48 100644
--- a/Makefile
+++ b/Makefile
@@ -1,4 +1,4 @@
-SRC = system syseng sysen1 sysnet kshack midas _teco_
+SRC = system syseng sysen1 sysnet kshack midas _teco_ rms klh
 MINSYS = _ sys sys3
 RAM = bin/boot/ram.262
 NSALV = bin/boot/salv.rp06
diff --git a/build/build.tcl b/build/build.tcl
index 928363ba..e11b117e 100644
--- a/build/build.tcl
+++ b/build/build.tcl
@@ -150,6 +150,19 @@ expect ":KILL"
 respond "*" ":delete sys;atsign device\r"
 respond "*" ":link sys;atsign device,sysbin;@dev bin\r"
 
+respond "*" ":midas sysbin;_syseng;tctyp\r"
+expect ":KILL"
+respond "*" ":link sys;ts tctyp,sysbin;tctyp bin\r"
+
+respond "*" ":midas sysbin;_syseng;crtsty\r"
+expect ":KILL"
+respond "*" ":job crtsty\r"
+respond "*" ":load sysbin;crtsty bin\r"
+respond "*" "purify\033g"
+respond " BIN" "\r"
+respond "*" ":kill\r"
+respond "*" ":link sys3;ts crtsty,sysbin;crtsty bin\r"
+
 respond "*" "\005"
 respond "sim>" "at tu0 out/output.tape\r"
 respond "sim>" "c\r"