From 6ed436e848a9c3181f21d058b0bac5c8f3eaec90 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Wed, 2 Nov 2016 14:00:22 +0100
Subject: [PATCH] Save file system to a DUMP tape.

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

diff --git a/Makefile b/Makefile
index 12832366..fd2731eb 100644
--- a/Makefile
+++ b/Makefile
@@ -1,4 +1,4 @@
-SRC = system syseng sysen1 midas
+SRC = system syseng sysen1 sysnet midas
 MINSYS = _ sys sys3 sysbin
 RAM = bin/boot/ram.262
 NSALV = bin/boot/salv.rp06
diff --git a/build/build.tcl b/build/build.tcl
index 06d9ae0f..30d14fd9 100644
--- a/build/build.tcl
+++ b/build/build.tcl
@@ -105,5 +105,19 @@ respond "*" ":kill\r"
 respond "*" ":midas system;_its\r"
 respond "MACHINE NAME =" "AI\r"
 expect ":KILL"
+
+#respond "*" ":midas sysbin;_syseng;dump\r"
+#respond "WHICH MACHINE?" "AI\r"
+#expect ":KILL"
+
+respond "*" "\005"
+respond "sim>" "at tu0 out/output.tape\r"
+respond "sim>" "c\r"
+type ":dump\r"
+respond "_" "dump full\r"
+respond "TAPE NO=" "0\r"
+expect "REEL"
+respond "_" "quit\r"
+
 shutdown
 respond "sim>" "quit"