From: CSRG <csrg@ucbvax.Berkeley.EDU>
Date: Tue, 31 Mar 1981 04:23:31 +0000 (-0800)
Subject: BSD 4_1_snap development
X-Git-Tag: BSD-4_1_snap~407
X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/commitdiff_plain/9b0789bb30b6ee58ddb0f3a0166fa752d5d0ab7f

BSD 4_1_snap development
Work on file sys/mdec/tmtoggle.s

Synthesized-from: CSRG/cd1/4.1.snap
---

diff --git a/sys/mdec/tmtoggle.s b/sys/mdec/tmtoggle.s
new file mode 100644
index 0000000000..0341b55518
--- /dev/null
+++ b/sys/mdec/tmtoggle.s
@@ -0,0 +1,18 @@
+/*
+ * Prototype toggle in bootstrap code for tm type tapes.
+ * If on anything but a 780 with the drive on uba0
+ * this will have to be repaired by patching uba and umem.
+ */
+begin:
+	movl	uba,r1
+	movl	$0x80200000,0x800(r1)
+	clrl	0x804(r1)
+	movl	umem,r2
+	bisl2	$0172520,r2
+	mnegw	$512,4(r2)
+	clrw	6(r2)
+	movw	$03,2(r2)
+	halt
+	.align	2
+uba:	.long	0x20006000
+umem:	.long	0x2013e000