From 3cb4b9743fe45a8ac02074cbaaa065907ca8a8bd Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Fri, 5 Nov 2021 10:47:36 -0700
Subject: [PATCH] shave one more byte

---
 bin/sectorlisp.bin | Bin 512 -> 512 bytes
 sectorlisp.S       |   2 +-
 2 files changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/sectorlisp.bin b/bin/sectorlisp.bin
index 3d0ec4dd9339b31e440308e18e82c05c5b8d3d16..6424579db4ae58e2962db272b81c05f3bd45774b 100755
GIT binary patch
delta 60
zcmV-C0K@-)1b_sPF$TT@c8T#9kvARz5s_9f0d<jwXBjcuv<}S>JPmcYunOz)=wkmo
SDG!9a0O)&@2m$s3&Q+?RL>Mjr

delta 60
zcmV-C0K@-)1b_sPF$NdD0(Ob<kvARz5|LIg0d|pxXBxW)0JILx5IhZax3CK9@#tay
SJSh)^ya4EWlLrCz0#&MqZ5I;&

diff --git a/sectorlisp.S b/sectorlisp.S
index 512ca26..ecd2bcd 100644
--- a/sectorlisp.S
+++ b/sectorlisp.S
@@ -164,7 +164,7 @@ GetChar:
 PutChar:
 #	push	%bx				# don't clobber di,si,cx,dx
 #	push	%bp				# original ibm pc scroll up bug
-	mov	$7,%bx				# normal mda/cga style page zero
+	xor	%bx,%bx				# normal mda/cga style page zero
 	mov	$0x0e,%ah			# teletype output al cp437
 	int	$0x10				# vidya service
 #	pop	%bp				# preserves al