From 7a79c69b616e05ff9c4c0f1ff18aa925fc3371d0 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Mon, 17 Jun 2019 17:06:38 +0200
Subject: [PATCH] The KA10 simulator can now run the MAINT; PART F.OLD.

---
 build/ka10/include.tcl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/build/ka10/include.tcl b/build/ka10/include.tcl
index cdeb3fb9..09a93780 100644
--- a/build/ka10/include.tcl
+++ b/build/ka10/include.tcl
@@ -185,7 +185,8 @@ proc patch_lisp {} {
 }
 
 proc translate_diagnostics {} {
-    # Not yet:  "dsk: maint; part f, part f.old\r"
+    respond "*" "\033\024"
+    respond " " "dsk: maint; part f, part f.old\r"
     respond "*" "\033\024"
     respond " " "dsk: maint; part g, part g.old\r"
     respond "*" "\033\024"