From c84eed864fbba27f229ea416dde6969c70e490b2 Mon Sep 17 00:00:00 2001
From: Hikaru Ikuta <woodrush924@gmail.com>
Date: Thu, 6 Jan 2022 18:12:17 +0900
Subject: [PATCH] Simplify

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

diff --git a/sectorlisp.S b/sectorlisp.S
index 8db0522..787d0b9 100644
--- a/sectorlisp.S
+++ b/sectorlisp.S
@@ -108,7 +108,7 @@ PrintObject:					# PrintObject(x:si)
 
 Print:	test	%si,%si
 	jz	NewLine
-	mov	(%si),%si			# ax = Car(Cdr(e))
+	xchg	%di,%si
 	call	PrintObject
 	ret