From 72b037de932ba4760635a573a7b4dabb59067fda Mon Sep 17 00:00:00 2001
From: Hikaru Ikuta <woodrush924@gmail.com>
Date: Thu, 6 Jan 2022 11:40:51 +0900
Subject: [PATCH] Shave one byte

---
 sectorlisp.S | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/sectorlisp.S b/sectorlisp.S
index 87b2317..46cf3bc 100644
--- a/sectorlisp.S
+++ b/sectorlisp.S
@@ -109,12 +109,11 @@ Print:	mov	(%si),%si			# si = Cdr(e)
 	mov	(%si),%ax			# ax = Car(Cdr(e))
 EvalPrint:
 	call	Eval
-	push	%ax
 	push	%dx
 	xchg	%ax,%si
 	call	PrintObject
+	xchg	%dx,%ax
 	pop	%dx
-	pop	%ax
 	ret
 
 Read:	push	%dx