From 4efdf81f45760a27ee55fdc1cee411b771bb11b5 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Fri, 26 Oct 2018 12:54:14 +0200
Subject: [PATCH] Run GT to generate tables for compiler.

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

diff --git a/build/misc.tcl b/build/misc.tcl
index 4483ebbe..fd7302c3 100644
--- a/build/misc.tcl
+++ b/build/misc.tcl
@@ -1159,6 +1159,16 @@ respond "*" ":c;occ g0.c g1.c g2.c g3.c g4.c g5.c c25.c\r"
 expect ":KILL"
 respond "*" ":stinkr gt\r"
 
+# Update compiler files with information from machine description.
+respond "*" ":gt pdp10.gt\r"
+respond "*" ":teco\r"
+# Load macro file and store it in q-register x.
+respond "&" "ERinstll teco\033 @Y HXx\033\033"
+# Load output file, and call the macro in x.
+respond "&" "ERpdp10 gtout\033 @Y Mx\033\033"
+respond "&" "\003"
+respond "*" ":kill\r"
+
 # TJ6
 respond "*" ":midas sysbin;_tj6;tj6\r"
 expect ":KILL"