From 2c3cdfe4d48cbebc2fb5a652a84f9547399ab0e6 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Fri, 3 May 2024 16:52:37 +0200
Subject: [PATCH] Move CREATE to the basics build script.

It needs to be part of the basics tooling since it's used in other
places to create files.
---
 build/basics.tcl | 5 +++++
 build/misc.tcl   | 5 -----
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/build/basics.tcl b/build/basics.tcl
index 9b06eed3..853505d3 100644
--- a/build/basics.tcl
+++ b/build/basics.tcl
@@ -375,4 +375,9 @@ expect ":KILL"
 respond "*" ":palx gt40;_gt40;bootvt\r"
 expect ":KILL"
 
+# PLAN/CREATE
+respond "*" ":midas sys3;ts create_syseng;create\r"
+expect ":KILL"
+respond "*" ":link sys1;ts plan,sys3;ts create\r"
+
 processor_basics
diff --git a/build/misc.tcl b/build/misc.tcl
index 78059aaa..cc01e22c 100644
--- a/build/misc.tcl
+++ b/build/misc.tcl
@@ -853,11 +853,6 @@ respond "*" "purify\033g"
 respond "TS @" "\r"
 respond "*" ":kill\r"
 
-# PLAN/CREATE
-respond "*" ":midas sys3;ts create_syseng;create\r"
-expect ":KILL"
-respond "*" ":link sys1;ts plan,sys3;ts create\r"
-
 respond "*" ":midas;324 dsk0:.;@ pt_syseng;pt\r"
 expect ":KILL"