From 0a51cb37f019379ad6f77680d41e15251891fe2f Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Sat, 23 Jun 2018 20:05:28 +0200
Subject: [PATCH] Write KS10 microcode RAM file to the front end file system.

---
 build/ks10/include.tcl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/build/ks10/include.tcl b/build/ks10/include.tcl
index b812c237..2dcff5b5 100644
--- a/build/ks10/include.tcl
+++ b/build/ks10/include.tcl
@@ -30,6 +30,12 @@ proc prepare_frontend {} {
     set dir $expect_out(1,string)
     type "write\r"
     respond "Are you sure" "yes\r"
+    respond "Which file" "ram\r"
+    expect "Input from"
+    sleep 1
+    respond ":" ".;ram ram\r"
+    respond "!" "write\r"
+    respond "Are you sure" "yes\r"
     respond "Which file" "bt\r"
     expect "Input from"
     sleep 1