From b4be6be1755523fc0912592946505be82e1a894d Mon Sep 17 00:00:00 2001
From: phil <phil@ultimate.com>
Date: Sun, 20 Oct 2019 13:01:30 -0400
Subject: [PATCH 1/2] remove src/cmd/p0.s: now part of op.s

---
 src/cmd/p0.s | 37 -------------------------------------
 1 file changed, 37 deletions(-)
 delete mode 100644 src/cmd/p0.s

diff --git a/src/cmd/p0.s b/src/cmd/p0.s
deleted file mode 100644
index 407a7f0..0000000
--- a/src/cmd/p0.s
+++ /dev/null
@@ -1,37 +0,0 @@
-"** 10-36-55.pdf page 1
-osc = 0640001
-omq = 0640002
-otq = 0642000
-cmq = 0640004
-lmq = 0652000
-ecla = 0641000
-
-i = 020000
-
-save = 1
-getuid = 2
-open = 3
-read = 4
-write = 5
-creat = 6
-seek = 7
-tell = 8
-close = 9
-link = 10
-unlink = 11
-setuid = 12
-rename = 13
-exit = 14
-time = 15
-intrp = 16
-chdir = 17
-chmode = 18
-chowner = 19
-sysloc = 21
-capt = 23
-rele = 24
-status = 25
-sleep = 26
-smes = 27
-rmes = 28
-fork = 29

From e46e22baa6cccf1f74a9ad2cf9c6f7e066cf1a5c Mon Sep 17 00:00:00 2001
From: phil <phil@ultimate.com>
Date: Sun, 20 Oct 2019 13:55:40 -0400
Subject: [PATCH 2/2] cas.s performs zero word writes: a7out was die-ing: make
 it a noop

---
 tools/a7out | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/a7out b/tools/a7out
index 4835c1b..46b3f1e 100755
--- a/tools/a7out
+++ b/tools/a7out
@@ -1124,7 +1124,7 @@ sub sys_write {
     my $count = $Mem[ $PC + 2 ];
     my $end   = ( $start + $count - 1 ) & MAXADDR;
     die("sys_write: bad start/end addresses $start $end\n")
-      if ( $end < $start );
+      if ( $count != 0 && $end < $start );
     printf( "write: %d words from %s to fd %d\n", $count, addr($start), $fd )
 					if ( ($debug) || ($singlestep) );