From 1136e5752eac40284144a27119bb228da799d3f4 Mon Sep 17 00:00:00 2001
From: Hikaru Ikuta <woodrush924@gmail.com>
Date: Thu, 6 Jan 2022 06:58:33 +0900
Subject: [PATCH] Initialize register cache for robustness

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

diff --git a/sectorlisp.S b/sectorlisp.S
index 81ceb29..aeb054a 100644
--- a/sectorlisp.S
+++ b/sectorlisp.S
@@ -55,6 +55,7 @@ begin:	mov	$0x8000,%sp			# uses higher address as stack
 main:	mov	%sp,%cx
 	mov	$'\r',%al
 	call	PutChar
+	mov	%dx,%fs				# Clear input lookahead cache
 	call	Read
 	call	EvalPrint
 	jmp	main